IBAMTV ;ALB/CPM - BACK-BILLING SUPPORT FOR IVM ; 31-MAY-94
Source file <IBAMTV.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 |
|---|---|---|
| END | ||
| CANC | ; Cancel Means Test charges if an IVM-verified Means Test is deleted.
; Input: DFN -- Pointer to the patient in file #2 ; DGMTP -- Zeroth node of previous MT in file #408.31 ; DGMTA -- Zeroth node of verified MT in file #408.31 |
|
| CANBULL | ; Generate the cancellation bulletin.
|
|
| ADJCL | ; Roll back the billing clock for cancelled charges.
; Input: IBX -- Zeroth node of charge which has been cancelled. ; DFN -- Pointer to the patient in file #2 |
|
| UPD | ; Update user and edit date on the Billing Clock.
|
| Name | Field # of Occurrence |
|---|---|
| NOW^%DTC | UPD+1 |
| $$BIL^DGMTUB | CANC+17 |
| SEND^IBACVA2 | IBAMTV+32, CANBULL+10 |
| PAT^IBAERR1 | IBAMTV+27, CANBULL+5 |
| CARE^IBAMTV1 | IBAMTV+14 |
| $$OLDCL^IBAMTV2 | ADJCL+6 |
| BLD^IBAMTV2 | IBAMTV+17 |
| $$CHECK^IBECEAU | CANC+5 |
| $$LAST^IBECEAU | CANC+14, CANC+19 |
| CANCH^IBECEAU4 | CANC+18 |
| $$PT^IBEFUNC | IBAMTV+22, CANBULL+1 |
| $$DAT1^IBOUTL | CANBULL+9 |
| $$FMADD^XLFDT | IBAMTV+10, IBAMTV+11, CANC+8 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IB - [#350] | CANC+11, CANC+14, CANC+19 |
| ^IB("AF" | CANC+10 |
| ^IB("AFDT" | CANC+9 |
| ^IB("AJ" | IBAMTV+20 |
| ^IBE(350.1 - [#350.1] | CANC+15, CANC+20, ADJCL+10, ADJCL+15 |
| ^IBE(350.3 - [#350.3] | CANC+6 |
| ^IBE(351 - [#351] | ADJCL+7, ADJCL+12*, ADJCL+18*, ADJCL+19*, UPD+1* |
| ^TMP("IBAMTV" | IBAMTV+17, END! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | UPD+1 |
| >> DFN | IBAMTV+20, IBAMTV+22, CANC+9, CANC+17, CANBULL+1, ADJCL+6 |
| >> DGMTA | IBAMTV+9, CANC+8, CANBULL+9 |
| DT | IBAMTV+9, IBAMTV+11, CANC+8 |
| DUZ | IBAMTV+27, CANC+7, CANBULL+5, UPD+1 |
| IBAP | ADJCL+4~, ADJCL+17*, ADJCL+18, ADJCL+19 |
| >> IBC | IBAMTV+26*, IBAMTV+28*, IBAMTV+29*, IBAMTV+30*, IBAMTV+31*, CANBULL+4*, CANBULL+6*, CANBULL+7*, CANBULL+8*, CANBULL+9* |
| IBCHG | ADJCL+4~, ADJCL+16*, ADJCL+17, ADJCL+18*, ADJCL+19* |
| IBCL | ADJCL+4~, ADJCL+6*, ADJCL+7, ADJCL+12, ADJCL+18, ADJCL+19, UPD+1 |
| IBCLD | ADJCL+4~, ADJCL+7*, ADJCL+11, ADJCL+17 |
| IBCLDAY | ADJCL+4~, ADJCL+11*, ADJCL+12 |
| IBCLP | ADJCL+4~, ADJCL+17*, ADJCL+18, ADJCL+19 |
| IBCRES | CANC+6*, CANC+7*, CANC+18, CANC+23! |
| IBDA | CANC+10*, CANC+11, CANC+13, CANC+14, CANC+15, CANC+19, CANC+20, CANC+23! |
| IBDUZ | IBAMTV+27*, END!, CANC+7*, CANC+23!, CANBULL+5*, CANBULL+11! |
| IBEND | IBAMTV+10*, IBAMTV+11*, END!, CANC+8*, CANC+9, CANC+16, CANC+23! |
| IBFOUND | CANC+7*, CANC+20*, CANC+22, CANC+23! |
| IBJOB | CANC+7*, CANC+23! |
| IBN | CANC+14*, CANC+15, CANC+18, CANC+19*, CANC+20, CANC+23! |
| IBND | CANC+14*, CANC+15, CANC+16, CANC+17, CANC+19*, CANC+20, CANC+23! |
| IBND1 | CANC+14*, CANC+23! |
| IBORIG | CANC+14*, CANC+19, CANC+23! |
| >> IBPT | IBAMTV+22*, CANBULL+1* |
| IBST | CANC+8*, CANC+16, CANC+23! |
| IBSTART | IBAMTV+9*, IBAMTV+10, END! |
| IBT | IBAMTV+22!, CANBULL+1! |
| IBT( | IBAMTV+28*, IBAMTV+29*, IBAMTV+30*, IBAMTV+31*, CANBULL+6*, CANBULL+7*, CANBULL+8*, CANBULL+9* |
| IBT(1 | IBAMTV+24*, CANBULL+3* |
| IBT(2 | IBAMTV+25*, CANBULL+4* |
| IBT(3 | IBAMTV+26* |
| IBUN | ADJCL+4~, ADJCL+11*, ADJCL+12 |
| IBWHER | CANC+7*, CANC+23! |
| IBX | CANC+11*, CANC+12, CANC+13, CANC+15, CANC+19*, CANC+20, CANC+23!, ADJCL+5, ADJCL+6, ADJCL+10 , ADJCL+11, ADJCL+15, ADJCL+16 |
| IBZ | CANC+9*, CANC+23! |
| IBZ1 | CANC+9*, CANC+10, CANC+23! |
| >> XMSUB | IBAMTV+23*, CANBULL+2* |
