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