[SAP] – Call MIGO from Function / ZProgram
Function Call MIGO
Transaction Code “MIGO”, salah satu transaction utama pada module Material Manajemen, dimana pada Transaksi ini dapat dilakukan bermacam-macam transaksi, baik itu Good Receipt, Good Issue, Transfer Posting dan lain sebagainya. Selayaknya transaksi ini sudah sangat melekat bagi teman-teman module MM.
Dalam sebuah implementasi, tak jarang ditemui permintaan adanya transaksi Good Issue / Good Receipt, transfer posting maupun yang lainnya yang tidak menggunakan transaksi MIGO, melainkan di HIT dari ZProgram dimana running BAPI “BAPI_GOODSMVT_CREATE”, dengan event createnya maupun dengan rollbacknya.
Berikut adalah source untuk dapat memanggil, MIGO dari zprogram bilamana dalam report (hotspot) maupun lainnya mentriggernya.
-Source Code Call Migo
FORM user_command USING r_ucomm LIKE sy-ucomm
rs_selfield TYPE slis_selfield.
CASE r_ucomm.
WHEN ‘&F03’ OR ‘E’ .
LEAVE TO SCREEN 0.
WHEN ‘&IC1’.
CLEAR: x_alv.
IF rs_selfield-tabindex > 0.
READTABLE t_alv INTO x_alv INDEX rs_selfield-tabindex.
PERFORM f_to_migo.
ENDIF.
ENDCASE.
IF ref_grid IS INITIAL.
CALL FUNCTION ‘GET_GLOBALS_FROM_SLVC_FULLSCR’
IMPORTING
e_grid = ref_grid.
ELSE.
CALL METHOD ref_grid->check_changed_data.
ENDIF.
ENDFORM.”user_command
FORM f_to_migo.
CALL FUNCTION ‘MIGO_DIALOG’
EXPORTING
i_action = ‘A04’
i_refdoc = ‘R02’
i_notree = ‘X’
i_no_auth_check = ‘ ‘
i_deadend = ‘X’
i_skip_first_screen = ‘X’
i_okcode = ‘OK_GO’
i_mblnr = x_alv-mblnr
i_mjahr = x_alv-mjahr
i_zeile = x_alv-zeile.
ENDFORM. “F_TO_MIGO
-Test
Running Report dan klik nomor GR untuk mentrigger event ke MIGO
-Done
Demikian sharing terkait call MIGO dari zprogram dimana telah disediakan function standard-nya oleh SAP, jadi tinggal re-used aja. Jika ada yang perlu didiskusikan, please contact me at : yudho.guritno@gmail.com
_TerimaKasih,
GuritnoY
https://www.linkedin.com/in/guritno-yudho-wibowo-95944236/