IBARXEU3 ;ALB/AAS - RX COPAY EXEMPTION PROCESS AR CANCELS ; 8-JAN-93
Source file <IBARXEU3.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 |
|---|---|---|
| CANCEL | ; Cancel Rx copay charges when veteran becomes exempt.
; Required variable input: ; DFN -- Pointer to the patient in file #2 ; IBSTAT -- patient is non-exempt (0) or exempt (1) ; IBEVTA -- Zeroth node in #354.1 of CURRENT exemption ; IBEVTP -- Zeroth node in #354.1 of PRIOR exemption |
|
| CANCELQ | ||
| BILL | ; -- process cancelling one bill
|
|
| CANRX | ; -- do actual cancellation without calling ar
; input : iblast := last entry for parnt ; ibparnt := parent charge ; ibnd := ^(0) node of iblast |
|
| CANRXQ |
| Name | Field # of Occurrence |
|---|---|
| $$LST^DGMTCOU1 | CANCEL+29 |
| ^DIE | CANRX+24 |
| IX^DIK | CANRX+18 |
| $$STDATE^IBARXEU | CANCEL+37 |
| $$ACODE^IBARXEU0 | CANCEL+15, CANCEL+22 |
| $$LST^IBARXEU0 | CANCEL+22, CANCEL+38 |
| $$PLUS^IBARXEU0 | CANCEL+26 |
| ARCAN^IBARXEU4 | CANCEL+59 |
| ADD^IBAUTL | CANRX+15 |
| ARPARM^IBAUTL | CANCEL+52 |
| $$LAST^IBECEAU | BILL+12 |
| $$FMADD^XLFDT | CANCEL+39 |
| $$FMDIFF^XLFDT | CANCEL+30 |
| FileNo | Call Tags |
|---|---|
| ^IB - [#350] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.31 - [#408.31] | CANCEL+29 |
| ^IB - [#350] | BILL+1, BILL+7, BILL+11, BILL+14, CANRX+5, CANRX+6, CANRX+8, CANRX+11, CANRX+12, CANRX+13 , CANRX+16* |
| ^IB("AC" | CANRX+17! |
| ^IB("APTDT" | CANCEL+49, CANCEL+55, CANCEL+56 |
| ^IBA(354.1 - [#354.1] | CANCEL+42 |
| ^IBE(350.1 - [#350.1] | BILL+14, CANRX+5, CANRX+8, CANRX+9, CANRX+10 |
| ^IBE(350.3 - [#350.3] | BILL+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | CANRX+18*, CANRX+24*! |
| >> DFN | CANCEL+22, CANCEL+29, CANCEL+38, CANCEL+42, CANCEL+49, CANCEL+55, CANCEL+56, CANCEL+59, CANRX+16 |
| DIE | CANRX+24*! |
| >> DIK | CANRX+18* |
| DR | CANRX+24*! |
| DT | CANCEL+39 |
| DUZ | CANRX+6 |
| IBAFY | CANCEL+7~ |
| IBANVD | CANCEL+9~, CANCEL+26*, CANCEL+30 |
| >> IBARCAN | CANCEL+59* |
| IBATYP | CANCEL+7~, CANRX+8*, CANRX+9, CANRX+10, CANRX+16 |
| >> IBBDT | CANCEL+36*, CANCEL+37*, CANCEL+43*, CANCEL+46, CANCEL+49, CANCEL+54, CANCEL+59, BILL+8 |
| IBCHRG | CANCEL+7~, CANRX+13*, CANRX+16 |
| IBCODA | CANCEL+7~, CANCEL+15*, CANCEL+16 |
| IBCODP | CANCEL+7~, CANCEL+15*, CANCEL+19 |
| IBCODVL | CANCEL+9~, CANCEL+22*, CANCEL+23 |
| IBCRES | CANCEL+8~, BILL+16*, CANRX+16, CANRX+24 |
| >> IBDATE | CANCEL+54*, CANCEL+55*, CANCEL+56 |
| IBDT | CANCEL+7~ |
| >> IBDUZ | CANRX+6*, CANRX+16 |
| IBEDT | CANCEL+7~, CANCEL+39*, CANCEL+46, CANCEL+49, CANCEL+55, CANCEL+59, BILL+8 |
| IBERR | CANCEL+8~ |
| >> IBEVTA | CANCEL+15, CANCEL+29, CANCEL+36, CANCEL+39 |
| >> IBEVTP | CANCEL+15, CANCEL+22, CANCEL+36 |
| IBFAC | CANCEL+8~, CANRX+16 |
| IBFIL | CANCEL+9~, CANCEL+29*, CANCEL+30 |
| IBFOUND | CANCEL+8~, CANCEL+54*, CANCEL+59, CANRX+19* |
| IBIL | CANCEL+8~, CANRX+11*, CANRX+16 |
| IBL | CANCEL+8~ |
| IBLAST | CANCEL+8~, BILL+12*, BILL+14, CANRX+5, CANRX+6 |
| IBLDT | CANCEL+8~ |
| IBN | CANCEL+8~, CANRX+16, CANRX+17, CANRX+18 |
| IBND | CANCEL+8~, CANRX+6*, CANRX+12, CANRX+13, CANRX+16 |
| IBNN | CANCEL+8~, CANCEL+56*, BILL+1 |
| IBNOW | CANCEL+8~ |
| >> IBPARDT | BILL+7*, BILL+8 |
| IBPARNT | CANCEL+9~, BILL+5*, BILL+7, BILL+11*, BILL+12, CANRX+8, CANRX+11, CANRX+12, CANRX+13, CANRX+16 , CANRX+24 |
| IBPARNT1 | CANCEL+9~, BILL+11* |
| IBSEQNO | CANCEL+9~, CANRX+10* |
| IBSITE | CANCEL+7~ |
| >> IBSTAT | CANCEL+12, CANCEL+59 |
| IBUNIT | CANCEL+9~, CANRX+12*, CANRX+16 |
| IBVLAST | CANCEL+9~, CANCEL+22*, CANCEL+26 |
| IBXX | CANCEL+7~, CANCEL+38*, CANCEL+39 |
| >> X | CANCEL+42*, CANCEL+43, CANCEL+49*, BILL+1*, BILL+2, BILL+5 |
| >> Y | CANCEL+52*, CANRX+15 |
