IBACCROWFT ;EDE/WCJ - ACC (Automated Community Care) Claims - Roll Up Utilities ; 24-APR-2024
Source file <IBACCROWFT.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 |
|---|---|---|
| LKUPSCRN(Y) | ; Look Up Screen
; only let them pick facilities in our table |
|
| MCD(STATION) | ; Medical Center Division
; pass in the complete 3-7 character station number ; and get the MCD to bill from 40.8 ; or DEFAULT DIVISION from site parameter file if we can't find a MCD for a VAMC ; VAMC will have 3 digit number or 3 digit followed by A then whatever |
|
| RUST(STATION) | ; roll-up station aka division
; pass in the complete 3-7 character station number ; and get the Division for 4 sites that use them ; or 0 if can't figure out. ; |
| FileNo | Call Tags |
|---|---|
| ^IBE(350.9 - [#350.9] | GET1^DIQ |
| ^IBA(364.99 - [#364.99] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^DG(40.8 - [#40.8] | FIND1^DIC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBA(364.99 - [#364.99] | LKUPSCRN+6, LKUPSCRN+7, MCD+25, MCD+26, MCD+27, MCD+29, MCD+34, RUST+9, RUST+10, RUST+11 , RUST+13, RUST+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIC | MCD+33~, MCD+35* |
| DIC(0 | MCD+35* |
| IEN | LKUPSCRN+2~, LKUPSCRN+7*, LKUPSCRN+8, LKUPSCRN+9, MCD+22~, MCD+26*, MCD+27, RUST+5~, RUST+10*, RUST+11 |
| LOOP | MCD+22~, MCD+29*, MCD+34, RUST+5~, RUST+13*, RUST+16 |
| MCD | MCD+6~, MCD+14*, MCD+15 |
| RET | LKUPSCRN+2~, LKUPSCRN+3*, LKUPSCRN+5, LKUPSCRN+6, LKUPSCRN+8, LKUPSCRN+9, LKUPSCRN+10*, LKUPSCRN+11, MCD+22~, MCD+23* , MCD+25, MCD+26, MCD+28, MCD+29*, MCD+30, MCD+36, RUST+5~, RUST+7*, RUST+13*, RUST+14 |
| SCREEN | MCD+6~, MCD+13*, MCD+14 |
| STATION | LKUPSCRN+2~, LKUPSCRN+4*, LKUPSCRN+5, LKUPSCRN+6, LKUPSCRN+7, MCD~, MCD+14, MCD+25, MCD+26, RUST~ , RUST+6, RUST+7, RUST+9, RUST+10, RUST+12, RUST+14 |
| U | MCD+27, MCD+29, MCD+34, RUST+11, RUST+13, RUST+16 |
| WL | MCD+22~, MCD+27*, MCD+28, MCD+29, RUST+5~, RUST+11*, RUST+12, RUST+13 |
| X | MCD+33~, MCD+34* |
| Y | LKUPSCRN~, LKUPSCRN+4, MCD+33~, MCD+36, MCD+37 |
