ML81N is Entry Sheet Service in SAP. SAP provided us with number of user exit. Below are the user exit in ML81N.
Probably User Exit ML81N At save is not provide by SAP. but if you really need exit ML81N at Save Event you can create enhancement point in include LMLSRF0F.
You can check ABAP Code below, in my requirement need to create confirmation in PS Network using BAPI BAPI_NETWORK_CONF_ADD after Service Entry Sheet have accepted by user then save.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 |
ENHANCEMENT 2 ZIMP_PS_UPD_CN25. "active version "Created By Rachmad Kurniawan "Update Konfirmasi SES. DATA : LW_EKKN TYPE EKKN, LV_NPLNR TYPE NW_AUFNR, LW_BAPIRET TYPE BAPIRET2. DATA : LI_CONF TYPE TABLE OF BAPI_NETWORK_CONF_ADD, LW_CONF TYPE BAPI_NETWORK_CONF_ADD, LW_AFVC TYPE AFVC, LW_AFVV TYPE AFVV, LV_KONFIRM01 TYPE P DECIMALS 3. REFRESH : LI_CONF. IF sy-tcode = 'ML81N'. IF ESSR-KZABN = 'X'. SELECT SINGLE * FROM EKKN INTO LW_EKKN WHERE EBELN = ESSR-EBELN AND EBELP = ESSR-EBELP. IF SY-SUBRC EQ 0. LV_NPLNR = LW_EKKN-NPLNR. SELECT SINGLE * FROM AFVC INTO LW_AFVC WHERE AUFPL = LW_EKKN-AUFPL AND APLZL = LW_EKKN-APLZL. IF SY-SUBRC EQ 0. IF LW_EKKN-NETWR NE 0. SELECT SINGLE * FROM AFVV INTO LW_AFVV WHERE AUFPL = LW_EKKN-AUFPL AND APLZL = LW_EKKN-APLZL. LV_KONFIRM01 = ESSR-NETWR / LW_EKKN-NETWR. LW_CONF-ACTIVITY = LW_AFVC-VORNR. LW_CONF-ACT_WORK_2 = LV_KONFIRM01 * LW_AFVV-ARBEI. LW_CONF-UN_ACT_WORK = LW_AFVV-ARBEH. LW_CONF-CONF_TEXT = ESSR-TXZ01. APPEND LW_CONF TO LI_CONF. CALL FUNCTION 'BAPI_NETWORK_CONF_ADD' EXPORTING number = LV_NPLNR IMPORTING RETURN = LW_BAPIRET tables i_confirmations = LI_CONF. CALL FUNCTION 'BAPI_TRANSACTION_COMMIT' EXPORTING WAIT = 'X'. ENDIF. ENDIF. ENDIF. ENDIF. ENDIF. ENDENHANCEMENT. |