Call Graph
Call Graph Total: 2
| Package | Total | Call Graph |
|---|---|---|
| Accounts Receivable | 1 | $$BN1^PRCAFN |
| Integrated Billing | 1 | $$PTCOV^IBCNSU3 |
IBEFURT ;ALB/ARH - UTILITY: FIND RELATED THIRD PARTY BILLS ; 3/7/00
Source file <IBEFURT.m>
| Package | Total | Call Graph |
|---|---|---|
| Accounts Receivable | 1 | $$BN1^PRCAFN |
| Integrated Billing | 1 | $$PTCOV^IBCNSU3 |
| 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 |
|---|---|---|
| TPEVDT(DFN,EVDT,XRF) | ; find all bills for a patient with a specific Event Date (399,.03)
|
|
| TPPTF(PTF,XRF) | ; find all bills for a specific PTF number (399,.08)
|
|
| TPOPV(DFN,DT1,DT2,XRF) | ; find all bills for a patient with any Opt Visit Dates within a range (399,43)
|
|
| TPRX(DFN,RXN,RXDT,XRF) | ; find all bills for a patient with a specific Rx fill (Rx number and fill date) (362.4,.01,.03)
|
|
| SAVELN1(XRF,DATA) | ; set bill into array: ^TMP("IBRBT",$J,XRF) = DATA (from $$LN1)
|
|
| SAVELN2(IBIFN,XRF) | ; set bills found into array: ^TMP("IBRBT",$J,XRF,IBIFN)= BILL FROM ^ BILL TO ^ CANCELLED (0/1) ^ AR BILL NUMBER ^ PAYER SEQUENCE ^ PAYER IS MEDICARE SUPPLEMENTAL (0/1) ^ PAYER NAME
|
|
| LN1(IBIFN) | ; based on the bill passed in returns: PATIENT HAS ANY RX COVERAGE ON FROM DATE OF BILL (0/1)
|
|
| LN1Q | ||
| LN2(IBIFN) | ; based on the bill passed in returns:
; BILL FROM ^ BILL TO ^ CANCELLED (0/1) ^ AR BILL NUMBER ^ PAYER SEQUENCE ^ PAYER IS MEDICARE SUPPLEMENTAL (0/1) ^ PAYER NAME |
|
| LN2Q | ||
| TPLAN(IBIFN) | ; check if bills payer policy is a Med Supp or whatever type requires Third Party reimbursment to be applied to First Party charges on a 1-1 basis
; returns true if Bill Payer Policy's Type of Plan is Med Supp (399,136 > 2.312,18 > 355.3,.09 > 355.1,.03) |
|
| TPLANQ | ||
| RXTP(DFN,RXN,RXDT,SAVE) | ; check if a particular Prescription fill has been billed on a Third Party bill, Rx # and fill date
; if SAVE is passed in then the list of bills for the Rx is returned in ^TMP("IBRBT",$J,SAVE,IBIFN)=data |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | TPEVDT+2, TPEVDT+3, TPEVDT+5, TPPTF+2, TPOPV+2, TPOPV+4, TPRX+6, SAVELN2+1, LN1+1, LN1+2 , LN2+2, LN2+3, TPLAN+3 |
| ^DIC(36 - [#36] | LN2+10 |
| ^DPT - [#2] | TPLAN+4 |
| ^IBA(355.3 - [#355.3] | TPLAN+5 |
| ^IBA(362.4 - [#362.4] | TPRX+2, TPRX+3 |
| ^IBE(355.1 - [#355.1] | TPLAN+5 |
| ^TMP( | RXTP+3!, RXTP+4! |
| ^TMP("IBRBT" | SAVELN1+1*, SAVELN2+1* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DATA | SAVELN1~, SAVELN1+1 |
| DFN | TPEVDT~, TPEVDT+2, TPEVDT+5, TPOPV~, TPOPV+2, TPOPV+4, TPRX~, TPRX+2, TPRX+6, LN1+1~ , LN1+2*, TPLAN+2~, TPLAN+3*, TPLAN+4, RXTP~, RXTP+3 |
| DT1 | TPOPV~, TPOPV+1, TPOPV+2 |
| DT2 | TPOPV~, TPOPV+1*, TPOPV+2 |
| EVDT | TPEVDT~, TPEVDT+2 |
| IB0 | LN1+1~*, LN1+2, LN2+2~*, LN2+6, LN2+8 |
| IBDT | TPEVDT+1~, TPEVDT+2*, TPEVDT+3 |
| IBIFN | TPEVDT+1~, TPEVDT+3*, TPEVDT+5, TPPTF+1~, TPPTF+2*, TPOPV+1~, TPOPV+4*, TPRX+1~, TPRX+3*, TPRX+6 , SAVELN2~, SAVELN2+1, LN1~, LN1+1, LN1+2, LN2~, LN2+2, LN2+3, LN2+7, LN2+9 , TPLAN~, TPLAN+2, TPLAN+3 |
| IBMP | LN2+2~, LN2+3*, LN2+10 |
| IBOPV | TPOPV+1~, TPOPV+2*, TPOPV+4 |
| IBRXDT | TPRX+1~, TPRX+3*, TPRX+5 |
| IBU | LN2+2~, LN2+3*, LN2+4, LN2+5 |
| IBX | TPRX+1~, TPRX+2*, TPRX+3, LN1+1~*, LN1+2*, LN1Q, LN2+2~*, LN2+4*, LN2+5*, LN2+6* , LN2+7*, LN2+8*, LN2+9*, LN2+10*, LN2Q, TPLAN+2~*, TPLAN+5*, TPLANQ, RXTP+2~*, RXTP+3* , RXTP+5 |
| IBX0 | TPRX+1~, TPRX+3* |
| IBY | LN1+1~, LN1+2*, LN2+2~, TPLAN+2~, TPLAN+4*, TPLAN+5* |
| PLAN | TPLAN+2~, TPLAN+3*, TPLAN+4 |
| PTF | TPPTF~, TPPTF+2 |
| RXDT | TPRX~, TPRX+1*, TPRX+5, RXTP~, RXTP+3 |
| RXN | TPRX~, TPRX+2, RXTP~, RXTP+3 |
| SAVE | RXTP~, RXTP+2, RXTP+4 |
| U | TPEVDT+5, TPRX+3, TPRX+6, LN1+2, LN2+4, LN2+5, LN2+6, LN2+7, LN2+8, LN2+9 , LN2+10, TPLAN+3, TPLAN+4, TPLAN+5 |
| XRF | TPEVDT~, TPEVDT+5, TPPTF~, TPPTF+2, TPOPV~, TPOPV+4, TPRX~, TPRX+6, SAVELN1~, SAVELN1+1* , SAVELN2~, SAVELN2+1*, RXTP+2~*, RXTP+3, RXTP+4 |
| XRF1 | RXTP+2~*, RXTP+3, RXTP+4 |
