Call Graph
Call Graph Total: 4
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 3 | $$VFAOK^IBARXEU ($$LST,$$PLUS)^IBARXEU0 $$MTCOMP^IBARXEU5 |
| Registration | 1 | ($$AUTOINFO,$$LST)^DGMTCOU1 |
IBARXEU1 ;ALB/AAS - RX EXEMPTION UTILITY ROUTINE (CONT.);3/27/07 3:10pm ; 31 Jan 2019 3:51 PM
Source file <IBARXEU1.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 3 | $$VFAOK^IBARXEU ($$LST,$$PLUS)^IBARXEU0 $$MTCOMP^IBARXEU5 |
| Registration | 1 | ($$AUTOINFO,$$LST)^DGMTCOU1 |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STATUS(DFN,IBDT) | ; -- Determine medication copayment exemption status
; -- requests data from MAS |
|
| STATUSQ | ||
| AUTOST(DFN,IBDT) | ; -- Determine automatically exempt patients.
; input : dfn = patient file pointer ; ibdt = internal form of effective date |
|
| AUTOSTQ | ||
| INCST(DFN,IBDT) | ; -- return medication copayment exemption reason/date
; -- ask mas for income data |
|
| INCSTQ | ||
| INCDT(IBDATA) | ; -- calcualtes copay exemption status based on income
; and net worth ; input := zeroth node from 408.31 ; output := 1 = exempt ^date of test^ exemption reason ; 2 = non-exempt^... ; 3 = pending adjudication (if active)^... |
|
| NO | ; -- not enough information
|
|
| INCDTQ | ||
| THRES(DATE,TYPE,DEPEND) | ; -- return threshold amount
|
|
| THRESQ | ||
| NETW() | ; -- use networth in determining copay exemptions - specs keep changing
; returns 1 if should use networth in exemption determination ; returns 0 if should not use networth in exemption |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.31 - [#408.31] | INCST+6, INCST+15, INCST+17 |
| ^IBA(354 - [#354] | INCST+17 |
| ^IBE(354.2 - [#354.2] | AUTOSTQ+1, INCST+9, INCDTQ |
| ^IBE(354.3 - [#354.3] | THRES+14 |
| Name | Field # of Occurrence |
|---|---|
| ^( | THRES+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLN | INCST+5~, INCST+14*, INCST+15*, INCST+17 |
| CONV | INCST+5~, INCST+11, INCST+14*, INCST+15, INCST+17* |
| DATE | THRES~, THRES+10*, THRES+14, THRES+19 |
| DEPEND | THRES~, THRES+16*, THRES+22, THRES+23 |
| DFN | STATUS~, STATUS+7, STATUS+9, AUTOST~, AUTOST+17, INCST~, INCST+6, INCST+9, INCST+14, INCST+17 , INCDT+8~* |
| DGMT | INCST+5~, INCST+14*, INCST+15, INCST+17 |
| DT | STATUS+6, AUTOST+9 |
| I | AUTOST+7~, AUTOST+18* |
| IBDATA | INCST+5~, INCST+6*, INCST+9, INCST+11, INCST+19, INCST+20, INCDT~, INCDT+8, INCDT+14, INCDT+16 , INCDT+17, INCDT+18, INCDTQ |
| IBDEPEN | INCDT+7~, INCDT+18*, INCDT+22 |
| IBDT | STATUS~, STATUS+6*, STATUS+7, STATUS+9, AUTOST~, AUTOST+9*, AUTOSTQ+1, INCST~, INCST+6, INCST+9 , INCST+14, INCDT+7~, INCDT+16*, INCDT+22, INCDT+31 |
| IBEXMT | AUTOST+7~, AUTOST+8*, AUTOST+17*, AUTOST+18 |
| IBEXREA | AUTOST+7~, AUTOST+8*, AUTOST+18*, AUTOST+24*, AUTOST+25*, AUTOSTQ, AUTOSTQ+1, INCDT+7~, INCDT+9*, INCDT+14* , INCDT+25*, INCDT+26*, INCDT+33*, NO+1*, NO+3, NO+4, INCDTQ |
| IBINCOM | INCDT+7~, INCDT+17*, INCDT+26, INCDT+33 |
| IBLEVEL | INCDT+7~, INCDT+22*, INCDT+23, INCDT+26, THRES+11~, THRES+12*, THRES+22*, THRES+23*, THRESQ |
| IBNETW | INCDT+7~, INCDT+18*, INCDT+33 |
| IBPRIOR | INCDT+23*, THRES+11~, THRES+12*, THRES+19*, THRESQ |
| IBTABLE | INCDT+7~, THRES+11~, THRES+14*, THRES+15, THRES+19, THRES+22, THRES+23, THRESQ |
| IBTHRES | INCDT+7~, INCDT+31*, INCDT+33 |
| TYPE | THRES~, THRES+14, THRES+16 |
| U | INCST+11 |
| X | STATUS+5~, STATUS+7*, STATUS+8, STATUS+9*, STATUSQ, INCST+5~, INCST+9*, INCST+17*, INCST+19*, INCST+20* , INCSTQ, INCDT+7~, INCDT+14* |
| Y | STATUS+5~, NO+3*, NO+4*, INCDTQ |
