BARBLCLC ;IHS/SD/LSL - A/R BILL CALCULATIONS ; 03/04/2010
Source file <BARBLCLC.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| CALC(D0) | ; Calculated Amount field  PAYMENT - CO-PAY - DEDUCTIBLE ; Already have bill ^BARBL(DUZ(2),D0,0) where D0 = Bill Number ; ^BARBL(DUZ(2),"AC",D0,DATE.TIME)="" points to-> $P(^BARTR(DUZ(2),DATE.TIME,0),"^") ; I $P(^BARTR(DUZ(2),DATE.TIME,0),"^")=40 - PAYMENT | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^BARTR( | CALC+5, CALC+6, CALC+8 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ALWAMT | CALC+4~*, CALC+11*, CALC+12 | 
| D0 | CALC~, CALC+5 | 
| DUZ(2 | CALC+5, CALC+6, CALC+8 | 
| T | CALC+4~, CALC+8*, CALC+9 | 
| TCODE | CALC+4~, CALC+6*, CALC+7, CALC+10 | 
| TCR | CALC+4~, CALC+9*, CALC+11 | 
| TDB | CALC+4~, CALC+9*, CALC+11 | 
| TRIEN | CALC+4~, CALC+5*, CALC+6, CALC+8 | 
| TTCODE | CALC+4~, CALC+10* |