©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
IBAUTL2 ;ALB/CPM - MEANS TEST BILLING UTILITIES ; 30-AUG-91
Source file <IBAUTL2.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | (,NOW)^%DTC IX1^DIK |
| Integrated Billing | 1 | ADD^IBAUTL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SERV | ; Find the service pointer for MAS.
|
|
| COPAYQ | ||
| CHADD | ; Add a new IB Action in #350
|
|
| TYPEQ | ||
| COPAY | ; Find the Inpatient/NHCU daily copay rate and IB action type
|
|
| CHADDQ | ||
| COST | ; - find per diem charge. Input: IBATYP, IBDT Output: IBCHG
|
|
| CHFIND | ; Find open charge for a billable event
|
|
| CHUPD | ; Update an IB Action charge
|
|
| TYPE | ; Find the IB action type and rate for per diem and OPT co-payment charges.
|
| FileNo | Call Tags |
|---|---|
| ^IB - [#350] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399.1 - [#399.1] | TYPE+4, TYPE+5, COPAY+4 |
| ^DGCR(399.5 - [#399.5] | COPAY+6, COPAY+7, COPAY+8, COPAY+9 |
| ^DIC(49 - [#49] | SERV+1 |
| ^IB - [#350] | CHFIND+4, CHADD+2*, CHADD+3*, CHUPD+5* |
| ^IB("ACT" | CHFIND+4 |
| ^IBE(350.1 - [#350.1] | TYPE+5, COPAY+5 |
| ^IBE(350.2 - [#350.2] | COST+1 |
| ^IBE(350.9 - [#350.9] | SERV+1 |
| Name | Line Occurrences |
|---|---|
| CHADDQ | CHADD+1 |
| COPAY | TYPE+4 |
| COPAYQ | COPAY+4 |
| COST | TYPE+5 |
| TYPEQ | TYPE+6 |
| Name | Field # of Occurrence |
|---|---|
| ^( | COST+1 |
| ^(0 | CHUPD+5*, COST+1 |
| ^(1 | CHADD+3*, CHUPD+5* |
| ^(20 | TYPE+5, COPAY+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | CHADD+3, CHUPD+5 |
| CHK | COPAY+2~, COPAY+3*, COPAY+6, COPAY+7, COPAY+8, COPAY+10* |
| DA | CHADD+4*!, CHUPD+6*!, COPAY+2~, COPAY+3*, COPAY+8*, COPAY+9 |
| >> DFN | CHADD+2 |
| DIK | CHADD+4*!, CHUPD+6*! |
| DUZ | CHADD+3, CHUPD+5 |
| >> IBATYP | CHADD+2, TYPE+5*, TYPE+6, COST+1, COPAY+3*, COPAY+4*, COPAY+5 |
| >> IBBS | TYPE+4*, TYPE+5, COPAY+4, COPAY+6, COPAY+7, COPAY+8 |
| >> IBCHFR | CHFIND+5*, CHUPD+3 |
| >> IBCHG | CHADD+2, CHUPD+3, CHUPD+4, TYPE+3*, TYPE+7, COST+2*, COPAY+3*, COPAY+10*, COPAY+11 |
| >> IBCHTO | CHFIND+5* |
| >> IBCHTOTL | CHFIND+5*, CHUPD+4 |
| >> IBDESC | CHADD+2, TYPE+3*, COPAY+3* |
| >> IBDT | CHADD+2, CHUPD+3, CHUPD+5, COST+1, COPAY+3 |
| >> IBEVDA | CHFIND+4, CHADD+2 |
| >> IBFAC | CHADD+2 |
| >> IBN | CHADD+2, CHADD+3, CHADD+4, CHUPD+5, CHUPD+6 |
| >> IBRTED | COPAY+10* |
| >> IBSERV | SERV+1* |
| >> IBSL | CHADD+2 |
| >> IBX | CHFIND+4, CHFIND+6, CHUPD+3, CHUPD+4, TYPE+4, TYPE+5 |
| >> IBY | CHADD+1*, SERV+1*, TYPE+6*, TYPE+7*, COPAY+4*, COPAY+11* |
| J | CHFIND+3~*, CHFIND+4*, CHFIND+5, CHFIND+6, TYPE+3~, COPAY+2~, COPAY+3*, COPAY+6*, COPAY+7, COPAY+8 , COPAY+10 |
| R | COPAY+2~, COPAY+3*, COPAY+7*, COPAY+8 |
| TOT | CHUPD+2~, CHUPD+3*, CHUPD+4*, CHUPD+5 |
| UNIT | CHUPD+2~*, CHUPD+3*, CHUPD+5 |
| X | CHFIND+3~, CHFIND+4*, CHFIND+5, CHUPD+3, COST+1~*, COST+2, COPAY+2~ |
| >> X1 | CHUPD+3* |
| >> X2 | CHUPD+3* |
| Y | CHADD+1, COPAY+2~, COPAY+9*, COPAY+10 |