[corozco]

Que tal amigo,

Tengo el mismo problema con la barra de desplazamiento vertical, inlcui esas lines de codigo en mi PBO pero no tiene efecto.

No se mueve la barra de desplazamiento para poder visualizar datos que estan mas abajo del listado del Table Control, falta de adicionar algo mas?
Asi tengo mi PBO:

PROCESS BEFORE OUTPUT.
module frm_select_data .

loop at it_resb with CONTROL material_batch
cursor material_batch-current_line.

MODULE mod_visualizar.
endloop.


DONDE:
MODULE FRM_SELECT_DATA OUTPUT.
data: nombre type maktx,
ope1 type i,
ope2 type i,
ope3 TYPE i,
zgamng type gamng,
canlis type gamng,
result type gamng,
bandera type i,
wteo type CO_GSUZS,
ban type i.

clear it_resb.

bandera = bandera + 1.

if bandera = 1.
SELECT r~posnr r~matnr r~bdmng r~meins r~charg r~aufnr z~MAKTX into CORRESPONDING FIELDS OF table it_resb from resb as r
INNER JOIN makt as z on
r~matnr = z~matnr and z~spras = 'S'
where r~aufnr eq v_AUFNR .
DESCRIBE TABLE it_resb LINES material_batch-current_line.
endif.

if bandera > 1.

SELECT r~posnr r~matnr r~bdmng r~meins r~charg r~aufnr z~MAKTX
into CORRESPONDING FIELDS OF table it_resb from resb as r
INNER JOIN zpp_ba_batches as z on
r~aufnr = z~aufnr and r~posnr = z~posnr
where r~aufnr eq v_AUFNR.
DESCRIBE TABLE it_resb LINES material_batch-current_line .
endif.

loop at it_resb.
select single gamng into zgamng from afko where aufnr = zcaufvd-aufnr.
canlis = it_resb-bdmng / zgamng.
result = canlis * zcaufvd-gamng.
if ZPP_BA_BATCHES-MENGE_BATH > 0.
result = result / ZPP_BA_BATCHES-MENGE_BATH.
endif.
it_resb-bdmng = result .
if sy-tcode = 'COR1'.
INSERT it_resb.
endif.
if sy-tcode = 'COR2' or sy-tcode = 'COR3'.
MODIFY it_resb.
endif.
endloop.
sort it_resb by posnr.
endif.

ban = ban + 1.
loop at it_resb.
if ban = 1.
if sy-tcode = 'COR1' .
it_zbaches-posnr = it_resb-posnr.
it_zbaches-matnr = it_resb-matnr.
it_zbaches-bdmng = it_resb-bdmng .
it_zbaches-MAKTX = it_resb-MAkTX.
it_zbaches-EINHEIT = it_resb-meins.
it_zbaches-charg = it_resb-charg.
it_zbaches-aufnr = it_resb-aufnr.
APPEND it_zbaches.
endif.
if sy-tcode = 'COR2' or sy-tcode = 'COR3'.
it_zbaches-posnr = it_resb-posnr.
it_zbaches-matnr = it_resb-matnr.
it_zbaches-bdmng = it_resb-bdmng.
it_zbaches-MAkTx = it_resb-MAkTX.
it_zbaches-EINHEIT = it_resb-meins.
it_zbaches-charg = it_resb-charg.
it_zbaches-aufnr = it_resb-aufnr.
APPEND it_zbaches.
endif.
endif.
endloop.

REFRESH CONTROL 'MATERIAL_BATCH' from screen '5100'.

ENDMODULE. " FRM_SELECT_DATA OUTPUT


Y DONDE:

MODULE MOD_VISUALIZAR OUTPUT.

clear resb.

move-CORRESPONDING it_resb to resb.
MOVE-CORRESPONDING it_resb to zpp_ba_batches.

ENDMODULE.

De antemano agradezco su ayuda.