Teslimata ait çıktı türlerini tetiklemek..
data :
rg_nacha TYPE TABLE OF msg3 WITH HEADER LINE ,
rg_kschl TYPE TABLE OF msg2 WITH HEADER LINE ,
rg_objky TYPE TABLE OF msg1 WITH HEADER LINE .
appl = 'V2' .
pm_vermo = '2' .
rg_kschl-sign = 'I'.
rg_kschl-option = 'EQ'.
rg_kschl-low = 'ZAAA'.
APPEND rg_kschl .
rg_objky-sign = 'I' .
rg_objky-option = 'EQ' .
rg_objky-low = TESLIMAT .
APPEND rg_objky.
DO 3 TIMES .
l_cnt = l_cnt + 1 .
pm_vermo = l_cnt .
CALL FUNCTION 'WFMC_MESSAGES_SELECT'
EXPORTING
pi_application = appl
pi_processing = pm_vermo
TABLES
ri_medium = rg_nacha[]
ri_type = rg_kschl[]
ri_object = rg_objky[]
tx_messages = msgs[].
IF NOT msgs[] IS INITIAL .
EXIT.
ENDIF.
ENDDO .
CALL FUNCTION 'WFMC_MESSAGES_EXTEND'
TABLES
tx_messages = msgs.
CHECK NOT msgs[] IS INITIAL .
READ TABLE msgs WITH KEY objky+(10) = TESLIMAT.
msgs-ldest = l_tddest .
MODIFY msgs INDEX sy-tabix TRANSPORTING ldest .
CALL FUNCTION 'WFMC_MESSAGES_PROCESS'
EXPORTING
pi_display_id = 'NALIV2'
pi_no_dialog = 'X'
pi_vermo = pm_vermo
pi_be_quiet = 'X'
TABLES
tx_messages = msgs
tx_display = disp.