Calling FB03 from Document Number
Some Time Requirement to call t-code using FB03
FORM f_user_command2 USING r_ucomm LIKE sy-ucomm
rs_selfield TYPE slis_selfield.
CASE r_ucomm.
WHEN '&IC1'.
gt_bsid2 = gt_bsid.
READ TABLE gt_bsid1 INTO gs_bsid1 INDEX rs_selfield-tabindex.
SET PARAMETER ID 'BLN' FIELD gs_bsid1-belnr.
SET PARAMETER ID 'BUK' FIELD gs_bsid1-BUKRS.
SET PARAMETER ID 'GJR' FIELD gs_bsid1-GJAHR.
CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN .
ENDCASE.
ENDFORM.
rs_selfield TYPE slis_selfield.
CASE r_ucomm.
WHEN '&IC1'.
gt_bsid2 = gt_bsid.
READ TABLE gt_bsid1 INTO gs_bsid1 INDEX rs_selfield-tabindex.
SET PARAMETER ID 'BLN' FIELD gs_bsid1-belnr.
SET PARAMETER ID 'BUK' FIELD gs_bsid1-BUKRS.
SET PARAMETER ID 'GJR' FIELD gs_bsid1-GJAHR.
CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN .
ENDCASE.
ENDFORM.
Comments
Post a Comment