IBCNSMR ;ALB/AAS - MEDICARE BILLS ; 02-SEPT-97
Source file <IBCNSMR.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 |
|---|---|---|
| DQ | ; -- entry point from task manager
|
|
| END | ||
| BLDDATA | ; -- for each bill sent to a selected ins. co. build temp node
|
|
| COUNT | ; -- set totals for all ins, and by ins co.
|
|
| PROC(IBI) | ; -- does bill have any procedures
|
|
| DIAG(IBI) | ; -- does bill have any diagnosis
|
|
| SET | ; -- set up tmp global
|
|
| STOP() | ; -- determine if user requested task to stop
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | DQ+9, DQ+12, DQ+13, DQ+14, DQ+15, BLDDATA+21, PROC+3 |
| ^DGCR(399.3 - [#399.3] | BLDDATA+17 |
| ^DIC(36 - [#36] | DQ+19 |
| ^DPT - [#2] | BLDDATA+12 |
| ^IBA(362.3 - [#362.3] | DIAG+3 |
| ^IBA(362.4 - [#362.4] | BLDDATA+25 |
| ^IBA(362.5 - [#362.5] | BLDDATA+26 |
| ^IBE(350.9 - [#350.9] | DQ+6 |
| ^PRCA(430 - [#430] | BLDDATA+20 |
| ^TMP("IB-MRA" | DQ+3!, SET+24* |
| ^TMP("IB-MRA-CNT" | DQ+3!, SET+26*, SET+28*, SET+31*, SET+32* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ALIVE | BLDDATA+1~, BLDDATA+12* |
| ARSTAT | BLDDATA+1~, BLDDATA+10*, COUNT+66, SET+24, SET+26, SET+28, SET+31, SET+32 |
| BILLNO | BLDDATA+1~, BLDDATA+3*, SET+24 |
| BOTH | BLDDATA+1~, BLDDATA+22*, COUNT+32*, COUNT+41*, COUNT+50*, COUNT+57, COUNT+64, SET+24, SET+26, SET+28 , SET+31, SET+32 |
| CNT | DQ+1~, COUNT+1* |
| CNT("B" | COUNT+51*, COUNT+52*, COUNT+54*, COUNT+55* |
| CNT("C" | COUNT+67*, COUNT+68*, COUNT+71*, COUNT+72* |
| CNT("D" | COUNT+34*, COUNT+35*, COUNT+37*, COUNT+38* |
| CNT("F" | COUNT+91*, COUNT+92*, COUNT+95*, COUNT+96* |
| CNT("IN" | COUNT+6*, COUNT+7*, COUNT+9*, COUNT+10* |
| CNT("M" | SET+1*, SET+3*, SET+4*, SET+6*, SET+7*, SET+9*, SET+10*, SET+12*, SET+13*, SET+15* , SET+16*, SET+18*, SET+19*, SET+21*, SET+22* |
| CNT("N" | COUNT+58*, COUNT+59*, COUNT+61*, COUNT+62* |
| CNT("OP" | COUNT+12*, COUNT+13*, COUNT+15*, COUNT+16* |
| CNT("P" | COUNT+43*, COUNT+44*, COUNT+46*, COUNT+47* |
| CNT("R" | COUNT+115*, COUNT+116*, COUNT+119*, COUNT+120* |
| CNT("T" | COUNT+75*, COUNT+76*, COUNT+79*, COUNT+80* |
| CNT("W" | COUNT+83*, COUNT+84*, COUNT+87*, COUNT+88* |
| CNT("X" | COUNT+99*, COUNT+100*, COUNT+103*, COUNT+104* |
| CNT("Z" | COUNT+107*, COUNT+108*, COUNT+111*, COUNT+112* |
| CNT(0 | COUNT+2* |
| CNT(1 | COUNT+18* |
| CNT(2 | COUNT+19* |
| CNT(3 | COUNT+3*, COUNT+4*, COUNT+20*, COUNT+21* |
| DATEPR | BLDDATA+1~, BLDDATA+21*, COUNT+90 |
| DFN | BLDDATA+1~, BLDDATA+11*, BLDDATA+12, SET+24 |
| DIAG | BLDDATA+1~, BLDDATA+8*, COUNT+31, COUNT+40, COUNT+49, DIAG+1~, DIAG+2*, DIAG+3*, DIAG+4*, DIAG+5 |
| I | DQ+1~, DQ+5*, DQ+6* |
| IBI | DQ+1~, DQ+8*, DQ+9*, DQ+12, DQ+13, DQ+14, DQ+15, BLDDATA+7, BLDDATA+8, BLDDATA+10 , BLDDATA+13, BLDDATA+19, BLDDATA+20, BLDDATA+21, BLDDATA+25, BLDDATA+26, PROC~, PROC+3, DIAG~, DIAG+3 , SET+24 |
| IBINSCO | DQ+1~, DQ+11*, DQ+16*, DQ+17*, DQ+18*, DQ+19, SET+24, SET+26, SET+28, SET+31 , SET+32 |
| IBINSNM | DQ+1~, DQ+19*, COUNT+3, COUNT+4, COUNT+20, COUNT+21 |
| IBNM | DQ+1~ |
| IBQUIT | DQ+2*, DQ+9, DQ+10*, DQ+21, BLDDATA+1~, BLDDATA+2*, BLDDATA+28, COUNT+33*, COUNT+42*, COUNT+64* , COUNT+69*, COUNT+77*, COUNT+85*, COUNT+93*, COUNT+101*, COUNT+109*, COUNT+117* |
| IBSTAT | BLDDATA+1~, BLDDATA+9*, COUNT+66, COUNT+90, SET+24, SET+26, SET+28, SET+31, SET+32 |
| INSCO | DQ+1~ |
| INSCO( | DQ+6*, DQ+16, DQ+17, DQ+18 |
| J | DQ+1~ |
| LOCCARE | BLDDATA+1~, BLDDATA+14* |
| NODE | DQ+1~, DQ+11! |
| NODE("C" | DQ+13*, PROC+4, DIAG+4 |
| NODE("M" | DQ+14*, DQ+16, DQ+17, DQ+18 |
| NODE("U" | DQ+15*, BLDDATA+4 |
| NODE(0 | DQ+12*, BLDDATA+3, BLDDATA+5, BLDDATA+9, BLDDATA+11, BLDDATA+14, BLDDATA+15, BLDDATA+16, BLDDATA+18 |
| ORGAMNT | BLDDATA+1~, BLDDATA+13*, COUNT+2, COUNT+4, COUNT+7, COUNT+13, COUNT+35, COUNT+44, COUNT+52, COUNT+59 , COUNT+68, COUNT+76, COUNT+84, COUNT+92, COUNT+100, COUNT+108, COUNT+116, SET+1, SET+4, SET+13 , SET+19, SET+28 |
| PROC | BLDDATA+1~, BLDDATA+7*, COUNT+31, COUNT+40, COUNT+49, PROC+1~, PROC+2*, PROC+3*, PROC+4*, PROC+5 |
| PROSBILL | BLDDATA+1~, BLDDATA+24*, BLDDATA+26*, COUNT+106 |
| RATETYP | BLDDATA+1~, BLDDATA+16*, BLDDATA+17 |
| REFGC | BLDDATA+1~, BLDDATA+20*, SET+2 |
| RN | BLDDATA+1~, BLDDATA+17*, COUNT+114 |
| RXBILL | BLDDATA+1~, BLDDATA+23*, BLDDATA+25*, COUNT+98 |
| TIMEFRM | BLDDATA+1~, BLDDATA+18* |
| TOTPAID | BLDDATA+1~, BLDDATA+19*, COUNT+8, COUNT+10, COUNT+14, COUNT+16, COUNT+17, COUNT+19, COUNT+21, COUNT+36 , COUNT+38, COUNT+45, COUNT+47, COUNT+53, COUNT+55, COUNT+60, COUNT+62, COUNT+70, COUNT+72, COUNT+78 , COUNT+80, COUNT+86, COUNT+88, COUNT+94, COUNT+96, COUNT+102, COUNT+104, COUNT+110, COUNT+112, COUNT+118 , COUNT+120, SET+5, SET+7, SET+8, SET+10, SET+14, SET+16, SET+20, SET+22, SET+30 , SET+32 |
| TYPE | BLDDATA+1~, BLDDATA+6*, COUNT+5, COUNT+11, SET+11, SET+17, SET+24, SET+26, SET+28, SET+31 , SET+32 |
| TYPENO | BLDDATA+1~, BLDDATA+5*, BLDDATA+6, COUNT+74 |
| WHO | BLDDATA+1~, BLDDATA+15*, COUNT+82 |
| X | DQ+1~, BLDDATA+1~ |
| Y | DQ+1~ |
| YEAR | BLDDATA+1~, BLDDATA+4*, SET+24, SET+26, SET+28, SET+31, SET+32 |
| >> ZTQUEUED | STOP+1 |
| ZTREQ | STOP+1! |
| >> ZTSTOP | STOP+1*, STOP+2 |
