IBARXEU ;AAS/ALB - RX EXEMPTION UTILITY ROUTINE ; 2-NOV-92
Source file <IBARXEU.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 1 | ($$ACODE,$$IBX,$$LST,$$ON,$$PLUS,$$REASON,$$TEXT)^IBARXEU0 |
VA Fileman | 1 | DT^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
STDATE() | ; -- legislative start date for income exemption
|
|
RXST(DFN,IBDT) | ; -- Check rx income exemption status of patient
|
|
RXSTQ | ||
ACTIVEQ | ||
ACTIVE(IBZ) | ; -- SCREEN for active field of billing exemptions file
|
|
DISPQ | ||
DISP(DFN,IBDT,NO,NULL) | ; -- formats text to display
|
|
Name | Field # of Occurrence |
---|---|
DT^DIQ | DISP+15 |
$$ACODE^IBARXEU0 | RXST+31, RXST+47, RXST+54 |
$$IBX^IBARXEU0 | RXST+25 |
$$LST^IBARXEU0 | RXST+30, RXST+37 |
$$ON^IBARXEU0 | RXST+11, DISP+11 |
$$PLUS^IBARXEU0 | RXST+25, RXST+29, RXST+45, RXST+52 |
$$REASON^IBARXEU0 | RXST+31, RXST+47, RXST+54 |
$$TEXT^IBARXEU0 | RXST+31, RXST+47, RXST+54 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBA(354 - [#354] | RXST+21 |
^IBA(354.1 - [#354.1] | RXST+21, ACTIVE+7, ACTIVE+8 |
^IBE(354.2 - [#354.2] | RXST+46, RXST+53 |
Name | Line Occurrences |
---|---|
$$RXST | DISP+10 |
$$STDATE | RXST+18 |
ACTIVEQ | ACTIVE+6 |
DISPQ | DISP+12, DISP+13, DISP+14 |
RXSTQ | RXST+18, RXST+21, RXST+25, RXST+34 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DA | ACTIVE+7, ACTIVE+9 |
DFN | RXST~, RXST+21, RXST+25, RXST+30, RXST+37, DISP~, DISP+10 |
DT | RXST+14, RXST+15, DISP+6, DISP+8 |
IBDT | RXST~, RXST+14*, RXST+15*, RXST+18, RXST+25, RXST+29, RXST+30, RXST+34, RXST+37, RXST+45 , RXST+52, DISP~, DISP+6*, DISP+8*, DISP+10 |
IBON | RXST+9~, RXST+11*, DISP+11* |
>> IBTALK | ACTIVE+10 |
IBX | RXST+9~, RXST+13*, RXST+18*, RXST+21*, RXST+25*, RXST+31*, RXST+41*, RXST+47*, RXST+54*, RXSTQ , ACTIVE+3~, ACTIVE+7*, ACTIVE+8 |
IBY | ACTIVE+3~, ACTIVE+8*, ACTIVE+9 |
IBZ | ACTIVE~, ACTIVE+5*, ACTIVE+6 |
NO | DISP~, DISP+9*, DISP+13, DISP+14 |
NULL | DISP~, DISP+7*, DISP+12 |
T | ACTIVE+3~, ACTIVE+4*, ACTIVE+6*, ACTIVE+9*, ACTIVEQ |
U | RXST+25, RXST+29 |
X | RXST+9~, RXST+21*, RXST+25, RXST+29, RXST+31, RXST+34, RXST+46*, RXST+47, RXST+53*, RXST+54 , DISP+10*, DISP+11*, DISP+12, DISP+13, DISP+14, DISP+15 |
Y | RXST+9~, RXST+30*, RXST+31, RXST+37*, RXST+40, RXST+45, RXST+46, RXST+47, RXST+52, RXST+53 , RXST+54, DISP+15* |