sample code for 'SHP_VL10_DELIVERY_CREATE'

[Former Member]

Hello,

Can any one give the complete code to use FM 'SHP_VL10_DELIVERY_CREATE' to create a delivery.

Thank you.

Best Regards,

Sasidhar Reddy Matli.

[Former Member]

HI Sasidhar,

The code you needed as below :-

LOOP AT ZDELIVERY.

CLEAR IT_KEY_TO_ENQUE.

IT_KEY_TO_ENQUE-PANUM = ZDELIVERY-PANUM.

IT_KEY_TO_ENQUE-VBOBJ = 'A'.

IT_KEY_TO_ENQUE-VBTYP = 'C'.

IT_KEY_TO_ENQUE-VBELN = ZDELIVERY-VGBEL.

IT_KEY_TO_ENQUE-POSNR = ZDELIVERY-VGPOS.

IT_KEY_TO_ENQUE-ID = ZDELIVERY-ID.

IT_KEY_TO_ENQUE-KZAZU = 'X'.

IT_KEY_TO_ENQUE-TABIX = ZDELIVERY-ID.

IT_KEY_TO_ENQUE-VSTEL = ZDELIVERY-VSTEL.

APPEND IT_KEY_TO_ENQUE TO IT_KEY_TO_ENQUE_T.

CLEAR CT_VORGABE_DATEN.

CT_VORGABE_DATEN-VGBEL = ZDELIVERY-VGBEL.

CT_VORGABE_DATEN-VGPOS = ZDELIVERY-VGPOS.

CT_VORGABE_DATEN-LFIMG = ZDELIVERY-LFIMG.

CT_VORGABE_DATEN-LGMNG = ZDELIVERY-LGMNG.

CT_VORGABE_DATEN-UMVKZ = ZDELIVERY-UMVKZ.

CT_VORGABE_DATEN-UMVKN = ZDELIVERY-UMVKN.

CT_VORGABE_DATEN-UMREV = ZDELIVERY-UMREV.

CT_VORGABE_DATEN-AKMNG = 'B'.

CT_VORGABE_DATEN-VRKME = ZDELIVERY-VRKME.

CT_VORGABE_DATEN-MEINS = ZDELIVERY-MEINS.

CT_VORGABE_DATEN-NORND_LP = 'X'.

CT_VORGABE_DATEN-POSTAB_TABIX = ZDELIVERY-ID.

CT_VORGABE_DATEN-PANUM = ZDELIVERY-PANUM.

CT_VORGABE_DATEN-ID = ZDELIVERY-ID.

CT_VORGABE_DATEN-CHARG = ZDELIVERY-CHARG.

CT_VORGABE_DATEN-COMB_CRIT = ZDELIVERY-ZZ_NSRT.

APPEND CT_VORGABE_DATEN TO CT_VORGABE_DATEN_T.

CLEAR CT_VORGABE_DATEN.

IT_KOMDLGN-RFBEL = ZDELIVERY-VGBEL.

IT_KOMDLGN-RFPOS = ZDELIVERY-VGPOS.

IT_KOMDLGN-MANDT = SY-MANDT.

IT_KOMDLGN-LFART = 'LF'.

IT_KOMDLGN-LFDAT = ZDELIVERY-LFDAT.

IT_KOMDLGN-WADAT = ZDELIVERY-WADAT.

IT_KOMDLGN-MATNR = ZDELIVERY-MATNR.

IT_KOMDLGN-WERKS = ZDELIVERY-ZZ_KDCX.

IT_KOMDLGN-LFIMG = ZDELIVERY-LFIMG.

IT_KOMDLGN-VRKME = ZDELIVERY-VRKME.

IT_KOMDLGN-LGMNG = ZDELIVERY-LGMNG.

IT_KOMDLGN-UMREV = ZDELIVERY-UMREV.

IT_KOMDLGN-VGBEL = ZDELIVERY-VGBEL.

IT_KOMDLGN-VGPOS = ZDELIVERY-VGPOS.

IT_KOMDLGN-CHARG = ZDELIVERY-CHARG.

IT_KOMDLGN-MEINS = ZDELIVERY-MEINS.

IT_KOMDLGN-UMVKZ = ZDELIVERY-UMVKZ.

IT_KOMDLGN-UMVKN = ZDELIVERY-UMVKN.

IT_KOMDLGN-NTGEW = ZDELIVERY-NTGEW.

IT_KOMDLGN-BRGEW = ZDELIVERY-BRGEW.

IT_KOMDLGN-GEWEI = ZDELIVERY-GEWEI.

• IT_KOMDLGN-VOLUM = ZDELIVERY-VOLUM.

• IT_KOMDLGN-VOLEH = ZDELIVERY-VOLEH.

IT_KOMDLGN-PANUM = ZDELIVERY-PANUM.

IT_KOMDLGN-ID = ZDELIVERY-ID.

IT_KOMDLGN-MBDAT = ZDELIVERY-MBDAT.

IT_KOMDLGN-LDDAT = ZDELIVERY-LDDAT.

IT_KOMDLGN-TDDAT = ZDELIVERY-TDDAT.

• IT_KOMDLGN- = ZDELIVERY-.

APPEND IT_KOMDLGN TO IT_KOMDLGN_T.

ENDLOOP.

CALL FUNCTION 'SHP_VL10_DELIVERY_CREATE'

EXPORTING

IF_LEDAT = IF_LEDAT

IF_NUR_VORGABE_POS = IF_NUR_VORGABE_POS

IT_KEY_TO_ENQUE = IT_KEY_TO_ENQUE_T

IT_KOMDLGN = IT_KOMDLGN_T

CHANGING

CX_SD_ORDER = CX_SD_ORDER

CT_VBSK_ALL = CT_VBSK_ALL_T

CT_VBLS = CT_VBLS_T

CT_KEY_LATE = CT_KEY_LATE

CT_VORGABE_DATEN = CT_VORGABE_DATEN_T.

Kindly set to resolved if it helps you..

Regards

Abhii...

[Former Member]

Hello Abhii,

I have seen this code in internet.

But how the internal table ZDELIVERY is getting filled? could u please explain that?

Thank you.

Best Regards,

Sasidhar Reddy Matli.

[kesavadas_thekkillath]

Instead you can use BAPI_DELIVERYPROCESSING_EXEC

Read the documentation.

check