IBACVA2 ;ALB/CPM - BULLETINS FOR CHAMPVA BILLING ; 29-JUL-93
Source file <IBACVA2.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 2 | (ERR,MAIL,PAT)^IBAERR1 $$PT^IBEFUNC |
VA FileMan | 1 | DD^%DT |
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 |
---|---|---|
ERRMSG(IBIND,IBMSG) | ; Process CHAMPVA/TRICARE Error Messages.
; Input: IBIND -- 1=>billing 0=>canceling ; IBMSG -- 1=>CHAMPVA msg 2=> TRICARE msg |
|
ADM | ; Send a bulletin when CHAMPVA patients are admitted.
|
|
WARN(IBB,IBE) | ; Send bulletins when discharges are edited or deleted.
; Input: IBB -- Discharge date before edit ; IBE -- Discharge date after edit |
|
DEL(DFN,IBN,IBADM) | ; Send bulletins when billed admissions are deleted.
; Input: DFN -- Pointer to the patient in file #2 ; IBN -- Pointer to the cancelled charge in file #350 ; IBADM -- Admission date/time |
|
SEND | ; Send bulletin to recipients of the Means Test billing mailgroup.
|
|
ON() | ; Is the CHAMPVA billing module fully installed?
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IB - [#350] | DEL+14 |
^IBE(350.1 - [#350.1] | ON+1, ON+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | ERRMSG+3, ADM+1, WARN+3, DEL~, DEL+4 |
>> DGPMA | ADM+6 |
DUZ | ERRMSG+9, ADM+5, WARN+7, DEL+8 |
IBADM | DEL~, DEL+10 |
IBB | WARN~, WARN+10 |
IBC | ERRMSG+8*, ERRMSG+12*, ERRMSG+13*, ERRMSG+14*, ERRMSG+16*, ERRMSG+17*, ERRMSG+18*, ERRMSG+19*, ADM+4*, ADM+7* , ADM+8*, ADM+9*, ADM+10*, WARN+6*, WARN+8*, WARN+10*, WARN+11*, WARN+12*, WARN+13*, WARN+14* , WARN+15*, DEL+7*, DEL+9*, DEL+11*, DEL+12*, DEL+13*, DEL+14*, DEL+15*, SEND+2! |
>> IBDUZ | ERRMSG+9*, ADM+5*, WARN+7*, DEL+8* |
IBE | WARN~, WARN+5, WARN+9, WARN+11 |
IBIND | ERRMSG~, ERRMSG+6, ERRMSG+7 |
IBMSG | ERRMSG~, ERRMSG+4 |
IBMSGT | ERRMSG+4*, ERRMSG+6, SEND+2! |
IBN | DEL~, DEL+14 |
IBPT | ERRMSG+3*, ERRMSG+5, ADM+1*, ADM+2, WARN+3*, WARN+4, DEL+4*, DEL+5, SEND+2! |
IBT | ERRMSG+3!, ADM+1!, WARN+3!, DEL+4!, SEND+2! |
IBT( | ERRMSG+12*, ERRMSG+13*, ERRMSG+14*, ERRMSG+16*, ERRMSG+17*, ERRMSG+18*, ERRMSG+19*, ADM+7*, ADM+8*, ADM+9* , ADM+10*, WARN+8*, WARN+10*, WARN+11*, WARN+12*, WARN+13*, WARN+14*, WARN+15*, DEL+9*, DEL+11* , DEL+12*, DEL+13*, DEL+14*, DEL+15* |
IBT(1 | ERRMSG+6*, ADM+3*, WARN+5*, DEL+6* |
IBT(2 | ERRMSG+7*, ADM+4*, WARN+6*, DEL+7* |
IBT(3 | ERRMSG+8* |
X | ON+1~*, ON+2 |
XMDUZ | SEND+2! |
XMSUB | ERRMSG+5*, ADM+2*, WARN+4*, DEL+5*, SEND+2! |
XMTEXT | SEND+2! |
XMY | SEND+2! |
>> Y | ADM+6*, ADM+7, WARN+10*, WARN+11*, DEL+10*, DEL+11 |