©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
IBARXEU4 ;ALB/AAS - RX COPAY EXEMPTION CHECK IF PREVIOUSLY CANCELED ; 12-JAN-93
Source file <IBARXEU4.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 3 | ^IBAERR $$STDATE^IBARXEU $$MINUS^IBARXEU0 |
| IFCAP | 1 | EN1^PRCAX |
| VA Fileman | 1 | ^DIE |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 2 | IBARXEC3 IBARXEU3 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ARCANQ | ||
| CANDT | ; -- set beginning and ending dates
|
|
| CANDTQ | ||
| CONV | ; -- see if conversion done
|
|
| UPCAN | ; -- update canceled date fields
|
|
| CONVQ | ||
| ARCAN(DFN,IBSTAT,IBDT,IBEDT) | ; -- process cancellation with ar logic here
|
|
| UPCANQ |
| FileNo | Call Tags |
|---|---|
| ^IBA(354.1 - [#354.1] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBA(354.1 - [#354.1] | CANDT+11, ARCAN+12, UPCAN+3, UPCAN+4 |
| ^IBE(350.9 - [#350.9] | CONV+2 |
| ^TMP("IB-ERROR" | ARCAN+24* |
| Name | Line Occurrences |
|---|---|
| ARCANQ | ARCAN+16 |
| CONV | CANDT+11 |
| CONVQ | CONV+2, CONV+3 |
| UPCAN | ARCAN+19 |
| UPCANQ | UPCAN+5 |
| Name | Field # of Occurrence |
|---|---|
| ^( | UPCAN+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | UPCAN+3*, UPCAN+4, UPCAN+7! |
| DFN | CANDT+11, CONV+3, ARCAN~, ARCAN+12, ARCAN+23, ARCAN+24, UPCAN+3, UPCAN+5 |
| DIC | UPCAN+7! |
| DIE | UPCAN+2*, UPCAN+7! |
| DR | UPCAN+2*, UPCAN+7! |
| DT | CANDT+15, ARCAN+9 |
| >> ERR | ARCAN+22*, ARCAN+23, ARCAN+24 |
| >> IBCANDT | CANDT+17*, UPCAN+2 |
| IBDT | CANDT+12*, CANDT+15*, CANDT+16*, CANDT+17, CONV+6*, ARCAN~, ARCAN+9*, ARCAN+13*, ARCAN+16, ARCAN+23 |
| IBEDT | CANDT+17, ARCAN~, ARCAN+9*, ARCAN+16, ARCAN+23 |
| IBEXERR | ARCAN+24*! |
| >> IBJOB | ARCAN+24* |
| IBSTAT | ARCAN~, ARCAN+7 |
| IBWHER | ARCAN+21~, ARCAN+22* |
| X | CANDT+7~, CANDT+11*, CANDT+12, CONV+1~, CONV+2*, CONV+3, ARCAN+12*, ARCAN+13, UPCAN+7! |
| X2 | UPCAN+1~, UPCAN+4*, UPCAN+5 |