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 |