sHelp
                                     BAR.UR.BAL
       2
 main
   account.type.info
     account.detail

 Ì       2
main
[date.segment]
*(B2)BUUR[bu]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 date.segment                 8 DATE     L                 bu                                                          
 Ì   €     2
account.type.info
[date.segment,  account.type]
*(B2)BUUR[bu]AT[ba]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 account.type                 8 FREE     L  BAR.ACCT.TYPE  ba                                                      
 acct.type.change.amount     10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]|6                                       
 balance                     10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]|0                                       
 charge.amount               10 SMONEY   R                 VAL=@inhouse.charge.amount+@out.dis.charge.amount           
 client.xfer.amount          10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]|7                                       
 count                        4 PINT     R                 *(B2)BUUR[bu]AT[ba]|8                                       
 final.billed                10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]|3                                       
 inhouse.balance             10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]|11                                      
 inhouse.charge.amount       10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]|9                                       
 inhouse.count                4 PINT     R                 *(B2)BUUR[bu]AT[ba]|13                                      
 interim.billed              10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]|2                                       
 late.billed                 10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]|4                                       
 out.dis.balance             10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]|12                                      
 out.dis.charge.amount       10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]|10                                      
 out.dis.count                4 PINT     R                 *(B2)BUUR[bu]AT[ba]|14                                      
 prev.balance                10 SMONEY   R                 VAL=@BAR.UR.BAL.balance[-@BAR.UR.BAL.main[date.segment      
                                                           VAL=^XX]!19850000,account.type]+0:2D                        
 prev.count                   4 PINT     R                 VAL=@BAR.UR.BAL.count[-@BAR.UR.BAL.main[date.segment^X      
                                                           VAL=X]!19850000,account.type]                               
 reverse.billed              10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]|5                                       
 Ì   €     2
account.detail
[date.segment,account.type,  account]
*(B2)BUUR[bu]AT[ba]AD[bz]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 account                     44 URN      L  BAR.PAT        bz                                                      
 ad.acct.type.change.amt     10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|6                                 
 ad.adm.svc.date              8 DATE     L                 *(B2)BUUR[bu]AT[ba]AD[bz]|17                                
 ad.balance                  10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|0                                 
 ad.charge.amount            10 SMONEY   R                 VAL=@ad.inhouse.charge.amount+@ad.out.dis.charge.amoun      
                                                           VAL=t                                                       
 ad.client.xfer.amount       10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|7                                 
 ad.count                     4 PINT     R                 *(B2)BUUR[bu]AT[ba]AD[bz]|8                                 
 ad.final.billed             10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|3                                 
 ad.inhouse.balance          10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|11                                
 ad.inhouse.charge.amount    10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|9                                 
 ad.inhouse.count             4 PINT     R                 *(B2)BUUR[bu]AT[ba]AD[bz]|13                                
 ad.interim.billed           10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|2                                 
 ad.last.pay.amount          15 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|19                                
 ad.last.pay.date             8 DATE     L                 *(B2)BUUR[bu]AT[ba]AD[bz]|18                                
 ad.late.billed              10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|4                                 
 ad.name                     30 FREE     L                 *(B2)BUUR[bu]AT[ba]AD[bz]|15                                
 ad.number                   12 FREE     L                 *(B2)BUUR[bu]AT[ba]AD[bz]|16                                
 ad.out.dis.balance          10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|12                                
 ad.out.dis.charge.amount    10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|10                                
 ad.out.dis.count             4 PINT     R                 *(B2)BUUR[bu]AT[ba]AD[bz]|14                                
 ad.prev.balance             10 SMONEY   R                 VAL=%BAR.UR.BAL.get.prev.balance(date.segment,account.      
                                                           VAL=type,account)                                           
 ad.prev.count                4 PINT     R                 VAL=@BAR.UR.BAL.ad.count[-@BAR.UR.BAL.main[date.segmen      
                                                           VAL=t^XX]!19850000,account.type,account]                    
 ad.reverse.billed           10 SMONEY   R                 *(B2)BUUR[bu]AT[ba]AD[bz]|5