sHelp
                                     MIS.AP.BATCH
     i   2
 top
   int.errors
   transactions
     txn.lines

 Ì     i   2
top
[source,urn]
*(G)GB.KB[gnF,gkb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 source                      12 FREE     L                 gnF                                                         
 urn                          5 PINT     R                 gkb                                                         
 ap.date                      8 DATE     L                 *(G)GB.KB[gnF,gkb]R|1                                       
 ap.db                       12 FREE     L  MIS.APPL.DB    *(G)GB.KB[gnF,gkb]R|0                                   
 ap.errors                    1 YN       L                 *(G)GB.KB[gnF,gkb]R|3                                       
 ap.facility                 10 FREE     L  MIS.PUR.FAC    *(G)GB.KB[gnF,gkb]R|4                                   
 ap.header                   48 FREE     L                 VAL="Read into "_@MIS.AP.BATCH.ap.db_" "_@MIS.AP.BATCH      
                                                           VAL=.ap.facility_" "_%Z.date.out(@MIS.AP.BATCH.ap.date      
                                                           VAL=)_" # "_@MIS.AP.BATCH.ap.number                         
 ap.number                    3 PINT     R                 *(G)GB.KB[gnF,gkb]R|2                                       
 comment                     30 FREE     L                 *(G)GB.KB[gnF,gkb]M|5                                       
 date                         8 DATE     L                 *(G)GB.KB[gnF,gkb]M|0                                       
 facility                    10 FREE     L  MIS.PUR.FAC    *(G)GB.KB[gnF,gkb]M|6                                   
 from.db                     12 FREE     L                                                                             
 from.sender                 12 FREE     L  MIS.XI.SENDER                                                          
 mis.header                  35 FREE     L                 VAL=%Z.date.out(@MIS.AP.BATCH.date)_" "_@MIS.AP.BATCH.      
                                                           VAL=ap.db_" # "_@MIS.AP.BATCH.number_" "_@MIS.AP.BATCH      
                                                           VAL=.status                                                 
 number                       3 PINT     R                 *(G)GB.KB[gnF,gkb]M|1                                       
 status                       7 CHOICE   L                 *(G)GB.KB[gnF,gkb]M|2                                       
 Ì   €   i   2
int.errors
[source,urn,  int.err.type,int.err.seq.no]
*(G)GB.KB[gnF,gkb]M["ER",gkbET,gkbES]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 int.err.type                 4 FREE     L                 gkbET                                                       
 int.err.seq.no               4 PINT     R                 gkbES                                                       
 int.err.amt                 11 SMONEY   R                 *(G)GB.KB[gnF,gkb]M["ER",gkbET,gkbES]|2                     
 int.err.inv.num.id          15 FREE     L                 *(G)GB.KB[gnF,gkb]M["ER",gkbET,gkbES]|1                     
 int.err.scratch             60 PINT     R                 *(G)GB.KB[gnF,gkb]M["ER",gkbET,gkbES]|3                     
 int.err.vendor.id           15 FREE     L                 *(G)GB.KB[gnF,gkb]M["ER",gkbET,gkbES]|0                     
 Ì   €   i   2
transactions
[source,urn,  txn.num]
*(G)GB.KB[gnF,gkb]T[gkbT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.num                      4 PINT     R                 gkbT                                                        
 bar.refund.type              1 CHOICE   L                 *(G)GB.KB[gnF,gkb]T[gkbT]OT|0                               
 txn.comment                 65 FREE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]|9                                 
 txn.crm.mark.as.paid         1 YN       L                 *(G)GB.KB[gnF,gkb]T[gkbT]OT|2                               
 txn.discount                10 SMONEY   R                 *(G)GB.KB[gnF,gkb]T[gkbT]|5                                 
 txn.freight                 10 SMONEY   R                 *(G)GB.KB[gnF,gkb]T[gkbT]|4                                 
 txn.gross                   11 SMONEY   R                 *(G)GB.KB[gnF,gkb]T[gkbT]|2                                 
 txn.inv.auto.hold            1 YN       L                 *(G)GB.KB[gnF,gkb]T[gkbT]OT|1                               
 txn.inv.description         65 FREE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]ID                                 
 txn.inv.inv.date             8 DATE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]IM|3                               
 txn.inv.num.ap              15 FREE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]NC|2                               
 txn.inv.num.ap.err           1 PINT     R                 *(G)GB.KB[gnF,gkb]T[gkbT]NC|3                               
 txn.inv.num.root             9 FREE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]NC|0                               
 txn.inv.num.suf.len          2 PINT     R                 *(G)GB.KB[gnF,gkb]T[gkbT]NC|1                               
 txn.inv.received.date        8 DATE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]IM|5                               
 txn.inv.ref.date             8 DATE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]IM|7                               
 txn.inv.ref.num             12 FREE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]IM|6                               
 txn.inv.remit.addr.1        35 FREE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]IR|2                               
 txn.inv.remit.addr.2        35 FREE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]IR|3                               
 txn.inv.remit.addr.3        35 FREE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]IR|4                               
 txn.inv.remit.addr.alt      35 FREE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]IR["ALT"]|0                        
 txn.inv.remit.name          35 FREE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]IR|0                               
 txn.inv.remit.name.2        35 FREE     L                 *(G)GB.KB[gnF,gkb]T[gkbT]IR|1                               
 txn.inv.type                 3 CHOICE   L                 *(G)GB.KB[gnF,gkb]T[gkbT]IM|4                               
 txn.inv.vendor              11 FREE     L  MIS.VEN        *(G)GB.KB[gnF,gkb]T[gkbT]IM|0                           
 txn.mc.payee.type           10 FREE     L  MIS.PAYEE.TYPE *(G)GB.KB[gnF,gkb]T[gkbT]|15                            
 txn.payment                 11 SMONEY   R                 *(G)GB.KB[gnF,gkb]T[gkbT]|6                                 
 txn.tax                     10 SMONEY   R                 *(G)GB.KB[gnF,gkb]T[gkbT]|3                                 
 txn.tax.1                   10 SMONEY   R                 *(G)GB.KB[gnF,gkb]T[gkbT]|13                                
 txn.tax.2                   10 SMONEY   R                 *(G)GB.KB[gnF,gkb]T[gkbT]|14                                
 Ì   €   i   2
txn.lines
[source,urn,txn.num,  txn.il.line]
*(G)GB.KB[gnF,gkb]T[gkbT]L[gkbL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.il.line                  4 PINT     R                 gkbL                                                        
 txn.il.account              25 FREE     L  MIS.GL.ACCOUNT *(G)GB.KB[gnF,gkb]T[gkbT]L[gkbL]|0                      
 txn.il.dis.corp              4 FREE     L  MIS.GL.CORP    *(G)GB.KB[gnF,gkb]T[gkbT]L[gkbL]|14                     
 txn.il.freight              10 SMONEY   R                 *(G)GB.KB[gnF,gkb]T[gkbT]L[gkbL]|2                          
 txn.il.gross                11 SMONEY   R                 *(G)GB.KB[gnF,gkb]T[gkbT]L[gkbL]|1                          
 txn.il.tax.1                10 SMONEY   R                 *(G)GB.KB[gnF,gkb]T[gkbT]L[gkbL]|4                          
 txn.il.tax.2                10 SMONEY   R                 *(G)GB.KB[gnF,gkb]T[gkbT]L[gkbL]|5                          
 txn.il.tax.code              3 FREE     L  MIS.TAX.CODE   *(G)GB.KB[gnF,gkb]T[gkbT]L[gkbL]|3                      

 Index Files                        Subscripts/Physical Base

 ap.db.x                            [source,ap.db,date,number] = urn
                                      ?(G)GB.KBA[gnF,gn,gkbD,gkbN]

 date.x                             [source,date,ap.db,number] = urn
                                      ?(G)GB.KBD[gnF,gkbD,gn,gkbN]