Problem with ORDERS05

[Former Member]

Hi there,

I am using ORDERS05 as the basic type in an IDOC to create sales orders, in the segment E1EDKA1 WE i have a field called STRS2 and I presumed that the contents of this field would be mapped to STR_SUPPL1 in the SAP sales order application area.

The order creates fine and everything is in place except for this street2 value that does not seem to be maintained for the ship-to party in the address tab, other values on the incoming IDOC update on the ship-to party tab but not STR_SUPPL1, the contents of this field remain the same

Has anyone come across this problem before ??

Kind Regards,

Conor.

[naimesh_patel]

If you check the documentation of the ORDERS05, Segment E1EDKA1, it says like:

STRS2 : Street and house number 2 
internal data type : CHAR
Internal length : 000035 characters
Position in segment : 009, Offset : 0275. external length : 000035

Regards,

Naimesh Patel

[Former Member]

Thanks Naimesh,

I had checked that already via WE30 and viewed the documentaion through the HTML view.

The hassle with this is that when the IDOC post through to SAP it does not update/maintain the STR_SUPPL1 fiels with the data from the IDOC, I am presuming that the contents of STRS2 will update the contents of STR_SUPPL1. (street2 on the ship-to party)

Maybe I'm wong, I'm not sure

Conor

Edited by: Conor O'Neill on Oct 1, 2008 5:13 PM

[Former Member]

Hi,

Search in OSS Notes..with the key word..E1EDKA1-STRS2...I am getting 5 ossnotes...please check if any of them is applicable to you..

Thanks

Naren

[S0004562014]

Hi all,

if you look at form 'dynpro_kopfpartner_detail' in include 'LVEDAF19',

you’ll see strs2 is missing. So add it on your own by using enhancement VEDA0001 (SMOD) -> Function module “EXIT_SAPLVEDA_002”.

For example add strs2 this way, just an idea, many other ways:

FIELD-SYMBOLS: <lfs_e1edka1>  TYPE e1edka1,

               <lfs_idocdata> LIKE LINE OF didoc_data.

DATA: la_cdata LIKE LINE OF dxbdcdata,

      lf_tabix TYPE sytabix,

      lf_done  TYPE boolean.

*-Have i already inserted Street2?

READ TABLE dxbdcdata TRANSPORTING NO FIELDS

                                        WITH KEY fnam = 'ADDR1_DATA-STR_SUPPL1'."

IF sy-subrc EQ 0. EXIT. ENDIF.

*-Is current party ShipToParty?

READ TABLE dxbdcdata TRANSPORTING NO FIELDS WITH KEY fnam = 'DV_PARVW'

                                                                                             fval = 'WE'."reached already SP?

IF sy-subrc NE 0.

  EXIT.

ELSE.

  lf_tabix = sy-tabix."Startrow -> step down

ENDIF.

*-Find StartDynpro

LOOP AT dxbdcdata TRANSPORTING NO FIELDS WHERE program EQ 'SAPLV09C'

                                                                                    AND dynbegin EQ 'X'.

  CHECK sy-tabix GT lf_tabix. "Find ShipToBlock

  lf_tabix = sy-tabix.

*-Get Street two from Idoc

  LOOP AT didoc_data ASSIGNING <lfs_idocdata> WHERE segnam EQ 'E1EDKA1'.

    IF lf_done EQ 'X'.

      EXIT.

    ENDIF.

    ASSIGN <lfs_idocdata>-sdata TO <lfs_e1edka1> CASTING.

    IF <lfs_e1edka1> IS ASSIGNED AND <lfs_e1edka1>-parvw EQ 'WE' AND

           <lfs_e1edka1>-strs2 NE space.

      la_cdata-fnam = 'ADDR1_DATA-STR_SUPPL1'."yes, this is street2

      la_cdata-fval = <lfs_e1edka1>-strs2.

      ADD 1 TO lf_tabix.

      INSERT la_cdata INTO dxbdcdata INDEX lf_tabix.

      lf_done = 'X'.

      EXIT.

    ENDIF.

  ENDLOOP.

ENDLOOP.