Ansicht
Dokumentation

EXIT_SAPLJHF3_002 - IS-M/AM: Modify Matchcode ID - For Billing Document

SUBST_MERGE_LIST - merge external lists to one complete list with #if... logic for R3up   General Material Data  
This documentation is copyright by SAP AG.

Functionality

Example

Please use the following coding to retain downward compatibility:

DATA: INTERFACE_WA TYPE LINE OF SHLP_DESCR_T-INTERFACE,
PHELP LIKE PHELP,
LV_DYNNR LIKE D020S-DNUM,
LV_X_TABLECONTROL LIKE SY-BATCH,
LV_FIELDNAME(132),
LV_VBELN LIKE JHTFK-VBELN,
LV_MCID LIKE DD23L-MCID.

IF CALLCONTROL-STEP = 'SELONE' AND
CALLCONTROL-SHORTCUT IS INITIAL.

CALLCONTROL-SHORTCUT = 'X'.

READ TABLE SHLP-INTERFACE
INTO INTERFACE_WA
WITH KEY SHLPFIELD = 'VBELN'
TRANSPORTING VALUE.

LV_VBELN = INTERFACE_WA-VALUE.

IMPORT PHELP FROM MEMORY ID 'PHELP'.
LV_DYNNR = PHELP-DYNPRO.

READ TABLE SHLP-INTERFACE
INTO INTERFACE_WA
WITH KEY F4FIELD = 'X'
TRANSPORTING VALTABNAME VALFIELD.

CONCATENATE INTERFACE_WA-VALTABNAME INTERFACE_WA-VALFIELD
INTO LV_FIELDNAME
SEPARATED BY '-'.

IF NOT PHELP-STEPL IS INITIAL.
LV_X_TABLECONTROL = 'X'.
ENDIF.

* Access using the old interface
IN_PROGRAM = PHELP-DYNPPROG
IN_DYNNR = LV_DYNNR
IN_FIELDNAME = LV_FIELDNAME
X_TABLECONTROL = LV_X_TABLECONTROL
IO_VBELN = LV_VBELN
MATCHCODE_ID = LV_MCID.

CONCATENATE '=' LV_MCID INTO INTERFACE_WA-VALUE.
MODIFY SHLP-INTERFACE FROM INTERFACE_WA
TRANSPORTING VALUE
WHERE F4FIELD <> SPACE.

ENDIF.

Further information

Example exit documentation

Parameters

CALLCONTROL
RECORD_TAB
SHLP
SHLP_TAB

Exceptions

Function Group

XJHF

ABAP Short Reference   TXBHW - Original Tax Base Amount in Local Currency  
This documentation is copyright by SAP AG.

Length: 2305 Date: 20240523 Time: 061244     sap01-206 ( 24 ms )