ABMDANTC ; IHS/ASDST/DMJ - COMPUTE ANESTHESIA TIME CHARGE ;
Source file <ABMDANTC.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| FIGR | ;EP - FIGURE OUT TIME CHARGE | |
| C(D0,D1) | ;EP - CLAIM START HERE (X=D0,Y=D1 of field 39 multiple) | |
| B(D0,D1) | ;EP - BILL START HERE (X=D0,Y=D1) | 
| Name | Field # of Occurrence | 
|---|---|
| $$TM^ABMDUTL | FIGR+1 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ABMDBILL( | B+2 | 
| ^ABMDCLM - [#9002274.3] | C+2 | 
| ^ABMDFEE - [#9002274.01] | FIGR+7, FIGR+8 | 
| Name | Line Occurrences | 
|---|---|
| FIGR | C+5, B+5 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ABM | C+1~, B+1~ | 
| ABM( | C+2*, B+2* | 
| ABM("CV" | FIGR+8*, FIGR+9 | 
| ABM("FY" | FIGR+6*, FIGR+7*, FIGR+8 | 
| ABM("T5S" | FIGR+2*, FIGR+3, FIGR+4, FIGR+5 | 
| ABM("TM" | FIGR+1*, FIGR+2 | 
| ABM("TU" | FIGR+3*, FIGR+4*, FIGR+5*, FIGR+9 | 
| ABM(7 | C+3, B+3, FIGR+1 | 
| ABM(8 | C+3, B+3, FIGR+1 | 
| ABM(9 | FIGR+3, FIGR+4 | 
| >> ABMP("FEE" | C+4, B+4, FIGR+7, FIGR+8 | 
| >> ABMP("VDT" | C+4, B+4, FIGR+6 | 
| D0 | C~, C+2, B~, B+2 | 
| D1 | C~, C+2, B~, B+2 | 
| DUZ(2 | C+2, B+2 | 
| I | C+1~, C+2*, B+1~, B+2* | 
| >> X | C+3*, C+4*, C+6, B+3*, B+4*, B+6, FIGR+9*, FIGR+10* |