sHelp
                                     GL.BATCH
     i   2
   gl.money.batch.file
     gl.money.batch.corp.summary
     gl.money.batch.accounts
       gl.money.batch.acct.credits
       gl.money.batch.acct.debits
     gl.money.batch.transactions
       gl.money.batch.txn.credits
       gl.money.batch.txn.debits

 Ì     i   2
gl.money.batch.file    (top) 
[urn]
*LB[lb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 urn                          8 URN      L                 lb                                                          
 actual.hash                 27 PINT     R                 *LB[lb]M|16                                                 
 control.amount              12 MONEY    R                 *LB[lb]M|8                                                  
 control.count                4 PINT     R                 *LB[lb]M|10                                                 
 control.hash                27 PINT     R                 *LB[lb]M|9                                                  
 cr.amt                      12 SMONEY   R                 *LB[lb]M["ST"]|3                                            
 cr.cnt                       4 PINT     R                 *LB[lb]M["ST"]|2                                            
 created.device              25 FREE     L                 *LB[lb]M["C"]|3                                             
 created.time                10 FREE     L                 *LB[lb]M["C"]|4                                             
 created.user                10 FREE     L  MIS.USER       *LB[lb]M["C"]|2                                         
 date                         8 DATE     L                 *LB[lb]M|0                                                  
 dr.amt                      12 SMONEY   R                 *LB[lb]M["ST"]|1                                            
 dr.cnt                       4 PINT     R                 *LB[lb]M["ST"]|0                                            
 ext.comment                 50 FREE     L                 *LB[lb]M|4                                                  
 input.by.group               1 YN       L                 *LB[lb]M|17                                                 
 int.comment                 50 FREE     L                 *LB[lb]M|5                                                  
 journal                     10 FREE     L  MIS.GL.JOURNAL *LB[lb]M|1                                              
 last.device.to.use          17 FREE     L                 *LB[lb]M|14                                                 
 last.user.to.use            10 FREE     L  MIS.USER       *LB[lb]M|13                                             
 last.user.to.use.time       10 FREE     L                 *LB[lb]M["C"]|1                                             
 nil.txn.disp                 1 YN       L                 VAL=IF{+@nil.txn[urn,""] "Y";@recur="Y" "N"}                
 number                       3 PINT     R                 *LB[lb]M|2                                                  
 post.to.date                 8 DATE     L                 *LB[lb]M|7                                                  
 post.to.period              10 FREE     L  MIS.GL.PERIOD  *LB[lb]M|6                                              
 posting.device              25 FREE     L                 *LB[lb]M["C"]|6                                             
 posting.time                10 TIME     L                 *LB[lb]M|11                                                 
 posting.user                10 FREE     L  MIS.USER       *LB[lb]M["C"]|5                                         
 re.opened                   12 PINT     R                 *LB[lb]M["C"]|0                                             
 read.from.database          12 FREE     L  MIS.APPL       *LB[lb]M|15                                             
 recur                        1 YN       L                 *LB[lb]M|18                                                 
 rev.cr.amt                  12 SMONEY   R                 *LB[lb]M["ST"]|7                                            
 rev.cr.cnt                   4 PINT     R                 *LB[lb]M["ST"]|6                                            
 rev.dr.amt                  12 SMONEY   R                 *LB[lb]M["ST"]|5                                            
 rev.dr.cnt                   4 PINT     R                 *LB[lb]M["ST"]|4                                            
 sort.id                     26 FREE     L                 VAL=@date:10L_(@journal:12L)_(@number:4R)                   
 status                      10 CHOICE   L                 *LB[lb]M|3                                                  
 summarize.device            25 FREE     L                 *LB[lb]M["C"]|8                                             
 summarize.time              10 FREE     L                 *LB[lb]M["C"]|9                                             
 summarize.user              10 FREE     L  MIS.USER       *LB[lb]M["C"]|7                                         
 summary.batch                8 URN      L  GL.BATCH       *LB[lb]M|12                                             
 tot.cr.amt                  12 SMONEY   R                 VAL=@cr.amt+@rev.cr.amt:2D                                  
 tot.cr.cnt                   4 PINT     R                 VAL=@cr.cnt+@rev.cr.cnt                                     
 tot.dr.amt                  12 SMONEY   R                 VAL=@dr.amt+@rev.dr.amt:2D                                  
 tot.dr.cnt                   4 PINT     R                 VAL=@dr.cnt+@rev.dr.cnt                                     
 Ì      i   2
gl.money.batch.corp.summary    (corp.summary) 
[urn, corp]
*LB[lb]C[gn]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 corp                         4 FREE     L  MIS.GL.CORP    gn                                                      
 corp.balance                12 SMONEY   R                 *LB[lb]C[gn]                                                
 Ì      i   2
gl.money.batch.accounts    (distribution) 
[urn, dis.acct]
*LB[lb]A[lbA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 dis.acct                    25 FREE     L  MIS.GL.ACCOUNT lbA                                                     
 dis.more.than.one.dr.cr                                   VAL=(+@dis.debits[urn,dis.acct,""]'=-@dis.debits[urn,d      
                                                           VAL=is.acct,""]!(+@dis.credits[urn,dis.acct,""]'=-@dis      
                                                           VAL=.credits[urn,dis.acct,""]))                             
 Ì      i   2
gl.money.batch.acct.credits    (dis.credits) 
[urn,dis.acct, dis.cr.txn]
*LB[lb]A[lbA]CR[lbAC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 dis.cr.txn                   4 URN      L                 lbAC                                                        
 dis.cr.amount               12 MONEY    R                 *LB[lb]A[lbA]CR[lbAC]                                       
 Ì      i   2
gl.money.batch.acct.debits    (dis.debits) 
[urn,dis.acct, dis.dr.txn]
*LB[lb]A[lbA]DR[lbAD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 dis.dr.txn                   4 URN      L                 lbAD                                                        
 dis.dr.amount               12 MONEY    R                 *LB[lb]A[lbA]DR[lbAD]                                       
 Ì      i   2
gl.money.batch.transactions    (transactions) 
[urn, txn.number]
*LB[lb]T[lbT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 txn.number                   4 PINT     R                 lbT                                                         
 txn.active                   1 YN       L                 *LB[lb]T[lbT]|0                                             
 txn.desc.disp               50 FREE     L                 VAL=@txn.description[txn.number#"0-"]                       
 txn.description             50 FREE     L                 *LB[lb]T[lbT]|1                                             
 txn.expand.desc             90 FREE     L                 *LB[lb]T[lbT]|2                                             
 txn.grp.cr.sum              12 SMONEY   L                                                                             
 txn.grp.dr.sum              12 SMONEY   L                                                                             
 txn.more.than.one.dr.cr                                   VAL=(+@debits[urn,txn.number,""]'=-@debits[urn,txn.num      
                                                           VAL=ber,""]!(+@credits[urn,txn.number,""]'=-@credits[u      
                                                           VAL=rn,txn.number,""]))                                     
 txn.posted                   1 YN       L                 VAL=IF{@status="POSTED" "Y";"N"}                            
 txn.ven.name.disp           43 FREE     L                 VAL=%GL.BATCH.vendor.name(GL.BATCH.urn,GL.BATCH.txn.nu      
                                                           VAL=mber)                                                   
 Ì      i   2
gl.money.batch.txn.credits    (credits) 
[urn,txn.number, cr.acct]
*LB[lb]T[lbT]CR[lbCR]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cr.acct                     25 FREE     L  MIS.GL.ACCOUNT lbCR                                                    
 cr.acct.desc                35 FREE     L                 VAL=@MIS.GL.ACCOUNT.description[cr.acct]$35                 
 cr.amount                   12 MONEY    R                 *LB[lb]T[lbT]CR[lbCR]                                       
 Ì      i   2
gl.money.batch.txn.debits    (debits) 
[urn,txn.number, dr.acct]
*LB[lb]T[lbT]DR[lbDR]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 dr.acct                     25 FREE     L  MIS.GL.ACCOUNT lbDR                                                    
 dr.acct.desc                35 FREE     L                 VAL=@MIS.GL.ACCOUNT.description[dr.acct]$35                 
 dr.amount                   12 MONEY    R                 *LB[lb]T[lbT]DR[lbDR]                                       
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 gl.money.batch.alloc.x             [post.to.date,date,journal,number] = urn
   alloc.x                            ?LBA[lld,lbD,gj,lbN]

 gl.money.batch.id.x                [date,journal,number] = urn
   id.x                               ?LBI[lbD,gj,lbN]

 gl.money.batch.post.x              [post.to.date,journal,urn]
   post.x                             ?LBP[lld,gj,lb]

 gl.money.batch.recur.x             [sort.id] = urn
   recur.x                            ?LBR[lbSI]