Call Graph
Call Graph Total: 4
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | (C,H,NOW)^%DTC ^DIE |
| Accounts Receivable | 1 | $$PST^PRCAFN |
| Integrated Billing | 1 | ^IBR |
IBAUTL5 ;ALB/CPM - MEANS TEST BILLING UTILITIES (CON'T.) ; 02-JAN-92
Source file <IBAUTL5.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | (C,H,NOW)^%DTC ^DIE |
| Accounts Receivable | 1 | $$PST^PRCAFN |
| Integrated Billing | 1 | ^IBR |
| 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 |
|---|---|---|
| PASS | ; Find unbilled charges for an event and pass to Accounts Receivable.
; Input: IBEVDA, IBY Output: IBCHCDA, IBCHPDA are reset to 0. |
|
| FILER | ; Pass charge to Accounts Receivable. Input: IBNOS
; - first, get a bill number and build a complete charge.. |
|
| FILERQ | ||
| LAST | ; Find Last Billed date, if one exists, for pts. w/o billable events
; Input: DFN, IBADMDT Output: IBBDT (if past event exists) |
|
| DIEM() | ; Find the earliest date for which the per diem charge may be billed.
|
|
| SECT(FTS) | ; Find the billable bedsection.
; Input: Facility Treating Specialty (IEN from file #45.7) ; Returned: Billable bedsection from file 399.1 (MCCR UTILITY), or ; 0 if the specialty does not have a corresp. bedsection |
|
| CONT(DFN) | ; Find continuous patient discharge date.
; Input: DFN Returned: 0 - not continuous ; 9999999 - still continuous, or ; actual discharge date from continuous stay |
|
| STD(DFN) | ; Is the patient's A/R Statement date 4 days from now?
; Input: DFN Returned: Statement date in 4 days? (1 - yes, 0 - no) |
|
| OE(DGPMDA) | ; Was the patient admitted for Observation & Examination?
; Input: DGPMDA - pointer to 0th node of pt mvt (adm) in file #405 ; Returned: O&E Admission? (1 - yes, 0 - no) |
|
| ASIH(PM) | ; Is patient movement an ASIH movement?
; Input: PM - 0th node of patient movement in file #405 ; Returned: ASIH Movement? (1 - yes, 0 - no) |
|
| CVA(DFN) | ; Is CHAMPVA the patient's Primary Eligibility?
; Input: DFN Returned: Prim Elig = CHAMPVA? (1 - yes, 0 - no) |
| FileNo | Call Tags |
|---|---|
| ^IB - [#350] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399.1 - [#399.1] | SECT+5 |
| ^DGPM - [#405] | OE+4 |
| ^DGPT - [#45] | OE+5 |
| ^DIC(42.4 - [#42.4] | SECT+4 |
| ^DIC(43.4 - [#43.4] | OE+6 |
| ^DIC(45.1 - [#45.1] | OE+6 |
| ^DIC(45.7 - [#45.7] | SECT+4 |
| ^DIC(8 - [#8] | CVA+2 |
| ^DPT - [#2] | CVA+2 |
| ^IB - [#350] | PASS+3, LAST+5 |
| ^IB("AF" | PASS+3 |
| ^IB("AFDT" | LAST+3, LAST+4 |
| ^IBE(350.9 - [#350.9] | DIEM+1 |
| ^IBE(351.1 - [#351.1] | CONT+5 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | LAST+5, DIEM+1, CONT+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | FILER+2 |
| >> %H | LAST+8 |
| AR | OE+3~, OE+5*, OE+6 |
| DA | FILER+9*!, LAST+2~*, LAST+4*, LAST+5 |
| DFN | LAST+3, LAST+4, CONT~, CONT+5, STD~, STD+3, CVA~, CVA+2 |
| DGPM0 | OE+3~, OE+4*, OE+5 |
| DGPMDA | OE~, OE+4 |
| DIE | FILER+9*! |
| DR | FILER+9*! |
| DT | STD+2 |
| DUZ | FILER+12 |
| FTS | SECT~, SECT+4*, SECT+5 |
| IBACTN | PASS+2~, PASS+3* |
| >> IBADMDT | LAST+2 |
| IBARTYP | FILER+12! |
| IBATYP | FILER+2~ |
| >> IBBDT | LAST+8* |
| >> IBCHCDA | PASS+4* |
| >> IBCHPDA | PASS+4* |
| IBD | LAST+2~*, LAST+3 |
| IBDATE | LAST+2~*, LAST+6*, LAST+7*, LAST+8 |
| IBDUZ | FILER+12*! |
| >> IBEVDA | PASS+3 |
| >> IBJOB | FILER+9 |
| IBN | FILER+12! |
| IBNOS | PASS+2~, PASS+3*, FILER+9 |
| IBNOW | FILER+2~* |
| IBSEQNO | FILER+12*! |
| IBTEMP | LAST+2~, LAST+5*, LAST+6, LAST+7 |
| >> IBWHER | FILER+13* |
| >> IBY | PASS+3, FILER+13* |
| J | LAST+2~*, LAST+3*, LAST+4 |
| PM | ASIH~, ASIH+3 |
| SOA | OE+3~, OE+5*, OE+6 |
| X | LAST+8*, CONT+4~*, CONT+5*, CONT+6, STD+3 |
| >> X1 | STD+2* |
| >> X2 | STD+2* |
| >> Y | FILER+13 |
