Information Systems:IMP - Inbound Message Parsing

Job IMPPOSTPRD, which is program IMPNEP01CL (IMP-Parse Inbound POP Email Msgs), runs all day in subsystem IMPSUBPRD.

RPG program IMPNEP01 does some validation of files IMSMHDP () and IMSLINP (), then calls IMPPAR01 () to extract order fields from the X12 format, and write IMPOHDP (IMP-Inbound Parsing Order Header File) and IMPLINP (IMP-Inbound Parsing Order Lines File).

IMPNEP01 uses file IMPXRFP (IMP-EOB To Customer Code X-Ref File) to try to determine the ASW partner number of the store submitting the order. See History for an explanation of this file. Some stores have their ASW partner number as the EOB number in this file. Then in the beginning of 2016, we changed this program to check against SRONAM (Name file) if the number in the order is not in IMPXRFP.

In this example, the store has an EOB number of '504' (in the N1 segment).

 3/15/16  13:18:28    uniPHARM -- PRODUCTION               IMRIQ070/LISTCTL    
                      IMS -- Show message lines            PRODUCTION  1.00    
Message #                                                                      
 598350   X12 PO                                                               
          OWL@UNIPHARM.COM                                                     
          66.183.181.88              Date Added         Date Sent              
                                     MAR 15 16 13:16:54 MAR 15 16 13:15:08     
   IMP Order#                                                                  
      596264       1         2         3         4         5                   
                   0         0         0         0         0                   
      6   ~REF*4A*1000                                                         
                                                                               
      7   ~DTM*010*160315                                                      
                                                                               
      8   ~N1*BS*OWL DRUGS*91*504                                              
                                                                               
      9   ~N2*KEN LEUNG*03921                                                  
                                                                               
     10   ~N3*199 EAST HASTINGS ST*KEN LEUNG(03921)                            
                                                                               
                                                                               
 F3=Exit   F5=Refresh   F7=Prev Message  F8=Next Message   F12=Previous