sHelp
                                     BAR.PRORATE
     i   2
   bar.prorate.dict
     bar.prorate.dict.acct.types
     bar.prorate.alt.code.priority
     bar.prorate.dict.bill.types
     conv.ins.lines
     conv.insurances
     effective.dates.for.steps
       bar.pro.dict.checks
         check.acct.types
       bar.prorate.constants
       proration.cpt4.rates
       proration.diagnosis.rates
       bar.prorate.dict.exc.procs
       bar.prorate.functions
         bar.prorate.lines
           bar.prorate.line.calculate.in
           bar.prorate.line.comments
           bar.prorate.mult.lines
             bar.prorate.mult.line.comments
         bar.prorate.step.comments
       proration.proc.rates
       reimb.ambsurg.exceptions
       reimb.inpat.extra
         reimb.inpat.extra.ranges
       reimb.inpatient
         reimb.inpatient.ranges
       reimb.nonpri.sec.cats
       reimb.nonpri.sec.procs
       reimb.nonpri.sp.cats
       reimb.nonpri.sp.procs
       reimb.outpatient
         reimb.outpatient.ranges
       bar.prorate.step.lines
       bar.prorate.dict.steps
       bar.prorate.variables
     bar.prorate.effect.dates.local
     bar.prorate.ins.lines
     bar.prorate.dict.insurances
     prof.form.chg.cats
     reimb.override.adjs
     special.writeoffs

 Ì     i   2
bar.prorate.dict    (main) 
[mnemonic]
&BPR[bpr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mnemonic                    10 FREE     L                 bpr                                                         
 active                       1 YN       L                 &BPR[bpr]|0                                                 
 all.ins                      1 YN       L                 &BPR[bpr]|3                                                 
 description                 30 FREE     L                 &BPR[bpr]|1                                                 
 dft.num.rcpts                3 PINT     R                 &BPR[bpr]|4                                                 
 dft.num.rcpts2               3 PINT     R                 &BPR[bpr]|13                                                
 dft.timeout.string          15 FREE     L                 &BPR[bpr]|6                                                 
 group.chgs                   1 YN       L                 &BPR[bpr]|11                                                
 ins.contract                10 FREE     L  MIS.INS.CTRC   &BPR[bpr]|12                                            
 last.update                 30 FREE     L                 &BPR[bpr]UPD                                                
 mnemonic.and.name           40 FREE     L                 VAL=(@BAR.PRORATE.mnemonic_" - "_@BAR.PRORATE.descript      
                                                           VAL=ion)'=" - "                                             
 old.bill.type               10 CHOICE   L                 &BPR[bpr]|2                                                 
 pro.compute.prof.rcpts       1 YN       L                 &BPR[bpr]P|0                                                
 pro.one.svc.date.per.line    1 YN       L                 &BPR[bpr]P|4                                                
 pro.page.per.doctor          1 YN       L                 &BPR[bpr]P|3                                                
 pro.total.per.page           1 YN       L                 &BPR[bpr]P|2                                                
 pro.use.alt.code             7 FREE     L                 &BPR[bpr]P|1                                                
 prof.fee.forms.use          13 CHOICE   L                 &BPR[bpr]|9                                                 
 pt.writeoff.proc            10 FREE     L  BAR.PROC       &BPR[bpr]|5                                             
 reimb.sched                 12 FREE     L                 &BPR[bpr]|7                                                 
 use.eff.date                 7 CHOICE   L                 &BPR[bpr]|8                                                 
 use.proration.steps          1 YN       L                 &BPR[bpr]|10                                                
 Ì     i   2
bar.prorate.dict.acct.types    (acct.types) 
[mnemonic, acct.type]
&BPR[bpr]R[ba]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 acct.type                    8 FREE     L  BAR.ACCT.TYPE  ba                                                      
 use.pps.type                 4 CHOICE   L                 &BPR[bpr]R[ba]P|0                                           
 Ì     i   2
bar.prorate.alt.code.priority    (alt.code.priorities) 
[mnemonic, alt.code.priority]
&BPR[bpr]AC[bprAC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 alt.code.priority            2 PINT     R                 bprAC                                                       
 alt.code.type               10 FREE     L                 &BPR[bpr]AC[bprAC]|0                                        
 Ì     i   2
bar.prorate.dict.bill.types    (bill.types) 
[mnemonic, bill.type]
&BPR[bpr]B[bzTP]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 bill.type                   10 CHOICE   L                 bzTP                                                        
 Ì     i   2
conv.ins.lines    (conv.ins.lines) 
[mnemonic, conv.ins.line]
&BPR[bpr]L.CONV[bprL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 conv.ins.line                3 PINT     R                 bprL                                                        
 conv.ins.1                  10 FREE     L  MIS.INS.DICT   &BPR[bpr]L.CONV[bprL]|0                                 
 conv.ins.1.exp.no.rcpts      3 PINT     R                 &BPR[bpr]L.CONV[bprL]|4                                     
 conv.ins.1.woproc           10 FREE     L  BAR.PROC       &BPR[bpr]L.CONV[bprL]|2                                 
 conv.ins.1.woproc.2         10 FREE     L  BAR.PROC       &BPR[bpr]L.CONV[bprL]|7                                 
 conv.ins.2                  10 FREE     L  MIS.INS.DICT   &BPR[bpr]L.CONV[bprL]|1                                 
 conv.ins.2.exp.no.rcpts      3 PINT     R                 &BPR[bpr]L.CONV[bprL]|5                                     
 conv.ins.2.woproc           10 FREE     L  BAR.PROC       &BPR[bpr]L.CONV[bprL]|3                                 
 conv.ins.line.timeout.str   15 FREE     L                 &BPR[bpr]L.CONV[bprL]|6                                     
 Ì     i   2
conv.insurances    (conv.insurances) 
[mnemonic, conv.insurance,conv.sec.ins]
&BPR[bpr]I.CONV[ggm,hin2]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 conv.insurance              10 FREE     L  MIS.INS.DICT   ggm                                                     
 conv.sec.ins                10 FREE     L  MIS.INS.DICT   hin2                                                    
 conv.constant                1 FREE     L                 &BPR[bpr]I.CONV[ggm,hin2]|2                                 
 conv.ins.timeout.string     15 FREE     L                 &BPR[bpr]I.CONV[ggm,hin2]|5                                 
 conv.ins1.exp.rcpts          3 PINT     R                 &BPR[bpr]I.CONV[ggm,hin2]|3                                 
 conv.ins1.wo.proc           10 FREE     L  BAR.PROC       &BPR[bpr]I.CONV[ggm,hin2]|0                             
 conv.ins1.wo.proc2          10 FREE     L  BAR.PROC       &BPR[bpr]I.CONV[ggm,hin2]|6                             
 conv.ins2.exp.rcpts          3 PINT     R                 &BPR[bpr]I.CONV[ggm,hin2]|4                                 
 conv.ins2.wo.proc           10 FREE     L  BAR.PROC       &BPR[bpr]I.CONV[ggm,hin2]|1                             
 Ì     i   2
effective.dates.for.steps    (effective.dates) 
[mnemonic, eff.date]
&BPR[bpr]E[bprD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 eff.date                     8 DATE     L                 bprD                                                        
 eff.date.value               2 FREE     L                 &BPR[bpr]E[bprD]                                            
 reimbursement.method        12 CHOICE   L                 &BPR[bpr]E[bprD]TAB|0                                       
 tab.asc.group0              10 MONEY    R                 &BPR[bpr]E[bprD]TAB["AS"]|13                                
 tab.asc.group1              10 MONEY    R                 &BPR[bpr]E[bprD]TAB["AS"]|4                                 
 tab.asc.group2              10 MONEY    R                 &BPR[bpr]E[bprD]TAB["AS"]|5                                 
 tab.asc.group3              10 MONEY    R                 &BPR[bpr]E[bprD]TAB["AS"]|6                                 
 tab.asc.group4              10 MONEY    R                 &BPR[bpr]E[bprD]TAB["AS"]|7                                 
 tab.asc.group5              10 MONEY    R                 &BPR[bpr]E[bprD]TAB["AS"]|8                                 
 tab.asc.group6              10 MONEY    R                 &BPR[bpr]E[bprD]TAB["AS"]|9                                 
 tab.asc.group7              10 MONEY    R                 &BPR[bpr]E[bprD]TAB["AS"]|10                                
 tab.asc.group8              10 MONEY    R                 &BPR[bpr]E[bprD]TAB["AS"]|11                                
 tab.asc.group9              10 MONEY    R                 &BPR[bpr]E[bprD]TAB["AS"]|12                                
 tab.asc.multi.1              5 DEC      R                 &BPR[bpr]E[bprD]TAB["AS"]|1                                 
 tab.asc.multi.2              5 DEC      R                 &BPR[bpr]E[bprD]TAB["AS"]|2                                 
 tab.asc.multi.3              5 DEC      R                 &BPR[bpr]E[bprD]TAB["AS"]|3                                 
 tab.asc.none.grouped        10 CHOICE   L                 &BPR[bpr]E[bprD]TAB["AS"]|15                                
 tab.asc.none.grouped.pct     5 PDEC     R                 &BPR[bpr]E[bprD]TAB["AS"]|16                                
 tab.asc.use.group0           1 YN       L                 &BPR[bpr]E[bprD]TAB["AS"]|14                                
 tab.er.level1               10 MONEY    R                 &BPR[bpr]E[bprD]TAB["ER"]|0                                 
 tab.er.level2               10 MONEY    R                 &BPR[bpr]E[bprD]TAB["ER"]|1                                 
 tab.er.level3               10 MONEY    R                 &BPR[bpr]E[bprD]TAB["ER"]|2                                 
 tab.er.limit                10 PMONEY   R                 &BPR[bpr]E[bprD]TAB["ER"]|5                                 
 tab.er.non.er               10 MONEY    R                 &BPR[bpr]E[bprD]TAB["ER"]|3                                 
 tab.er.pct                   5 PDEC     R                 &BPR[bpr]E[bprD]TAB["ER"]|4                                 
 tab.in.default.rate          5 PDEC     R                 &BPR[bpr]E[bprD]TAB|3                                       
 tab.in.stop.loss.amt        10 PMONEY   R                 &BPR[bpr]E[bprD]TAB|1                                       
 tab.in.stop.loss.pct         5 PDEC     R                 &BPR[bpr]E[bprD]TAB|2                                       
 tab.in.stop.loss.type       23 CHOICE   L                 &BPR[bpr]E[bprD]TAB|5                                       
 tab.mat.boarder.baby        10 MONEY    R                 &BPR[bpr]E[bprD]TAB["MA"]|10                                
 tab.mat.csection.day.add    10 MONEY    R                 &BPR[bpr]E[bprD]TAB["MA"]|9                                 
 tab.mat.csection.day1       10 MONEY    R                 &BPR[bpr]E[bprD]TAB["MA"]|4                                 
 tab.mat.csection.day2       10 MONEY    R                 &BPR[bpr]E[bprD]TAB["MA"]|5                                 
 tab.mat.csection.day3       10 MONEY    R                 &BPR[bpr]E[bprD]TAB["MA"]|6                                 
 tab.mat.csection.day4       10 MONEY    R                 &BPR[bpr]E[bprD]TAB["MA"]|7                                 
 tab.mat.csection.day5       10 MONEY    R                 &BPR[bpr]E[bprD]TAB["MA"]|8                                 
 tab.mat.mother.baby          1 YN       L                 &BPR[bpr]E[bprD]TAB["MA"]|11                                
 tab.mat.nor.day.add         10 MONEY    R                 &BPR[bpr]E[bprD]TAB["MA"]|3                                 
 tab.mat.nor.day1            10 MONEY    R                 &BPR[bpr]E[bprD]TAB["MA"]|0                                 
 tab.mat.nor.day2            10 MONEY    R                 &BPR[bpr]E[bprD]TAB["MA"]|1                                 
 tab.mat.nor.day3            10 MONEY    R                 &BPR[bpr]E[bprD]TAB["MA"]|2                                 
 tab.np.med.nec              13 CHOICE   L                 &BPR[bpr]E[bprD]TAB["NP"]|3                                 
 tab.np.pro.coins             9 CHOICE   L                 &BPR[bpr]E[bprD]TAB["NP"]|1                                 
 tab.np.pro.copay             9 CHOICE   L                 &BPR[bpr]E[bprD]TAB["NP"]|2                                 
 tab.np.pro.deduct            9 CHOICE   L                 &BPR[bpr]E[bprD]TAB["NP"]|0                                 
 tab.obs.limit               10 PMONEY   R                 &BPR[bpr]E[bprD]TAB["ER"]|8                                 
 tab.obs.pct                  5 PDEC     R                 &BPR[bpr]E[bprD]TAB["ER"]|7                                 
 tab.obs.rate                10 MONEY    R                 &BPR[bpr]E[bprD]TAB["ER"]|6                                 
 tab.out.default.rate         5 PDEC     R                 &BPR[bpr]E[bprD]TAB|4                                       
 tab.pps.cap.cost.to.chg     10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|16                               
 tab.pps.dsh.cap.factor      10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|14                               
 tab.pps.dsh.oper.factor     10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|9                                
 tab.pps.fed.cap.rate        10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|10                               
 tab.pps.geo.factor          10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|12                               
 tab.pps.hosp.cap.rate       10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|21                               
 tab.pps.ime.cap.factor      10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|13                               
 tab.pps.ime.oper.factor     10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|8                                
 tab.pps.labor               10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|5                                
 tab.pps.labor.share         10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|19                               
 tab.pps.marg.outlier.fact   10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|20                               
 tab.pps.nonlabor            10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|6                                
 tab.pps.nonlabor.share      10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|18                               
 tab.pps.oper.cost.to.chg    10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|15                               
 tab.pps.outlier.threshold   10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|17                               
 tab.pps.urban.addon         10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|11                               
 tab.pps.use.apc              1 YN       L                 &BPR[bpr]E[bprD]TAB["PPS"]|1                                
 tab.pps.use.drg             17 CHOICE   L                 &BPR[bpr]E[bprD]TAB["PPS"]|0                                
 tab.pps.use.hhrg             1 YN       L                 &BPR[bpr]E[bprD]TAB["PPS"]|4                                
 tab.pps.use.irf              1 YN       L                 &BPR[bpr]E[bprD]TAB["PPS"]|2                                
 tab.pps.use.rug              1 YN       L                 &BPR[bpr]E[bprD]TAB["PPS"]|3                                
 tab.pps.wage.index          10 PDEC     R                 &BPR[bpr]E[bprD]TAB["PPS"]|7                                
 Ì     i   2
bar.pro.dict.checks    (checks) 
[mnemonic,eff.date, check]
&BPR[bpr]E[bprD]K[bek]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 check                       15 FREE     L  BAR.CLAIM.CHK  bek                                                     
 Ì     i   2
check.acct.types    (check.acct.types) 
[mnemonic,eff.date,check, check.acct.type]
&BPR[bpr]E[bprD]K[bek]A[ba]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 check.acct.type              8 FREE     L  BAR.ACCT.TYPE  ba                                                      
 Ì     i   2
bar.prorate.constants    (constants) 
[mnemonic,eff.date, constant.in.use]
&BPR[bpr]E[bprD]CO[bv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 constant.in.use              8 FREE     L                 bv                                                          
 Ì     i   2
proration.cpt4.rates    (cpt4.rates) 
[mnemonic,eff.date, cpt4.from.code]
&BPR[bpr]E[bprD]C[bprC1]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cpt4.from.code               8 FREE     L                 bprC1                                                       
 cpt4.rate                    9 DEC2     R                 &BPR[bpr]E[bprD]C[bprC1]|1                                  
 cpt4.to.code                 8 FREE     L                 &BPR[bpr]E[bprD]C[bprC1]|0                                  
 Ì     i   2
proration.diagnosis.rates    (diagnosis.rates) 
[mnemonic,eff.date, diagnosis.from.code]
&BPR[bpr]E[bprD]D[bprD1]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 diagnosis.from.code          6 FREE     L                 bprD1                                                       
 diagnosis.rate               9 DEC2     R                 &BPR[bpr]E[bprD]D[bprD1]|1                                  
 diagnosis.to.code            6 FREE     L                 &BPR[bpr]E[bprD]D[bprD1]|0                                  
 Ì     i   2
bar.prorate.dict.exc.procs    (exc.procs) 
[mnemonic,eff.date, exc.proc]
&BPR[bpr]E[bprD]P[bd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 exc.proc                    10 FREE     L  BAR.PROC       bd                                                      
 exc.chg.cat                  8 FREE     L                 &BPR[bpr]E[bprD]P[bd]|0                                     
 Ì     i   2
bar.prorate.functions    (functions) 
[mnemonic,eff.date, function.no]
&BPR[bpr]E[bprD]F[bFN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 function.no                  3 PINT     R                 bFN                                                         
 function.type               10 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]|0                                    
 Ì     i   2
bar.prorate.lines    (lines) 
[mnemonic,eff.date,function.no, line.no]
&BPR[bpr]E[bprD]F[bFN]L[blN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 line.no                      3 PINT     R                 blN                                                         
 calc.function               10 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|1                             
 calc.variable               10 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|0                             
 chg.cat                      8 FREE     L  BAR.CH.CAT     &BPR[bpr]E[bprD]F[bFN]L[blN]L|1                         
 chg.cat.cnt.type             8 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|3                             
 chg.cat.count.calc           8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|8                             
 chg.cat.date                 8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|9                             
 chg.cat.from                 2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|4                             
 chg.cat.init.amt             8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|6                             
 chg.cat.rate                 8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|7                             
 chg.cat.rate.type           10 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|2                             
 chg.cat.to                   2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|5                             
 chg.cat.variable             8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|0                             
 constant.value              20 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|1                             
 constant.variable            8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|0                             
 cpt.code                     8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|1                             
 cpt.count.calc               8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|9                             
 cpt.count.type               5 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|4                             
 cpt.from                     2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|5                             
 cpt.init.amt                 8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|7                             
 cpt.rate.calc                8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|8                             
 cpt.rate.type                7 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|3                             
 cpt.to                       2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|6                             
 cpt.type                     8 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|2                             
 cpt.variable                 8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|0                             
 diag.code                    7 FREE     L  MIS.DIAG       &BPR[bpr]E[bprD]F[bFN]L[blN]L|1                         
 diag.count.calc              8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|9                             
 diag.count.type              8 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|4                             
 diag.from                    2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|5                             
 diag.init.amount             8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|7                             
 diag.rate.calc               8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|8                             
 diag.rate.type               4 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|3                             
 diag.to                      2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|6                             
 diag.type                    8 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|2                             
 diag.variable                8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|0                             
 drg.cap.comp                 6 SMONEY   R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|11                            
 drg.code                     6 FREE     L  MIS.DRG.NAME   &BPR[bpr]E[bprD]F[bFN]L[blN]L|1                         
 drg.count.calc               8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|8                             
 drg.count.type               5 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|3                             
 drg.from                     2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|4                             
 drg.init.amt                 8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|6                             
 drg.los                      4 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|10                            
 drg.rate.calc                8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|7                             
 drg.rate.type                8 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|2                             
 drg.to                       2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|5                             
 drg.variable                 8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|0                             
 drg.wt                       1 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|9                             
 field                       18 FREE     L  BAR.FIELDS     &BPR[bpr]E[bprD]F[bFN]L[blN]|1                          
 field.query.val             20 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|11                            
 icd9.code                    6 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|1                             
 icd9.count.calc              8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|9                             
 icd9.count.type              5 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|4                             
 icd9.from                    2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|5                             
 icd9.init.amount             8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|7                             
 icd9.rate.calc               8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|8                             
 icd9.rate.type               8 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|3                             
 icd9.to                      2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|6                             
 icd9.type                    8 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|2                             
 icd9.use.code                4 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|10                            
 icd9.variable                8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|0                             
 ins.query                   10 FREE     L  MIS.QUERY      &BPR[bpr]E[bprD]F[bFN]L[blN]|3                          
 ins.query.order              1 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]|4                              
 line.rpt.field              18 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]|6                              
 line.type                    8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]|0                              
 prorate.variable            10 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]|5                              
 query                       10 FREE     L  MIS.QUERY      &BPR[bpr]E[bprD]F[bFN]L[blN]|2                          
 select                       8 FREE     L  BAR.SELECT     &BPR[bpr]E[bprD]F[bFN]L[blN]L|1                         
 select.count.calc            8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|7                             
 select.count.type            5 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|2                             
 select.from                  2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|3                             
 select.init.amount           8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|5                             
 select.rate.calc             8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|6                             
 select.to                    2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|4                             
 select.variable              8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L|0                             
 Ì     i   2
bar.prorate.line.calculate.in    (line.calculate.in) 
[mnemonic,eff.date,function.no,line.no, line.calc.in.no]
&BPR[bpr]E[bprD]F[bFN]L[blN]L["I",bLCN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 line.calc.in.no              2 PINT     R                 bLCN                                                        
 line.calc.input             30 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L["I",bLCN]|1                   
 line.calc.marker             1 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L["I",bLCN]|0                   
 line.calc.output            30 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]L["I",bLCN]|2                   
 Ì     i   2
bar.prorate.line.comments    (line.comments) 
[mnemonic,eff.date,function.no,line.no, line.comment.no]
&BPR[bpr]E[bprD]F[bFN]L[blN]C[bLCN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 line.comment.no              2 PINT     R                 bLCN                                                        
 line.comment.line           40 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]C[bLCN]|0                       
 Ì     i   2
bar.prorate.mult.lines    (mult.lines) 
[mnemonic,eff.date,function.no,line.no, mult.line.no]
&BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mult.line.no                 2 PINT     R                 bLMN                                                        
 field.count.calc             8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|9                     
 field.count.type             5 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|3                     
 field.from                   2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|4                     
 field.init.amount            8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|7                     
 field.marker                20 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|10                    
 field.rate.calc              8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|8                     
 field.rate.type              5 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|2                     
 field.to                     2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|5                     
 field.value                 20 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|1                     
 field.variable               8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|0                     
 ins.query.count.calc         8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|8                     
 ins.query.count.type         5 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|3                     
 ins.query.from               2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|4                     
 ins.query.init.amount        8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|6                     
 ins.query.mark1             20 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|9                     
 ins.query.mark2              1 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|10                    
 ins.query.rate.calc          8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|7                     
 ins.query.rate.type          5 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|2                     
 ins.query.to                 2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|5                     
 ins.query.value             20 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|1                     
 ins.query.variable           8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|0                     
 mult.line.type              10 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]|0                      
 pro.adj1.percent             3 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|4                     
 pro.adj2.percent             3 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|5                     
 pro.cost.ol                  3 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|7                     
 pro.daily.ol                 3 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|6                     
 pro.exp.rcpt                 1 YN       L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|8                     
 pro.ins.order                2 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|1                     
 pro.percent                  3 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|3                     
 pro.type                     7 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|2                     
 pro.variable                10 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|0                     
 query.count.calc             8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|10                    
 query.count.type             5 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|3                     
 query.from                   2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|4                     
 query.init.amount            8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|8                     
 query.rate.calc              8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|9                     
 query.rate.type              5 CHOICE   L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|2                     
 query.to                     2 PINT     R                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|5                     
 query.value                 20 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|1                     
 query.variable               8 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]L|0                     
 Ì     i   2
bar.prorate.mult.line.comments    (mult.line.comments) 
[mnemonic,eff.date,function.no,line.no,mult.line.no, mult.comment.no]
&BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]C[bMCN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mult.comment.no              2 PINT     R                 bMCN                                                        
 mult.comment.line           40 FREE     L                 &BPR[bpr]E[bprD]F[bFN]L[blN]ML[bLMN]C[bMCN]|0               
 Ì     i   2
bar.prorate.step.comments    (step.comments) 
[mnemonic,eff.date,function.no, step.comment.no]
&BPR[bpr]E[bprD]F[bFN]C[bSCN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 step.comment.no              3 PINT     R                 bSCN                                                        
 step.comment.line           60 FREE     L                 &BPR[bpr]E[bprD]F[bFN]C[bSCN]|0                             
 Ì     i   2
proration.proc.rates    (proc.rates) 
[mnemonic,eff.date, proc.from.code]
&BPR[bpr]E[bprD]E[bprP1]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 proc.from.code               6 FREE     L                 bprP1                                                       
 proc.rate                    9 DEC2     R                 &BPR[bpr]E[bprD]E[bprP1]|1                                  
 proc.to.code                 6 FREE     L                 &BPR[bpr]E[bprD]E[bprP1]|0                                  
 Ì     i   2
reimb.ambsurg.exceptions    (reimb.ambsurg.exceptions) 
[mnemonic,eff.date, tab.asc.except.q]
&BPR[bpr]E[bprD]TAB["AS"]EX[bprAS]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tab.asc.except.q             3 INT      R                 bprAS                                                       
 tab.asc.except.amt          10 SMONEY   R                 &BPR[bpr]E[bprD]TAB["AS"]EX[bprAS]|3                        
 tab.asc.except.from          8 FREE     L  ABS.CPT        &BPR[bpr]E[bprD]TAB["AS"]EX[bprAS]|0                    
 tab.asc.except.group         2 INT      R                 &BPR[bpr]E[bprD]TAB["AS"]EX[bprAS]|2                        
 tab.asc.except.thru          8 FREE     L  ABS.CPT        &BPR[bpr]E[bprD]TAB["AS"]EX[bprAS]|1                    
 Ì     i   2
reimb.inpat.extra    (reimb.inpat.extra) 
[mnemonic,eff.date, tab.inx.line.q]
&BPR[bpr]E[bprD]TAB["IX",brpIX]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tab.inx.line.q               3 INT      R                 brpIX                                                       
 tab.inx.add                  1 YN       L                 &BPR[bpr]E[bprD]TAB["IX",brpIX]|7                           
 tab.inx.amt                 10 MONEY    R                 &BPR[bpr]E[bprD]TAB["IX",brpIX]|2                           
 tab.inx.desc                30 FREE     L                 &BPR[bpr]E[bprD]TAB["IX",brpIX]|0                           
 tab.inx.event               11 CHOICE   L                 &BPR[bpr]E[bprD]TAB["IX",brpIX]|4                           
 tab.inx.limit.method         8 CHOICE   L                 &BPR[bpr]E[bprD]TAB["IX",brpIX]|6                           
 tab.inx.limit.value         10 FREE     L                 &BPR[bpr]E[bprD]TAB["IX",brpIX]|5                           
 tab.inx.method               9 CHOICE   L                 &BPR[bpr]E[bprD]TAB["IX",brpIX]|1                           
 tab.inx.percent              5 PDEC     R                 &BPR[bpr]E[bprD]TAB["IX",brpIX]|3                           
 Ì     i   2
reimb.inpat.extra.ranges    (reimb.inpat.extra.ranges) 
[mnemonic,eff.date,tab.inx.line.q, tab.inx.from]
&BPR[bpr]E[bprD]TAB["IX",brpIX]R[bprXR]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tab.inx.from                16 FREE     L                 bprXR                                                       
 tab.inx.thru                16 FREE     L                 &BPR[bpr]E[bprD]TAB["IX",brpIX]R[bprXR]|0                   
 Ì     i   2
reimb.inpatient    (reimb.inpatient) 
[mnemonic,eff.date, tab.in.line.q]
&BPR[bpr]E[bprD]TAB["IN",bprIN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tab.in.line.q                3 INT      R                 bprIN                                                       
 tab.in.amt                  10 MONEY    R                 &BPR[bpr]E[bprD]TAB["IN",bprIN]|2                           
 tab.in.desc                 30 FREE     L                 &BPR[bpr]E[bprD]TAB["IN",bprIN]|0                           
 tab.in.method                9 CHOICE   L                 &BPR[bpr]E[bprD]TAB["IN",bprIN]|1                           
 Ì     i   2
reimb.inpatient.ranges    (reimb.inpatient.ranges) 
[mnemonic,eff.date,tab.in.line.q, tab.in.from]
&BPR[bpr]E[bprD]TAB["IN",bprIN]R[bprNR]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tab.in.from                 16 FREE     L                 bprNR                                                       
 tab.in.thru                 16 FREE     L                 &BPR[bpr]E[bprD]TAB["IN",bprIN]R[bprNR]|0                   
 Ì     i   2
reimb.nonpri.sec.cats    (reimb.nonpri.sec.cats) 
[mnemonic,eff.date, tab.np.sec.chg.cat]
&BPR[bpr]E[bprD]TAB["NP"]SC[br]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tab.np.sec.chg.cat           8 FREE     L  BAR.CH.CAT     br                                                      
 Ì     i   2
reimb.nonpri.sec.procs    (reimb.nonpri.sec.procs) 
[mnemonic,eff.date, tab.np.sec.proc]
&BPR[bpr]E[bprD]TAB["NP"]S2[bd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tab.np.sec.proc             10 FREE     L  BAR.PROC       bd                                                      
 Ì     i   2
reimb.nonpri.sp.cats    (reimb.nonpri.sp.cats) 
[mnemonic,eff.date, tab.np.sp.chg.cat]
&BPR[bpr]E[bprD]TAB["NP"]SPC[br]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tab.np.sp.chg.cat            8 FREE     L  BAR.CH.CAT     br                                                      
 Ì     i   2
reimb.nonpri.sp.procs    (reimb.nonpri.sp.procs) 
[mnemonic,eff.date, tab.np.sp.proc]
&BPR[bpr]E[bprD]TAB["NP"]SPP[bd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tab.np.sp.proc              10 FREE     L  BAR.PROC       bd                                                      
 Ì     i   2
reimb.outpatient    (reimb.outpatient) 
[mnemonic,eff.date, tab.out.line.q]
&BPR[bpr]E[bprD]TAB["OUT",bprO]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tab.out.line.q               3 INT      R                 bprO                                                        
 tab.out.amt                 10 MONEY    R                 &BPR[bpr]E[bprD]TAB["OUT",bprO]|2                           
 tab.out.desc                30 FREE     L                 &BPR[bpr]E[bprD]TAB["OUT",bprO]|0                           
 tab.out.event               12 CHOICE   L                 &BPR[bpr]E[bprD]TAB["OUT",bprO]|4                           
 tab.out.limit.amt           10 PMONEY   R                 &BPR[bpr]E[bprD]TAB["OUT",bprO]|6                           
 tab.out.method               9 CHOICE   L                 &BPR[bpr]E[bprD]TAB["OUT",bprO]|1                           
 tab.out.percent              5 PDEC     R                 &BPR[bpr]E[bprD]TAB["OUT",bprO]|3                           
 tab.out.reimb.sched         12 FREE     L  BAR.FEE.SCH    &BPR[bpr]E[bprD]TAB["OUT",bprO]|5                       
 Ì     i   2
reimb.outpatient.ranges    (reimb.outpatient.ranges) 
[mnemonic,eff.date,tab.out.line.q, tab.out.from]
&BPR[bpr]E[bprD]TAB["OUT",bprO]R[bprOR]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tab.out.from                16 FREE     L                 bprOR                                                       
 tab.out.thru                16 FREE     L                 &BPR[bpr]E[bprD]TAB["OUT",bprO]R[bprOR]|0                   
 Ì     i   2
bar.prorate.step.lines    (step.lines) 
[mnemonic,eff.date, temp.step.no]
&BPR[bpr]E[bprD]TS[bprTS]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 temp.step.no                 3 PINT     R                 bprTS                                                       
 temp.step                   40 FREE     L                 &BPR[bpr]E[bprD]TS[bprTS]|0                                 
 temp.step.desc              40 FREE     L                 &BPR[bpr]E[bprD]TS[bprTS]|3                                 
 temp.step.desc.multi         1 FREE     L                 &BPR[bpr]E[bprD]TS[bprTS]|7                                 
 temp.step.desc2             40 FREE     L                 &BPR[bpr]E[bprD]TS[bprTS]|4                                 
 temp.step.desc3             40 FREE     L                 &BPR[bpr]E[bprD]TS[bprTS]|5                                 
 temp.step.multi              1 FREE     L                 &BPR[bpr]E[bprD]TS[bprTS]|6                                 
 temp.step2                  40 FREE     L                 &BPR[bpr]E[bprD]TS[bprTS]|1                                 
 temp.step3                  40 FREE     L                 &BPR[bpr]E[bprD]TS[bprTS]|2                                 
 Ì     i   2
bar.prorate.dict.steps    (steps) 
[mnemonic,eff.date, step.no]
&BPR[bpr]E[bprD]S[bprS]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 step.no                      3 PINT     R                 bprS                                                        
 step                       120 FREE     L                 &BPR[bpr]E[bprD]S[bprS]|0                                   
 Ì     i   2
bar.prorate.variables    (variables) 
[mnemonic,eff.date, variable.sort,variable]
&BPR[bpr]E[bprD]V[bVS,bv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 variable.sort               12 FREE     L                 bVS                                                         
 variable                    10 FREE     L                 bv                                                          
 variable.comment.line       60 FREE     L                 &BPR[bpr]E[bprD]V[bVS,bv]|2                                 
 variable.comment.type       10 FREE     L                 &BPR[bpr]E[bprD]V[bVS,bv]|1                                 
 variable.comment.yn          1 YN       L                 &BPR[bpr]E[bprD]V[bVS,bv]|0                                 
 Ì     i   2
bar.prorate.effect.dates.local    (effective.dates.local) 
[mnemonic, eff.date.loc]
&BPR[bpr]E[bprD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 eff.date.loc                 8 DATE     L                 bprD                                                        
 Ì     i   2
bar.prorate.ins.lines    (ins.lines) 
[mnemonic, ins.line]
&BPR[bpr]L[bprL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ins.line                     3 PINT     R                 bprL                                                        
 ins.1                       10 FREE     L  MIS.INS.DICT   &BPR[bpr]L[bprL]|0                                      
 ins.2                       10 FREE     L  MIS.INS.DICT   &BPR[bpr]L[bprL]|1                                      
 Ì     i   2
bar.prorate.dict.insurances    (insurances) 
[mnemonic, insurance,sec.ins]
&BPR[bpr]I[ggm,hin2]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 insurance                   10 FREE     L  MIS.INS.DICT   ggm                                                     
 sec.ins                     10 FREE     L  MIS.INS.DICT   hin2                                                    
 constant                     1 FREE     L                 &BPR[bpr]I[ggm,hin2]                                        
 Ì     i   2
prof.form.chg.cats    (prof.form.chg.cats) 
[mnemonic, prof.form.chg.cat]
&BPR[bpr]P["CC",br]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 prof.form.chg.cat            8 FREE     L  BAR.CH.CAT     br                                                      
 prof.form.chg.cat.fr         8 FREE     L  BAR.CH.CAT     &BPR[bpr]P["CC",br]|0                                   
 prof.form.chg.cat.th         8 FREE     L  BAR.CH.CAT     &BPR[bpr]P["CC",br]|1                                   
 Ì     i   2
reimb.override.adjs    (reimb.override.adjs) 
[mnemonic, override.adj.proc]
&BPR[bpr]ADJ[bd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 override.adj.proc           10 FREE     L  BAR.PROC       bd                                                      
 Ì     i   2
special.writeoffs    (special.writeoffs) 
[mnemonic, spec.woff.q]
&BPR[bpr]WO2[bprSW]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 spec.woff.q                  3 INT      R                 bprSW                                                       
 spec.woff.adj.proc          10 FREE     L  BAR.PROC       &BPR[bpr]WO2[bprSW]|0                                   
 spec.woff.chg.cat            8 FREE     L  BAR.CH.CAT     &BPR[bpr]WO2[bprSW]|1                                   
 spec.woff.proc.code         10 FREE     L  BAR.PROC       &BPR[bpr]WO2[bprSW]|2                                   
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 ins.contract.x                     [ins.contract,mnemonic]
   ins.contract.x                     &BPRICX[ggx,bpr]

 bar.prorate.dict.index             [acct.type,bill.type,insurance,sec.ins] = mnemonic
   map.x                              &BPRX[ba,bzTP,ggm,hin2]