©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
IBAUTL ;ALB/AAS - INTEGRATED BILLING APPLICATION UTILITIES ; 14-FEB-91
Source file <IBAUTL.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BILLNO | ; -get open bill number
|
|
| ARPARM | ||
| PTL | ; - parent trace logic
|
|
| CHKX | ; - check input x
|
|
| ADDQ | ||
| FY | ||
| SITE | ; - calculate site from site parameters
|
|
| COSTQ | ||
| ADD | ; - add new entry to ^ib
|
|
| COST | ; - find charges for transaction type, when only one
|
|
| CHKXQ | ||
| PTL1 | ; - find y(n) of sublevels
|
|
| BILLQ | ||
| PTLQ |
| FileNo | Call Tags |
|---|---|
| ^IB - [#350] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC - [#1] | PTL+8, PTL+9 |
| ^DIC(4 - [#4] | SITE+4 |
| ^DIC(49 - [#49] | CHKX+7 |
| ^DPT - [#2] | CHKX+6 |
| ^IB - [#350] | ADD+6, ADD+8 |
| ^IB(0 | ADD+3, ADD+4 |
| ^IBE(350.1 - [#350.1] | CHKX+11, BILLNO+2 |
| ^IBE(350.2 - [#350.2] | COST+2 |
| ^IBE(350.9 - [#350.9] | SITE+3, SITE+4 |
| ^PS(59.7 - [#59.7] | BILLNO+1 |
| ^VA(200 - [#200] | CHKX+9 |
| Name | Line Occurrences |
|---|---|
| ADDQ | ADD+3, ADD+4 |
| BILLQ | BILLNO+1, BILLNO+3, BILLNO+4 |
| CHKXQ | CHKX+6, CHKX+7, CHKX+8, CHKX+9, CHKX+10 |
| COSTQ | COST+2 |
| FY | ARPARM+1 |
| PTL1 | PTL+13 |
| PTLQ | PTL+8, PTL+10 |
| SITE | ARPARM+1 |
| Name | Field # of Occurrence |
|---|---|
| ^( | PTL1+2 |
| ^(0 | PTL+11, PTL1+4, ADD+4, BILLNO+2 |
| ^(99 | SITE+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | ARPARM+1 |
| %DT | ADD+2~ |
| DA | COST+2, ADD+7*! |
| DD | ADD+5!, ADDQ! |
| >> DFN | CHKX+5*, CHKX+6, ADD+7, BILLNO+3 |
| DIC | ADD+5!*, ADDQ! |
| DIC(0 | ADD+5* |
| DIE | ADD+7*! |
| DINUM | ADD+6*, ADDQ! |
| >> DLAYGO | ADD+5* |
| DO | ADD+5!, ADDQ! |
| DR | ADD+5!, ADD+7*! |
| DT | COST+2, ARPARM |
| DUZ | BILLNO+3 |
| IB | COST+1~, COST+2* |
| >> IBAFY | FY*, BILLNO+3 |
| IBAGL | PTL+9*, PTL+10, PTLQ! |
| >> IBARTYP | BILLNO+2*, BILLNO+3 |
| >> IBATYP | CHKX+11*, ADD+7, BILLNO+2 |
| IBD | COST+1~, COST+2* |
| >> IBDUZ | CHKX+9*, BILLNO+3 |
| >> IBFAC | SITE+4* |
| IBII | PTL+13*, PTLQ!, PTL1+1, PTL1+2 |
| >> IBIL | BILLNO+1*, BILLNO+4* |
| IBJJ | PTL+13*, PTLQ!, PTL1+4 |
| IBMIN | PTLQ!, PTL1+1*, PTL1+2 |
| IBN | COST+1~, COST+2*, ADD+7* |
| IBN1 | ADD+6*, ADD+8, ADDQ! |
| >> IBNOW | ARPARM+1*, BILLNO+3 |
| >> IBSAVX | CHKX+5, CHKX+9, CHKX+11 |
| >> IBSERV | CHKX+5*, CHKX+7, BILLNO+3 |
| >> IBSITE | SITE+4*, ADD+6, BILLNO+3 |
| >> IBTAG | CHKX+8, CHKX+10 |
| >> IBTOTL | BILLNO+1, BILLNO+3 |
| >> IBTRAN | BILLNO+1*, BILLNO+4*, BILLNO+5* |
| X | FY, PTL+8, PTL+9, PTL+10, PTL+13, CHKX+5, ADD+4*, ADD+6*, ARPARM~*, BILLNO+3* |
| X1 | COST+1!, COST+2*, COSTQ* |
| Y | PTL+7!, PTL+8*, PTL+10*, PTL1+1*, PTL1+2*, CHKX+6*, CHKX+7*, CHKX+9*, CHKX+11*, SITE+3* , SITE+4*, ADD+3*, ADD+4*, ADD+6, ADD+7, ADD+9*, BILLNO+3, BILLNO+4* |
| Y( | PTL1+4* |
| Y(0 | PTL+11* |