ALE message VG203

Question

Hi to all,
My scenario is the automatic creation of Sales order to my SAP system by tranlating a PO from another SAP system through ALE.
I have used message type ORDERS and I have the following problem.
The Idoc passed correctly to the receiver system but with status 51 (the doc. has not been posted). Double clicking on the status I have the message "The material number for item 000010 could not be identified".
I have already created a customer info record to the receiver system and the weird thing is that whenever i use tcode WE19 and  manually run (foregroung) the relevant inbound function module (IDOC_INPUT_ORDERS) the document is posted without any problem.
Could someone give me an explanation?
Thanks in advance.
GA

Answer 1

My solution is to switch SH (resp. WE in german)  to SP (resp. AG in german) and vice-versa and looks as follows.
In include LVEDAF23 / FORM determine_material I added the following enhancements:
FORM determine_material.
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1 ) Form DETERMINE_MATERIAL, Anfang                                                                                                              D
*$*$-Start: (1 )--------------------------------------------------------------------------------$*$*
ENHANCEMENT 21  Z_DETERMINE_MATERIAL_01.    "active version
  DATA: ls_xvbadr like xvbadr,
        le_kunnr_ag TYPE kunnr,
        le_kunnr_we TYPE kunnr.
  LOOP AT xvbadr INTO ls_xvbadr.
    CASE ls_xvbadr-parvw.
      WHEN 'AG'.
        le_kunnr_ag = ls_xvbadr-kunnr.
      WHEN 'WE'.
        le_kunnr_we = ls_xvbadr-kunnr.
      WHEN OTHERS.
    ENDCASE.
  ENDLOOP.
  xvbak-kunnr = le_kunnr_we.
ENDENHANCEMENT.
*$*$-End:   (1 )--------------------------------------------------------------------------------$*$*
* ... original SAP code
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(2 ) Form DETERMINE_MATERIAL, Ende                                                                                                                D
*$*$-Start: (2 )--------------------------------------------------------------------------------$*$*
ENHANCEMENT 22  Z_DETERMINE_MATERIAL_01.    "active version
  xvbak-kunnr = le_kunnr_ag.
ENDENHANCEMENT.
*$*$-End:   (2 )--------------------------------------------------------------------------------$*$*
ENDFORM.                               " DETERMINE_MATERIAL
In include MV45AFZB / FORM userexit_cust_material_read I implemented the according User-Exit (using enhancement technology)
FORM userexit_cust_material_read USING us_kunnr.
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1 ) Form USEREXIT_CUST_MATERIAL_READ, Anfang                                                                                                     D
*$*$-Start: (1 )--------------------------------------------------------------------------------$*$*
ENHANCEMENT 348  Z_CUST_MATERIAL_READ.    "active version
  DATA: ls_xvbpa LIKE LINE OF xvbpa,
        le_kunnr_ag TYPE kunnr,
        le_kunnr_we TYPE kunnr.
  LOOP AT xvbpa INTO ls_xvbpa.
    CASE ls_xvbpa-parvw.
      WHEN 'AG'.
        le_kunnr_ag = ls_xvbpa-kunnr.
      WHEN 'WE'.
        le_kunnr_we = ls_xvbpa-kunnr.
      WHEN OTHERS.
    ENDCASE.
  ENDLOOP.
  us_kunnr = le_kunnr_we.
ENDENHANCEMENT.
*$*$-End:   (1 )--------------------------------------------------------------------------------$*$*
* US_KUNNR = xxxx-zzfield1.
ENDFORM.                    "USEREXIT_CUST_MATERIAL_READ
Hope this helps
Regards
Markus