sHelp
                                     MM.EDI
     i   2
 main
   send.file
   send.po.list
     send.po.lines
   vendors

 Ì   €   i   2
main
[urn]
*(M)MJA[mja]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 urn                          8 URN      L                 mja                                                         
 edi.q.disp                  10 FREE     L                 VAL=IF{@edi.q.type=0 "STD";"JIT"}                           
 edi.q.type                   3 PINT     R                 *(M)MJA[mja]|8                                              
 end.date                     8 DATE     L                 *(M)MJA[mja]|4                                              
 end.time                     4 HHMM     L                 *(M)MJA[mja]|5                                              
 number.sent                  4 PINT     R                 *(M)MJA[mja]|6                                              
 program                     15 FREE     L  MM.EDI.PROGRAM *(M)MJA[mja]|0                                          
 start.date                   8 DATE     L                 *(M)MJA[mja]|2                                              
 start.time                   4 HHMM     L                 *(M)MJA[mja]|3                                              
 status                       7 CHOICE   L                 *(M)MJA[mja]|1                                              
 xo.msg.status               12 FREE     L                 VAL=@MIS.XO.MSG.status[@xo.msg.urn]                         
 xo.msg.urn                   8 PINT     R  MIS.XO.MSG     *(M)MJA[mja]|7                                          
 Ì   €   i   2
send.file
[urn,  send.file.seq.no]
*(M)MJA[mja]XMT[mjaX]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 send.file.seq.no             6 PINT     R                 mjaX                                                        
 send.file.record           200 FREE     L                 *(M)MJA[mja]XMT[mjaX]|0                                     
 Ì   €   i   2
send.po.list
[urn,  send.po]
*(M)MJA[mja]XPO[mp]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 send.po                     30 URN      L  MM.PO          mp                                                      
 send.entire.po               1 YN       L                 *(M)MJA[mja]XPO[mp]|0                                       
 send.po.last.line            4 PINT     R                 *(M)MJA[mja]XPO[mp]|1                                       
 send.po.tot                 11 DEC4     R                 *(M)MJA[mja]XPO[mp]|2                                       
 send.po.value               11 SMONEY   R                 VAL=(@p.MM.EDI.send.po.tot:2D)                              
 Ì   €   i   2
send.po.lines
[urn,send.po,  send.po.line]
*(M)MJA[mja]XPO[mp]L[mjaL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 send.po.line                 4 PINT     R                 mjaL                                                        
 send.po.line.tot.ord.us      7 INT      R                 *(M)MJA[mja]XPO[mp]L[mjaL]|0                                
 Ì   €   i   2
vendors
[urn,  vendor]
*(M)MJA[mja]V[gr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 vendor                      11 FREE     L  MIS.VEN        gr                                                      
 vendor.name                 35 FREE     L                 VAL=@MIS.VEN.name                                           

 Index Files                        Subscripts/Physical Base

 qt.x                               [edi.q.type,urn]
                                      ?(M)MJAQT[mjQT,mja]