IBRFN1 ;ALB/CPM - PASS PATIENT STATEMENT DATA TO A/R ; 24-FEB-93
Source file <IBRFN1.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 3 | ^%DT (,C)^%DTC $$GET1^DIQ |
Outpatient Pharmacy | 1 | EN^PSOCPVW |
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 |
Package | Total | Caller Graph |
---|---|---|
Accounts Receivable | 4 | PRCAPRO RCCPCPS1 RCDPBPLI RCDPTPLI |
Name | Comments | DBIA/ICR reference |
---|---|---|
STMT(TRAN) | ; Pass clinical data to AR for the patient statement.
; Input: TRAN -- AR Transaction number (ptr to #433) ; Returns: ^TMP("IBRFN1",$J,n)=1^2^3^4^5^6^7^8 , where |
|
RX | ; Build array element for Pharmacy Co-pay charges.
|
|
INP | ; Build array element for inpatient charges.
|
|
STMTB(BILL) | ; AR Patient Statement Entry point for CHAMPVA Subsistence
; Input: BILL -- AR Bill number (field #.01 value of #430) ; Returns: Same output as described above in the Pharmacy ; and inpatient columns. |
FileNo | Call Tags |
---|---|
^IBE(350.1 - [#350.1] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPM - [#405] | INP+3, INP+5 |
^DGPT - [#45] | INP+7, INP+9 |
^IB - [#350] | STMT+22, STMT+28, STMTB+8, STMTB+12 |
^IB("ABIL" | STMTB+7 |
^IB("AT" | STMT+21 |
^IBE(350.1 - [#350.1] | STMT+25, STMTB+9 |
^TMP("IBRFN1" | STMT+19!, STMT+26*, STMT+27*, STMT+31*, RX+7*, INP+14*, STMTB+5!, STMTB+11*, STMTB+15* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | RX+1~, RX+6* |
BILL | STMTB~, STMTB+5, STMTB+7 |
I | RX+1~, RX+4* |
IBADM | INP+1~, INP+4*, INP+8*, INP+14 |
IBAT | STMTB+6~, STMTB+9*, STMTB+11 |
IBATYP | STMT+20~, STMT+24*, STMT+25 |
IBATYPN | STMT+20~, STMT+24*, STMT+27 |
IBBG | STMT+20~, STMT+25*, STMT+26, STMT+27, INP+13, STMTB+6~, STMTB+9* |
IBCHG | STMT+20~, STMT+22*, STMT+26, STMT+27, STMT+31, RX+7, INP+14, STMTB+6~, STMTB+8*, STMTB+11 , STMTB+15 |
IBDIS | INP+1~, INP+5*, INP+9*, INP+14 |
IBFILL | RX+1~, RX+2*, RX+3, RX+5 |
IBFR | INP+1~, INP+11*, INP+13, INP+14 |
IBJ | STMT+20~, STMT+21*, STMT+26, STMT+27, STMT+31, RX+7, INP+14, STMTB+6~, STMTB+9*, STMTB+11 , STMTB+15 |
IBN | STMT+20~, STMT+21*, STMT+22, STMTB+6~, STMTB+7*, STMTB+8 |
IBND | STMT+20~, STMT+22*, STMT+24, STMT+26, STMT+27, STMT+28, STMT+31, RX+4, INP+11, INP+13 , INP+14, STMTB+6~, STMTB+8*, STMTB+9, STMTB+11, STMTB+12, STMTB+15 |
IBPE | STMT+20~, STMT+28*, STMT+29, INP+4, INP+8, STMTB+6~, STMTB+12*, STMTB+13 |
IBRX | RX+1~, RX+2*, RX+3, RX+4 |
IBSL | STMT+20~, STMT+22*, STMT+23, STMT+29*, STMT+30, RX+2, INP+2, INP+3, INP+6, INP+7 , STMTB+6~, STMTB+8*, STMTB+10, STMTB+13*, STMTB+14 |
IBTO | INP+1~, INP+11*, INP+13*, INP+14 |
PM | INP+1~, INP+3*, INP+7*, INP+9 |
PM0 | INP+1~, INP+3*, INP+4, INP+5, INP+7*, INP+8 |
PSOFILL | RX+1~ |
PSONTALK | RX+1~, RX+3* |
PSORX0 | RX+1~ |
PSORX1 | RX+1~ |
PSORXN | RX+1~ |
PSOTMP | RX+1~ |
PSOTMP( | RX+5 |
PSOTMP(52 | RX+4 |
TRAN | STMT~, STMT+19, STMT+21 |
U | STMT+22, STMT+24, STMT+25, STMT+26, STMT+27, STMT+28, STMT+29, STMT+31 |
VA | RX+1~ |
VAERR | RX+1~ |
X | RX+1~, RX+3*, RX+6*, INP+1~, INP+13 |
X1 | INP+1~, INP+13* |
X2 | INP+1~, INP+13* |
Y | RX+1~, RX+6 |
Z | RX+1~, RX+4*, RX+5*, RX+6*, RX+7 |