©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
IBPU2 ;ALB/BGA - IB PURGE FILE CLEAN UP ; 17-FEB-94
Source file <IBPU2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CLBCOM | ; uses "D" xref to find all recs to be deleted
|
|
| CLCTRK | ; uses "E" xref to find all recs ptr to 399 then sets them to null
|
|
| IBCYTO | ; uses "C" xref to find all recs ptr to 399 then sets the recs to null
|
|
| CLCTBI | ; uses "C" xref to find all recs pointing to 399 then deletes
|
|
| CLPSTE | ; uses "AIFN_IBN" to find all recs pointing to the rec to be deleted
|
|
| IBPBIL | ; uses "AC" xref to find all recs ptr to 399 then sets to the bill #
|
| FileNo | Call Tags |
|---|---|
| ^IBT(356 - [#356] | Classic Fileman Calls |
| ^IBT(356.399 - [#356.399] | Classic Fileman Calls |
| ^IBA(362.1 - [#362.1] | Classic Fileman Calls |
| ^DGCR(399 - [#399] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | IBPBIL+2, IBCYTO+2, IBCYTO+3 |
| ^IBA( | CLPSTE+3 |
| ^IBA(362.1 - [#362.1] | CLBCOM+2 |
| ^IBT(356 - [#356] | CLCTRK+2 |
| ^IBT(356.399 - [#356.399] | CLCTBI+2 |
| Name | Line Occurrences |
|---|---|
| CLBCOM | IBPU2+12 |
| CLCTBI | IBPU2+14 |
| CLCTRK | IBPU2+15 |
| CLPSTE | IBPU2+13 |
| IBCYTO | IBPU2+17 |
| IBPBIL | IBPU2+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | CLBCOM+1~, CLBCOM+2*, CLPSTE+1~, CLPSTE+3*, CLCTBI+1~, CLCTBI+2*, CLCTRK+1~, CLCTRK+2*, IBPBIL+1~, IBPBIL+2* , IBCYTO+1~, IBCYTO+3* |
| DFN | IBCYTO+1~, IBCYTO+2*, IBCYTO+3 |
| DIE | CLCTRK+1~, CLCTRK+2*, IBPBIL+1~, IBPBIL+2*, IBCYTO+1~, IBCYTO+3* |
| DIK | CLBCOM+1~, CLBCOM+2*, CLPSTE+1~, CLPSTE+3*, CLCTBI+1~, CLCTBI+2* |
| DR | CLCTRK+1~, CLCTRK+2*, IBPBIL+1~, IBPBIL+2*, IBCYTO+1~, IBCYTO+3* |
| IBA | CLBCOM+1~, CLBCOM+2*, CLPSTE+1~, CLPSTE+3*, CLCTBI+1~, CLCTBI+2*, CLCTRK+1~, CLCTRK+2*, IBPBIL+1~, IBPBIL+2* , IBCYTO+1~, IBCYTO+2*, IBCYTO+3* |
| IBB | CLPSTE+1~, CLPSTE+3*, CLCTBI+1~, IBCYTO+1~, IBCYTO+2* |
| >> IBI | CLPSTE+3* |
| >> IBN | IBPU2+11, CLBCOM+2, CLPSTE+2, CLCTBI+2, CLCTRK+2, IBPBIL+2, IBCYTO+2, IBCYTO+3 |
| REF | CLPSTE+1~, CLPSTE+2*, CLPSTE+3 |
| U | IBCYTO+2, IBCYTO+3 |