i have probelm in the perform ...is I cannot see entire internal table gt_bseg_po..
How to declare it ?
I have internal table gt_bseg_po[] which contains empty PO s.
Am deleting empty POs from that .
and selecting
For non-blank PO to do ??? later.
gt_bseg_po[] = gt_bseg[].
SORT gt_bseg_po BY ebeln.
DELETE gt_bseg_po WHERE ebeln EQ space.
PERFORM docrec_type_ih USING gt_bseg
gt_bseg_po.
form docrec_type_ih using ut_bseg STRUCTURE gt_bseg
u_gt_bseg_po STRUCTURE gt_bseg_po
.
...
...
h_offset = 0.
Header key.
WRITE 'IH' TO wa_final+h_offset(4).
h_offset = h_offset + 4.
...
...
PO Num.
DATA : wa_ponum(20) TYPE c.
CLEAR : gt_bseg_po.
READ TABLE u_gt_bseg_po WITH KEY bukrs = ut_bseg-bukrs
belnr = ut_bseg-belnr
gjahr = ut_bseg-gjahr
.
IF sy-subrc = 0.
po
WRITE gt_bseg_po-ebeln TO wa_final+h_offset(20).
h_offset = h_offset + 20.
pipe delimiter.
WRITE '|' TO wa_final+h_offset(1).
h_offset = h_offset + 1.
ENDIF.
...
...
ENDFORM.