Inbound idoc mess type:DESADV basic type: DELVRY03 Item text

Question

Hi all,
W're having a inbound process to create inbound deliveries via IDOC.
mess type:DESADV basic type: DELVRY03 
We want to create a item text on the delivery via the IDOC.  Is this possible?
I see that there's a segment E1TXTH9 - E1TXTP9  to put in texts.
But as I see it, to create a text, we have to give the delivery nr in TDOBJECT TDOBNAME TDID  TDSPRAS LANGUA_ISO.
But since we are creating it, this is not possible.
Is there any way to create an item text on an inbound delivery via the IDOC?  And how.
Thanks a lot!
Caroline,

Answer 1

Hi Chris,
Before end of the ur functiond module (Idoc_input_xxxxxxx) create an Enhnacement spot  . at this point I hope so delivey will be created already .so now u can get the delivery number
**********The Logic for Text Field filling*******************
IF NOT  vbeln IS INITIAL.
DATA : L_FNAME TYPE THEAD-TDNAME,
       L_FID TYPE THEAD-TDID,
       IT_TLINE  TYPE TABLE OF TLINE,
       WA_TLINE LIKE LINE OF IT_TLINE.
CONSTANTS :C_FID TYPE THEAD-TDID VALUE '0004',
           C_FID1 TYPE THEAD-TDID VALUE '0007',
           c_Text(40) type c value 'xxxxxxxxx',
           C_LANG  TYPE THEAD-TDSPRAS value 'E',
           C_FOBJECT TYPE  THEAD-TDOBJECT VALUE 'BELEG',
           C_FFORMAT TYPE TLINE-TDFORMAT VALUE '*'.
Reading  the Idoc data table for Text field population
     READ TABLE IDOC_dATA INTO IS_EDIDD
                          WITH KEY SEGNAM =  c_segnam_e1edkt2.
     MOVE IS_EDIDD-SDATA TO IS_E1EDKT2.
     CONCATENATE mrm_RBKPV-BUKRS mrm_BELNR mrm_GJAHR  INTO L_FNAME.
     if sy-subrc = 0.
       MOVE: IS_E1EDKT2-TDLINE TO WA_TLINE-TDLINE,
             C_FFORMAT TO  WA_TLINE-TDFORMAT.
             APPEND WA_TLINE TO IT_TLINE.
          CALL FUNCTION 'CREATE_TEXT'
            EXPORTING
              fid               = c_FID
              flanguage         = C_LANG
              fname             = L_FNAME
              fobject           = C_FOBJECT
              SAVE_DIRECT       = C_X
             FFORMAT            = C_FFORMAT
            tables
              flines            = IT_TLINE
          EXCEPTIONS
            NO_INIT           = 1
            NO_SAVE           = 2
            OTHERS            = 3
          IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
          ENDIF.
I hope it resolves ur problem.Please let me know if u have any
Queries.
Rgds
Sree m