CALL FUNCTION 'L_TO_SET_SPECIAL'
EXPORTING
I_SPEZI = 'B'
I_VBELN = GV_VBELN
EXCEPTIONS
CALL_FORBIDDEN = 1
INPUT_WRONG = 2
OTHERS = 3.
IF SY-SUBRC = 0.
ENDIF.
* Perform lt0g_bdc.
CALL FUNCTION 'L_TO_CREATE_MULTIPLE'
EXPORTING
I_LGNUM = G_LGNUM
I_BWLVS = '999'
I_COMMIT_WORK = 'X'
I_NIDRU = LV_PROTO
I_DRUKZ = LV_DRUKZ
IMPORTING
E_TANUM = LV_TANUM
TABLES
T_LTAP_CREAT = LTAP_CREAT[]
EXCEPTIONS
ERROR_MESSAGE = 99.