IBAMTV4 ;ALB/CPM - FIND CHARGES FOR IVM PATIENTS ; 13-JUN-94
Source file <IBAMTV4.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ALL(DFN,IBROOT,IBST,IBEND) | ; Find IB Actions and Claims for the IVM Patient
; Input: DFN -- Pointer to the patient in file #2 ; IBROOT -- Root in which to place array of charges ; IBST -- Start date used as check for patient charges ; IBEND -- End date used as check for patient charges |
|
| ALLQ | ||
| INS(IBROOT) | ; Find claims for patients with IVM-identified policies.
; Input: IBROOT -- Root in which to place array of charges ; Output: Array of charges as defined above |
|
| INSQ | ||
| CLM(DFN,IBROOT) | ; Build charge array for insurance claims
; Input: DFN -- Pointer to the patient in file #2 ; IBROOT -- Root in which to place array of charges ; Output: Array of charges as defined above |
|
| CLMQ | ||
| CLS(BN,BN0) | ; Return a code for the bill classification.
; Input: BN -- Pointer to the bill in file #399 ; BN0 -- Zeroth node of bill in file #399 |
|
| CLSQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | CLM+9, CLM+10 |
| ^IB - [#350] | ALL+26, ALL+29 |
| ^IB("AF" | ALL+25 |
| ^IB("AFDT" | ALL+24 |
| ^IBA(354 - [#354] | INS+6 |
| ^IBE(350.1 - [#350.1] | ALL+34 |
| ^IBE(350.21 - [#350.21] | ALL+36 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | ALL+26 |
| ^(1 | ALL+29 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BN | CLS~, CLS+4, CLS+5 |
| BN0 | CLS~, CLS+4, CLS+5 |
| DFN | ALL~, ALL+21, ALL+24, ALL+33, ALL+43, INS+4~, INS+6*, CLM~, CLM+5, CLM+9 , CLM+13 |
| IBDA | ALL+25*, ALL+26, ALL+28, ALL+29, ALLQ! |
| IBEND | ALL~, ALL+24, ALL+30 |
| IBI | CLM+7~, CLM+10* |
| IBN | ALL+29*, ALLQ!, CLM+7~, CLM+9*, CLM+10, CLM+13, CLM+15, CLM+17, CLM+19, CLM+22 |
| IBND | ALL+29*, ALL+30, ALL+33, ALL+34, ALL+35, ALL+36, ALLQ!, CLM+7~ |
| IBND( | CLM+10* |
| IBND("S" | CLM+14, CLM+20 |
| IBND("U" | CLM+14 |
| IBND(0 | CLM+13 |
| IBND1 | ALL+29*, ALL+35, ALLQ! |
| IBROOT | ALL~, ALL+21, ALL+40, ALL+43, INS~, INS+5, INS+6, CLM~, CLM+5, CLM+22 |
| IBST | ALL~, ALL+24, ALL+30 |
| IBSTAT | ALL+36*, ALL+37, ALL+38, ALLQ! |
| IBSTR | ALL+33*, ALL+34*, ALL+35*, ALL+37*, ALL+38*, ALL+40, ALLQ!, CLM+7~, CLM+13*, CLM+14* , CLM+16*, CLM+18*, CLM+20*, CLM+22 |
| IBX | ALL+26*, ALL+27, ALL+28, ALL+40, ALLQ!, CLM+7~, CLM+15*, CLM+16, CLM+17*, CLM+18 , CLM+19*, CLM+20 |
| X | CLS+3~*, CLS+5*, CLSQ |
| Y | ALL+24*, ALLQ! |
| Y1 | ALL+24*, ALL+25, ALLQ! |
