sHelp
                                     GL.BATCH
     i   2
 ccs.batch.cr.queue
 ccs.corp.rollup.file
   ccs.crf.money.bchs.in
   ccs.crf.money.bchs.out
   ccs.crf.stats.bchs.in
   ccs.crf.stats.bchs.out
 top
   group.list
   ccs.batch.cr.files
   corp.summary
   distribution
     dis.credits
     dis.debits
   transactions
     credits
     debits

 Ì     i   2
ccs.batch.cr.queue
[ccs.bcrq.urn]
*(L)LBCCSCRQ[lb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ccs.bcrq.urn                 8 PINT     R                 lb                                                          
 ccs.bcrq.date                8 DATE     L                 *(L)LBCCSCRQ[lb]|0                                          
 ccs.bcrq.journal            10 FREE     L  MIS.GL.JOURNAL *(L)LBCCSCRQ[lb]|1                                      
 ccs.bcrq.number              3 PINT     R                 *(L)LBCCSCRQ[lb]|2                                          
 Ì     i   2
ccs.corp.rollup.file
[ccs.cr.feeder.gl,ccs.cr.file.num]
*(L)LBCCSCR[lbZFG,lbZFN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ccs.cr.feeder.gl            12 FREE     L                 lbZFG                                                       
 ccs.cr.file.num              5 PINT     R                 lbZFN                                                       
 ccs.cr.ack.xo.msg.urn        8 PINT     R  MIS.XO.MSG     *(L)LBCCSCR[lbZFG,lbZFN]|12                             
 ccs.cr.create.date           8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]|1                                  
 ccs.cr.create.time           4 HHMM     L                 *(L)LBCCSCR[lbZFG,lbZFN]|2                                  
 ccs.cr.cur.per.end.dt        8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]|3                                  
 ccs.cr.for.date              8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]|13                                 
 ccs.cr.last.dt.closed        8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]|4                                  
 ccs.cr.mon.rollup.mode      16 CHOICE   L                 *(L)LBCCSCR[lbZFG,lbZFN]|5                                  
 ccs.cr.num.mon.bch.out       3 PINT     R                 *(L)LBCCSCR[lbZFG,lbZFN]|7                                  
 ccs.cr.num.stt.bch.out       3 PINT     R                 *(L)LBCCSCR[lbZFG,lbZFN]|8                                  
 ccs.cr.rcv.date              8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]|10                                 
 ccs.cr.rcv.time              4 HHMM     L                 *(L)LBCCSCR[lbZFG,lbZFN]|11                                 
 ccs.cr.recrte.file.dt        8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]|16                                 
 ccs.cr.recrte.file.num       5 PINT     R                 *(L)LBCCSCR[lbZFG,lbZFN]|14                                 
 ccs.cr.recrte.file.tm        4 HHMM     L                 *(L)LBCCSCR[lbZFG,lbZFN]|17                                 
 ccs.cr.recrte.params         8 CHOICE   L                 *(L)LBCCSCR[lbZFG,lbZFN]|15                                 
 ccs.cr.sk1                   8 FREE     L                                                                             
 ccs.cr.sk2                   8 FREE     L                                                                             
 ccs.cr.status               12 CHOICE   L                 *(L)LBCCSCR[lbZFG,lbZFN]|0                                  
 ccs.cr.status.display       16 FREE     L                 VAL=IF{@ccs.cr.status="MSG" "MSG "_@MIS.XO.MSG.status[      
                                                           VAL=@ccs.cr.xo.msg.urn];@ccs.cr.status}                     
 ccs.cr.stt.rollup.mode      16 CHOICE   L                 *(L)LBCCSCR[lbZFG,lbZFN]|6                                  
 ccs.cr.xo.msg.urn            8 PINT     R  MIS.XO.MSG     *(L)LBCCSCR[lbZFG,lbZFN]|9                              
 Ì   €   i   2
ccs.crf.money.bchs.in
[ccs.cr.feeder.gl,ccs.cr.file.num,  ccs.crf.mbi.urn]
*(L)LBCCSCR[lbZFG,lbZFN]MBI[lb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ccs.crf.mbi.urn              8 PINT     R                 lb                                                          
 ccs.crf.mbi.credits         12 MONEY    R                 *(L)LBCCSCR[lbZFG,lbZFN]MBI[lb]|6                           
 ccs.crf.mbi.date             8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]MBI[lb]|0                           
 ccs.crf.mbi.debits          12 MONEY    R                 *(L)LBCCSCR[lbZFG,lbZFN]MBI[lb]|5                           
 ccs.crf.mbi.journal         10 FREE     L  MIS.GL.JOURNAL *(L)LBCCSCR[lbZFG,lbZFN]MBI[lb]|1                       
 ccs.crf.mbi.mbo.number       3 PINT     R                 *(L)LBCCSCR[lbZFG,lbZFN]MBI[lb]|7                           
 ccs.crf.mbi.number           3 PINT     R                 *(L)LBCCSCR[lbZFG,lbZFN]MBI[lb]|2                           
 ccs.crf.mbi.post.to.dt       8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]MBI[lb]|3                           
 ccs.crf.mbi.read.fr.db      12 FREE     L  MIS.APPL.DB    *(L)LBCCSCR[lbZFG,lbZFN]MBI[lb]|4                       
 Ì   €   i   2
ccs.crf.money.bchs.out
[ccs.cr.feeder.gl,ccs.cr.file.num,  ccs.crf.mbo.num]
*(L)LBCCSCR[lbZFG,lbZFN]MBO[lbZMO]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ccs.crf.mbo.num              3 PINT     R                 lbZMO                                                       
 ccs.crf.mbo.credits         12 MONEY    R                 *(L)LBCCSCR[lbZFG,lbZFN]MBO[lbZMO]|5                        
 ccs.crf.mbo.date             8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]MBO[lbZMO]|0                        
 ccs.crf.mbo.debits          12 MONEY    R                 *(L)LBCCSCR[lbZFG,lbZFN]MBO[lbZMO]|4                        
 ccs.crf.mbo.journal         10 FREE     L  MIS.GL.JOURNAL *(L)LBCCSCR[lbZFG,lbZFN]MBO[lbZMO]|1                    
 ccs.crf.mbo.post.to.dt       8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]MBO[lbZMO]|2                        
 ccs.crf.mbo.read.fr.db      12 FREE     L  MIS.APPL.DB    *(L)LBCCSCR[lbZFG,lbZFN]MBO[lbZMO]|3                    
 ccs.crf.mbo.to.journal      10 FREE     L  MIS.GL.JOURNAL *(L)LBCCSCR[lbZFG,lbZFN]MBO[lbZMO]|7                    
 ccs.crf.mbo.to.number        3 PINT     R                 *(L)LBCCSCR[lbZFG,lbZFN]MBO[lbZMO]|8                        
 ccs.crf.mbo.to.status        7 CHOICE   L                 *(L)LBCCSCR[lbZFG,lbZFN]MBO[lbZMO]|9                        
 ccs.crf.mbo.to.urn           8 PINT     R                 *(L)LBCCSCR[lbZFG,lbZFN]MBO[lbZMO]|6                        
 Ì   €   i   2
ccs.crf.stats.bchs.in
[ccs.cr.feeder.gl,ccs.cr.file.num,  ccs.crf.sbi.urn]
*(L)LBCCSCR[lbZFG,lbZFN]SBI[lt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ccs.crf.sbi.urn              8 FREE     L                 lt                                                          
 ccs.crf.sbi.date             8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]SBI[lt]|0                           
 ccs.crf.sbi.journal         10 FREE     L  MIS.GL.JOURNAL *(L)LBCCSCR[lbZFG,lbZFN]SBI[lt]|1                       
 ccs.crf.sbi.number           4 FREE     L                 *(L)LBCCSCR[lbZFG,lbZFN]SBI[lt]|2                           
 ccs.crf.sbi.post.to.dt       8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]SBI[lt]|3                           
 ccs.crf.sbi.read.fr.db      12 FREE     L  MIS.APPL.DB    *(L)LBCCSCR[lbZFG,lbZFN]SBI[lt]|4                       
 ccs.crf.sbi.sbo.number       3 PINT     R                 *(L)LBCCSCR[lbZFG,lbZFN]SBI[lt]|6                           
 ccs.crf.sbi.total           12 SDEC2    R                 *(L)LBCCSCR[lbZFG,lbZFN]SBI[lt]|5                           
 Ì   €   i   2
ccs.crf.stats.bchs.out
[ccs.cr.feeder.gl,ccs.cr.file.num,  ccs.crf.sbo.num]
*(L)LBCCSCR[lbZFG,lbZFN]SBO[lbZSO]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ccs.crf.sbo.num              3 PINT     R                 lbZSO                                                       
 ccs.crf.sbo.date             8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]SBO[lbZSO]|0                        
 ccs.crf.sbo.journal         10 FREE     L  MIS.GL.JOURNAL *(L)LBCCSCR[lbZFG,lbZFN]SBO[lbZSO]|1                    
 ccs.crf.sbo.post.to.dt       8 DATE     L                 *(L)LBCCSCR[lbZFG,lbZFN]SBO[lbZSO]|2                        
 ccs.crf.sbo.read.fr.db      12 FREE     L  MIS.APPL.DB    *(L)LBCCSCR[lbZFG,lbZFN]SBO[lbZSO]|3                    
 ccs.crf.sbo.to.journal      10 FREE     L  MIS.GL.JOURNAL *(L)LBCCSCR[lbZFG,lbZFN]SBO[lbZSO]|6                    
 ccs.crf.sbo.to.number        4 FREE     L                 *(L)LBCCSCR[lbZFG,lbZFN]SBO[lbZSO]|7                        
 ccs.crf.sbo.to.status        7 CHOICE   L                 *(L)LBCCSCR[lbZFG,lbZFN]SBO[lbZSO]|8                        
 ccs.crf.sbo.to.urn           8 PINT     R                 *(L)LBCCSCR[lbZFG,lbZFN]SBO[lbZSO]|5                        
 ccs.crf.sbo.total           12 SDEC2    R                 *(L)LBCCSCR[lbZFG,lbZFN]SBO[lbZSO]|4                        
 Ì     i   2
top
[urn]
$(L1)LB[lb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 urn                          8 URN      L                 lb                                                          
 actual.count                 5 PINT     R                 $(L1)LB[lb]M|21                                             
 actual.credits              12 MONEY    R                 $(L1)LB[lb]M|20                                             
 actual.debits               12 MONEY    R                 $(L1)LB[lb]M|19                                             
 actual.hash                 30 PINT     R                 $(L1)LB[lb]M|16                                             
 ccs.bcrf.feeder.gl          12 FREE     L                 $(L1)LB[lb]CCSCR|0                                          
 ccs.bcrf.file.num            5 PINT     R                 $(L1)LB[lb]CCSCR|1                                          
 control.amount              12 MONEY    R                 $(L1)LB[lb]M|8                                              
 control.count                5 PINT     R                 $(L1)LB[lb]M|10                                             
 control.hash                30 PINT     R                 $(L1)LB[lb]M|9                                              
 date                         8 DATE     L                 $(L1)LB[lb]M|0                                              
 ext.comment                 50 FREE     L                 $(L1)LB[lb]M|4                                              
 grp.mis.date                 8 DATE     L                 $(L1)LB[lb]V|2                                              
 grp.mis.db                  12 FREE     L                 $(L1)LB[lb]V|0                                              
 grp.mis.jn                  10 FREE     L  MIS.GL.JOURNAL $(L1)LB[lb]V|3                                          
 grp.mis.number               3 PINT     R                 $(L1)LB[lb]V|4                                              
 grp.mis.urn                  8 FREE     L                 $(L1)LB[lb]V|1                                              
 grp.this.batch.corp          4 FREE     L  MIS.GL.CORP    $(L1)LB[lb]V|5                                          
 input.by.group               1 YN       L                 $(L1)LB[lb]M|17                                             
 int.comment                 50 FREE     L                 $(L1)LB[lb]M|5                                              
 journal                     10 FREE     L  MIS.GL.JOURNAL $(L1)LB[lb]M|1                                          
 last.device.to.use          10 FREE     L  UNV.DEVICE     $(L1)LB[lb]M|14                                         
 last.user.to.use            10 FREE     L  MIS.USER       $(L1)LB[lb]M|13                                         
 nil.txn.disp                 1 YN       L                 VAL=IF{+@nil.txn[urn,""] "Y"}                               
 number                       3 PINT     R                 $(L1)LB[lb]M|2                                              
 on.alloc.index               1 YN       L                 VAL=IF{%GL.BATCH.alloc.x(GL.BATCH.urn) "Y"}                 
 post.to.date                 8 DATE     L                 $(L1)LB[lb]M|7                                              
 post.to.period              10 FREE     L  MIS.GL.PERIOD  $(L1)LB[lb]M|6                                          
 posting.time                10 TIME     L                 $(L1)LB[lb]M|11                                             
 read.from.database          12 FREE     L  MIS.APPL.DB    $(L1)LB[lb]M|15                                         
 recur                        1 YN       L                 $(L1)LB[lb]M|18                                             
 recur.id                    26 FREE     L                 VAL=@date:10L_(@journal:12L)_(@number:4R)                   
 status                      10 CHOICE   L                 $(L1)LB[lb]M|3                                              
 summary.batch                8 DATE     L  GL.BATCH       $(L1)LB[lb]M|12                                         
 Ì   €   i   2
group.list
[urn,  glg.gl.urn]
$(L1)LB[lb]V[lbG]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 glg.gl.urn                   8 FREE     L                 lbG                                                         
 glg.gl.corp                  4 FREE     L  MIS.GL.CORP    $(L1)LB[lb]V[lbG]|3                                     
 glg.gl.date                  8 DATE     L                 $(L1)LB[lb]V[lbG]|0                                         
 glg.gl.journal              10 FREE     L  MIS.GL.JOURNAL $(L1)LB[lb]V[lbG]|1                                     
 glg.gl.number                3 PINT     R                 $(L1)LB[lb]V[lbG]|2                                         
 Ì   €   i   2
ccs.batch.cr.files
[urn,  ccs.bcrf.q]
$(L1)LB[lb]CCSCRF[lbZQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ccs.bcrf.q                   1 PINT     R                 lbZQ                                                        
 ccs.bcrf.num                 5 PINT     R                 $(L1)LB[lb]CCSCRF[lbZQ]|0                                   
 Ì   €   i   2
corp.summary
[urn,  corp]
$(L1)LB[lb]C[gvCN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 corp                         4 FREE     L  MIS.GL.CORP    gvCN                                                    
 corp.balance                12 SMONEY   R                 $(L1)LB[lb]C[gvCN]                                          
 Ì   €   i   2
distribution
[urn,  dis.acct]
$(L1)LB[lb]A[lbA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 dis.acct                    25 FREE     L  MIS.GL.ACCOUNT lbA                                                     
 Ì   €   i   2
dis.credits
[urn,dis.acct,  dis.cr.txn]
$(L1)LB[lb]A[lbA]CR[lbAC]

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

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

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.number                   5 PINT     R                 lbT                                                         
 txn.active                   1 YN       L                 $(L1)LB[lb]T[lbT]|0                                         
 txn.desc.disp               50 FREE     L                 VAL=@txn.description[txn.number#"0-"]                       
 txn.description             50 FREE     L                 $(L1)LB[lb]T[lbT]|1                                         
 txn.expand.desc             90 FREE     L                 $(L1)LB[lb]T[lbT]|2                                         
 txn.grp.cr.sum              12 SMONEY   L                                                                             
 txn.grp.dr.sum              12 SMONEY   L                                                                             
 txn.mis.txn.ptr              5 PINT     R                 $(L1)LB[lb]T[lbT]|3                                         
 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
credits
[urn,txn.number,  cr.acct]
$(L1)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.amount                   12 MONEY    R                 $(L1)LB[lb]T[lbT]CR[lbCR]                                   
 Ì   €   i   2
debits
[urn,txn.number,  dr.acct]
$(L1)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.amount                   12 MONEY    R                 $(L1)LB[lb]T[lbT]DR[lbDR]                                   

 Index Files                        Subscripts/Physical Base

 alloc.x                            [post.to.date,date,journal,number] = urn
                                      ?(L)LBA[lld,lbD,gj,lbN]

 ccs.crf.date.feeder.x              [ccs.cr.create.date,ccs.cr.feeder.gl,ccs.cr.file.num] = ccs.cr.feeder.gl
                                      ?(L)LBCCSCRDFX[lbZFD,lbZFG,lbZFN]

 ccs.crf.feeder.date.x              [ccs.cr.feeder.gl,ccs.cr.create.date,ccs.cr.file.num] = ccs.cr.feeder.gl
                                      ?(L)LBCCSCRFDX[lbZFG,lbZFD,lbZFN]

 id.recur.x                         [date,journal,number] = urn
                                      ?(L)LBRI[lbD,gj,lbN]

 id.x                               [date,journal,number] = urn
                                      ?(L)LBI[lbD,gj,lbN]

 post.x                             [post.to.date,journal,urn]
                                      ?(L)LBP[lld,gj,lb]

 removed.x                          [urn]
                                      ?(L)LBRX[lb]

 summary.x                          [post.to.date,journal,summary.batch,urn]
                                      ?(L)LBS[lld,gj,lb,lb]

 urn.x                              [urn]
                                      ?(L)LBU[lb]