sHelp
                                     MM.PO.ACK
     i   2
   mm.po.ack.main
     mm.po.ack.comments
     mm.po.ack.lines
       mm.po.ack.line.comments

 Ì     i   2
mm.po.ack.main    (main) 
[urn]
*MJC[mjc]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 urn                          8 URN      L                 mjc                                                         
 ack.type                     6 CHOICE   L                 *MJC[mjc]|6                                                 
 cust.code                   12 FREE     L                 *MJC[mjc]|5                                                 
 edi.urn                      8 URN      L  MM.EDI         *MJC[mjc]|0                                             
 error.flag                   1 FREE     L                 *MJC[mjc]|20                                                
 po.date                      8 DATE     L                 *MJC[mjc]|8                                                 
 po.number                   10 FREE     L                 *MJC[mjc]|7                                                 
 po.shipped.date              8 DATE     L                 *MJC[mjc]|11                                                
 po.urn                      30 URN      L  MM.PO          *MJC[mjc]|1                                             
 po.will.ship.date            8 DATE     L                 *MJC[mjc]|12                                                
 program                     15 FREE     L  MM.EDI.PROGRAM *MJC[mjc]|13                                            
 received.date                8 DATE     L                 *MJC[mjc]|3                                                 
 received.time                4 HHMM     L                 *MJC[mjc]|4                                                 
 show.vendor                 12 FREE     L                 VAL=IF{@vendor;@vendor.raw.data}                            
 vendor                      11 FREE     L  MIS.VEN        *MJC[mjc]|2                                             
 vendor.raw.data             12 FREE     L                 *MJC[mjc]|14                                                
 vendors.ack.date             8 DATE     L                 *MJC[mjc]|10                                                
 vendors.order.no            22 FREE     L                 *MJC[mjc]|9                                                 
 Ì     i   2
mm.po.ack.comments    (comments) 
[urn, comment.seq.no]
*MJC[mjc]B[mjcB]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 comment.seq.no               4 PINT     R                 mjcB                                                        
 comment.text                80 FREE     L                 *MJC[mjc]B[mjcB]|0                                          
 comment.text.indent         80 FREE     L                 VAL=(IF{L(@comment.text^XXX)'>76 "    "}_XXX)            
 Ì     i   2
mm.po.ack.lines    (lines) 
[urn, line.no]
*MJC[mjc]L[mjcL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 line.no                      4 PINT     R                 mjcL                                                        
 changed.item.no             10 FREE     L                 *MJC[mjc]L[mjcL]|16                                         
 changed.item.urn            43 URN      L  MM.ITEM        *MJC[mjc]L[mjcL]|17                                     
 changed.manuf               15 FREE     L                 *MJC[mjc]L[mjcL]|13                                         
 changed.price               10 DEC4     R                 *MJC[mjc]L[mjcL]|9                                          
 changed.qty                  7 INT      R                 *MJC[mjc]L[mjcL]|5                                          
 changed.um                   4 FREE     L                 *MJC[mjc]L[mjcL]|7                                          
 changed.vend.catlg          15 FREE     L                 *MJC[mjc]L[mjcL]|11                                         
 changes.made                 1 YN       L                 *MJC[mjc]L[mjcL]|2                                          
 line.bo.qty                  7 INT      R                 *MJC[mjc]L[mjcL]S|4                                         
 line.ship.date.literal      10 FREE     L                 *MJC[mjc]L[mjcL]S|5                                         
 line.ship.qty                7 INT      R                 *MJC[mjc]L[mjcL]S|3                                         
 line.ship.status             9 CHOICE   L                 *MJC[mjc]L[mjcL]S|0                                         
 line.shipped.date            8 DATE     L                 *MJC[mjc]L[mjcL]S|1                                         
 line.status                  6 CHOICE   L                 *MJC[mjc]L[mjcL]|0                                          
 line.will.ship.date          8 DATE     L                 *MJC[mjc]L[mjcL]S|2                                         
 ord.item.no                 10 FREE     L                 *MJC[mjc]L[mjcL]|14                                         
 ord.item.urn                43 URN      L  MM.ITEM        *MJC[mjc]L[mjcL]|15                                     
 ord.manuf                   15 FREE     L                 *MJC[mjc]L[mjcL]|12                                         
 ord.price                   10 DEC4     R                 *MJC[mjc]L[mjcL]|8                                          
 ord.qty                      7 INT      R                 *MJC[mjc]L[mjcL]|4                                          
 ord.um                       4 FREE     L                 *MJC[mjc]L[mjcL]|6                                          
 ord.vend.catlg              15 FREE     L                 *MJC[mjc]L[mjcL]|10                                         
 price.change                 1 YN       L                 *MJC[mjc]L[mjcL]|1                                          
 substitution.made            1 YN       L                 *MJC[mjc]L[mjcL]|3                                          
 Ì     i   2
mm.po.ack.line.comments    (line.comments) 
[urn,line.no, line.comment.seq.no]
*MJC[mjc]L[mjcL]C[mjcC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 line.comment.seq.no          4 PINT     R                 mjcC                                                        
 line.comment.text           80 FREE     L                 *MJC[mjc]L[mjcL]C[mjcC]|0                                   
 line.comment.text.indent    80 FREE     L                 VAL=(IF{L(@line.comment.text^XXX)'>76 "    "}_XXX)       
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 mm.po.ack.print.list               [urn]
   print.list                         /MJCP[mjc]