CALL TCODE NEW WINDOW

 

CASE 1) 

data l_parameters type string.

PARAMETERS p_matnr TYPE matnr OBLIGATORY.
CONCATENATE 'RMMG1-MATNR=' p_matnr INTO l_parameters.

CALL FUNCTION 'TH_CREATE_MODE'
  EXPORTING
    transaktion  = 'MM03'
    parameters   = l_parameters
    process_dark = 'X'.

 

*파라메터를 설정 하실 수 있습니다.
*예제 테스트
 "SELECTT-OPTION" 으로 된 파라메터도 가능 합니다. (예 : S_MATNR-LOW=[값])
*    만약 여러개의 파라메터를 넘겨야 한다면, ";" 로 연결 하시면 됩니다.
*    (예: p_1=aaa;p_2=bbb;p_3;=ccc)

 

CASE 2) 

*해당 t-code와 입력값을 정의하면 새로운 session에 결과를 보여주는 소스입니다.
*
DATA: session_name TYPE string.

DATA: BEGIN OF i_rfc_spagpa OCCURS 0.
        INCLUDE STRUCTURE rfc_spagpa.
      DATA: END OF i_rfc_spagpa.

PARAMETERS: p_belnr LIKE bkpf-belnr.
CLEAR: i_rfc_spagpa, i_rfc_spagpa[].
i_rfc_spagpa-parid = 'BLN'.
i_rfc_spagpa-parval = p_belnr.

APPEND i_rfc_spagpa. CLEAR i_rfc_spagpa.

i_rfc_spagpa-parid = 'BUK'.
i_rfc_spagpa-parval = '1000'.
APPEND i_rfc_spagpa. CLEAR i_rfc_spagpa.

i_rfc_spagpa-parid = 'GJR'.
i_rfc_spagpa-parval = '2021'.
APPEND i_rfc_spagpa. CLEAR i_rfc_spagpa.

DO 1 TIMES.  "여러개 띄우려면...
  session_name = sy-index.
  CALL FUNCTION 'ABAP4_CALL_TRANSACTION' STARTING NEW TASK session_name
    DESTINATION 'NONE'
    EXPORTING
      tcode                   = 'FB03'
      skip_screen             = 'X'
      mode_val                = 'A'
      update_val              = 'A'
   TABLES
*      using_tab               =
      spagpa_tab              = i_rfc_spagpa
*     mess_tab                =
   exceptions
      call_transaction_denied = 1
      tcode_invalid           = 2
      others                  = 3.
ENDDO.