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* |