sHelp
                                     MM.EDI.PC
     i   2
   mm.edi.pc.main
     mm.edi.pc.price.changes
     mm.edi.pc.rcv.file

 Ì     i   2
mm.edi.pc.main    (main) 
[urn]
:MJPC[mjpc]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 urn                          8 URN      L                 mjpc                                                        
 comment                     30 FREE     L                 :MJPC[mjpc]|3                                               
 program                     15 FREE     L  MM.EDI.PROGRAM :MJPC[mjpc]|2                                           
 rcv.date                     8 DATE     L                 :MJPC[mjpc]|1                                               
 status                       9 CHOICE   L                 :MJPC[mjpc]|0                                               

 Ì   €�   i   2
mm.edi.pc.price.changes    (price.changes) 
[urn, change.seq.no]
:MJPC[mjpc]D[mjpcn]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 change.seq.no                4 PINT     R                 mjpcn                                                       
 approve                      1 YN       L                 :MJPC[mjpc]D[mjpcn]|10                                      
 current.cost                10 DEC4     R                 VAL=IF{@item.urn^MM.ITEM.item.urn,@vendor^MM.ITEM.vend      
                                                           VAL=or.no,@MM.ITEM.crnt.pkging^MM.ITEM.vend.pkg.no @MM      
                                                           VAL=.ITEM.vend.cost.up}                                     
 effective.date               8 DATE     L                 :MJPC[mjpc]D[mjpcn]|2                                       
 error.flag                   1 FREE     L                 :MJPC[mjpc]D[mjpcn]|13                                      
 expiration.date              8 DATE     L                 :MJPC[mjpc]D[mjpcn]|3                                       
 item.desc                   30 FREE     L                 :MJPC[mjpc]D[mjpcn]|6                                       
 item.no                     10 FREE     L                 :MJPC[mjpc]D[mjpcn]|4                                       
 item.urn                    43 URN      L  MM.ITEM        :MJPC[mjpc]D[mjpcn]|5                                   
 new.cost                    10 DEC4     R                 :MJPC[mjpc]D[mjpcn]|8                                       
 old.cost                    10 DEC4     R                 :MJPC[mjpc]D[mjpcn]|7                                       
 post.date                    8 DATE     L                 :MJPC[mjpc]D[mjpcn]|11                                      
 rcv.error.flag               1 FREE     L                 :MJPC[mjpc]D[mjpcn]|12                                      
 um                           4 FREE     L                 :MJPC[mjpc]D[mjpcn]|9                                       
 vend.cat.no                 15 FREE     L                 :MJPC[mjpc]D[mjpcn]|1                                       
 vendor                      11 FREE     L  MIS.VEN        :MJPC[mjpc]D[mjpcn]|0                                   

 Ì   €�   i   2
mm.edi.pc.rcv.file    (rcv.file) 
[urn, rcv.file.seq.no]
:MJPC[mjpc]RCV[mjpcF]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 rcv.file.seq.no              6 PINT     R                 mjpcF                                                       
 rcv.file.record            200 FREE     L                 :MJPC[mjpc]RCV[mjpcF]|0                                     

 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 mm.edi.pc.effective.date.index     [effective.date,urn,change.seq.no]
   effective.date.x                   :MJPCX[mjpcD,mjpc,mjpcn]