©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
IBAUTL5 ;ALB/CPM - MEANS TEST BILLING UTILITIES (CON'T.) ; 02-JAN-92
Source file <IBAUTL5.m>
| Package | Total | Call Graph |
|---|---|---|
| IFCAP | 1 | $$PST^PRCAFN |
| Integrated Billing | 1 | ^IBR |
| VA Fileman | 1 | (C,H,NOW)^%DTC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SECT(FTS) | ; Find the billable bedsection.
|
|
| FILER | ; Pass charge to Accounts Receivable. Input: IBNOS
|
|
| OE(DGPMDA) | ; Was the patient admitted for Observation & Examination?
|
|
| LAST | ; Find Last Billed date, if one exists, for pts. w/o billable events
|
|
| CVA(DFN) | ; Is CHAMPVA the patient's Primary Eligibility?
|
|
| CONT(DFN) | ; Find continuous patient discharge date.
|
|
| PASS | ; Find unbilled charges for an event and pass to Accounts Receivable.
|
|
| STD(DFN) | ; Is the patient's A/R Statement date 4 days from now?
|
|
| FILERQ | ||
| DIEM() | ; Find the earliest date for which the per diem charge may be billed.
|
|
| ASIH(PM) | ; Is patient movement an ASIH movement?
|
| 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 | Line Occurrences |
|---|---|
| FILER | PASS+3 |
| FILERQ | FILER+9 |
| 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 | 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 |
| DT | STD+2 |
| DUZ | FILER+8 |
| FTS | SECT~, SECT+4*, SECT+5 |
| IBACTN | PASS+2~, PASS+3* |
| >> IBADMDT | LAST+2 |
| IBARTYP | FILER+8! |
| 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+8*! |
| >> IBEVDA | PASS+3 |
| IBN | FILER+8! |
| IBNOS | PASS+2~, PASS+3* |
| IBNOW | FILER+2~* |
| IBSEQNO | FILER+8*! |
| IBTEMP | LAST+2~, LAST+5*, LAST+6, LAST+7 |
| >> IBWHER | FILER+9* |
| >> IBY | PASS+3, FILER+9* |
| 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+9 |