©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
DGYM78PT ;ALB/MLI - Post-install routine for DG*5.3*78 ; 3/4/96@925
Source file <DGYM78PT.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 1 | (BMES,MES)^XPDUTL |
| VA Fileman | 1 | ^DIK |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DIVNAME(IEN) | ; print out division with institution pointer
|
|
| DIV | ; search for problems with medical center division/institution relationship
|
|
| EN | ; begin processing
|
|
| ELIG | ; look for .001 field in file 8...delete if there
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(8 | ELIG+2 |
| ^DG(40.8 - [#40.8] | DIV+4, DIV+5, DIV+14, DIV+15, DIV+16, DIV+17, DIVNAME+5 |
| ^DIC(4 - [#4] | DIV+6, DIVNAME+5 |
| Name | Line Occurrences |
|---|---|
| DIV | EN+2 |
| DIVNAME | DIV+7, DIV+19 |
| ELIG | EN+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CT | DIV+1~, DIV+4*, DIV+8*, DIV+9, DIV+14*, DIV+18*, DIV+20 |
| DA | ELIG+1~, ELIG+4* |
| DA(1 | ELIG+4* |
| DIK | ELIG+1~, ELIG+4* |
| I | DIV+1~, DIV+4*, DIV+5, DIV+7, DIV+14*, DIV+15, DIV+16, DIV+17 |
| IEN | DIVNAME~, DIVNAME+5, DIVNAME+6 |
| >> J | DIV+17*, DIV+19 |
| >> STRING | DIVNAME+6*, DIVNAME+7*, DIVNAME+8 |
| X | DIV+1~, DIV+5*, DIV+6, DIV+15*, DIV+16, DIVNAME+4~, DIVNAME+5*, DIVNAME+6, DIVNAME+7 |
| Y | DIVNAME+4~, DIVNAME+5*, DIVNAME+7 |