sHelp
                                     BAR.BD.BAL
       2
 main
   agency.info
     insurance.info
       account.type.info
         account.detail
           account.detail.aging
         aging

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

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 date.segment                 8 DATE     L                 bu                                                          
 Ì   €     2
agency.info
[date.segment,  agency]
*(B2)BUBD[bu,bg]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 agency                       8 FREE     L  BAR.COL.AG     bg                                                      
 Ì   €     2
insurance.info
[date.segment,agency,  insurance]
*(B2)BUBD[bu,bg,ggm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 insurance                   10 FREE     L  MIS.INS        ggm                                                     
 Ì   €     2
account.type.info
[date.segment,agency,insurance,  account.type]
*(B2)BUBD[bu,bg,ggm,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)BUBD[bu,bg,ggm,ba]|9                                   
 adjustments                 10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]|3                                   
 agency.change.amount        10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]|6                                   
 ar.to.bd.amount             10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]|1                                   
 balance                     10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]|0                                   
 bd.to.ar.amount             10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]|5                                   
 count                        5 PINT     R                 *(B2)BUBD[bu,bg,ggm,ba]|10                                  
 edit.amount                 10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]|8                                   
 insurance.xfers             10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]|7                                   
 prev.balance                10 SMONEY   R                 VAL=@BAR.BD.BAL.balance[-@BAR.BD.BAL.main[date.segment      
                                                           VAL=^XX]!19850000,agency,insurance,account.type]            
 prev.count                   5 PINT     R                 VAL=@BAR.BD.BAL.count[-@BAR.BD.BAL.main[date.segment^X      
                                                           VAL=X]!19850000,agency,insurance,account.type]              
 receipts                    10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]|2                                   
 refunds                     10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]|4                                   
 Ì   €     2
account.detail
[date.segment,agency,insurance,account.type,  account]
*(B2)BUBD[bu,bg,ggm,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)BUBD[bu,bg,ggm,ba]AD[bz]|9                             
 ad.adjustments              10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|3                             
 ad.adm.svc.date              8 DATE     L                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|13                            
 ad.agency.change.amount     10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|6                             
 ad.ar.to.bd.amount          10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|1                             
 ad.balance                  10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|0                             
 ad.bd.to.ar.amount          10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|5                             
 ad.count                     5 PINT     R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|10                            
 ad.edit.amount              10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|8                             
 ad.guarantor.name           30 FREE     L                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|16                            
 ad.guarantor.number         12 FREE     L                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|17                            
 ad.insurance.xfers          10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|7                             
 ad.last.pay.amount          15 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|15                            
 ad.last.pay.date             8 DATE     L                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|14                            
 ad.name                     30 FREE     L                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|11                            
 ad.number                   12 FREE     L                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|12                            
 ad.prev.balance             10 SMONEY   R                 VAL=%BAR.BD.BAL.get.prev.balance(date.segment,agency,i      
                                                           VAL=nsurance,account.type,account)                          
 ad.prev.count                5 PINT     R                 VAL=@BAR.BD.BAL.ad.count[-@BAR.BD.BAL.main[date.segmen      
                                                           VAL=t^XX]!19850000,agency,insurance,account.type,accou      
                                                           VAL=nt]                                                     
 ad.receipts                 10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|2                             
 ad.refunds                  10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]|4                             
 Ì   €     2
account.detail.aging
[date.segment,agency,insurance,account.type,account,  ad.aging.category]
*(B2)BUBD[bu,bg,ggm,ba]AD[bz]A[buA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 ad.aging.category            1 PINT     R                 buA                                                         
 ad.age.balance              10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]A[buA]|1                       
 ad.age.count                 5 PINT     R                 *(B2)BUBD[bu,bg,ggm,ba]AD[bz]A[buA]|0                       
 Ì   €     2
aging
[date.segment,agency,insurance,account.type,  aging.category]
*(B2)BUBD[bu,bg,ggm,ba]A[buA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 aging.category               1 PINT     R                 buA                                                         
 age.balance                 10 SMONEY   R                 *(B2)BUBD[bu,bg,ggm,ba]A[buA]|1                             
 age.count                    5 PINT     R                 *(B2)BUBD[bu,bg,ggm,ba]A[buA]|0