Read Po EKKO Long text
Read Po long text
DATA: lt_lines TYPE STANDARD TABLE OF tline,
wa_line TYPE tline,
lv_name TYPE thead-tdname.
CALL FUNCTION 'READ_TEXT'
EXPORTING
* CLIENT = SY-MANDT
id = 'F07'
language = sy-langu
name = lv_name
object = 'EKKO'
TABLES
lines = lt_lines
.
IF sy-subrc <> 0.
EXIT.
ELSE.
DELETE lt_lines WHERE tdline IS INITIAL.
LOOP AT lt_lines INTO wa_line.
lv_borker = wa_line-tdline.
ENDLOOP.
ENDIF.
MOVE LV_PAYMENT TO gs_final-LV_PAYMENT.
REFRESH: lt_lines[].
CLEAR: wa_line.
DATA: lt_lines TYPE STANDARD TABLE OF tline,
wa_line TYPE tline,
lv_name TYPE thead-tdname.
CALL FUNCTION 'READ_TEXT'
EXPORTING
* CLIENT = SY-MANDT
id = 'F07'
language = sy-langu
name = lv_name
object = 'EKKO'
TABLES
lines = lt_lines
.
IF sy-subrc <> 0.
EXIT.
ELSE.
DELETE lt_lines WHERE tdline IS INITIAL.
LOOP AT lt_lines INTO wa_line.
lv_borker = wa_line-tdline.
ENDLOOP.
ENDIF.
MOVE LV_PAYMENT TO gs_final-LV_PAYMENT.
REFRESH: lt_lines[].
CLEAR: wa_line.
Comments
Post a Comment