Code: Alles auswählen.
REPORT Z_TEST_BD10.
DATA BEGIN OF BDCDATA OCCURS 100.
INCLUDE STRUCTURE BDCDATA.
DATA END OF BDCDATA.
DATA BEGIN OF ITAB OCCURS 10.
INCLUDE STRUCTURE BDCMSGCOLL.
DATA END OF ITAB.
BDCDATA-PROGRAM = 'RBDSEMAT'.
BDCDATA-DYNPRO = '1000'.
BDCDATA-DYNBEGIN ='x'.
APPEND BDCDATA.
CLEAR BDCDATA.
BDCDATA-FNAM = 'MATSEL-LOW'.
BDCDATA-FVAL = 'MYMATNR'.
APPEND BDCDATA.
CLEAR BDCDATA.
BDCDATA-FNAM = 'MESTYP'.
BDCDATA-FVAL = 'Z_MATMAS'.
APPEND BDCDATA.
CLEAR BDCDATA.
BDCDATA-FNAM = 'LOGSYS'.
BDCDATA-FVAL = 'Z_MYLOGSYS'.
APPEND BDCDATA.
CALL TRANSACTION 'BD10'
USING BDCDATA
MODE 'N'
MESSAGES INTO ITAB.
Code: Alles auswählen.
REPORT Z_TEST_BD10.
DATA: matnr TYPE MATNR,
mestyp TYPE EDI_MESTYP.
matnr = 'MYMATNR'.
mestyp = 'Z_MATMAS'.
SET PARAMETER ID: 'MAT' FIELD matnr,
'MES' FIELD mestyp.
CALL TRANSACTION 'BD10' AND SKIP FIRST SCREEN.Code: Alles auswählen.
REPORT Z_TEST_BD10.
DATA: rspar TYPE TABLE OF rsparams,
wa_rspar LIKE LINE OF rspar.
wa_rspar-selname = 'MAT'.
wa_rspar-kind = 'P'.
wa_rspar-low = 'MYMATNR'.
APPEND wa_rspar TO rspar.
wa_rspar-selname = 'MES'.
wa_rspar-kind = 'P'.
wa_rspar-low = 'Z_MATMAS'.
APPEND wa_rspar TO rspar.
SUBMIT RBDSEMAT
VIA SELECTION-SCREEN
WITH SELECTION-TABLE rspar
AND RETURN.