©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
BLRMERGI ;IHS/ISD/EDE - LR*5.2*1005` PATCH ENVIRONMENT CHECK/POST INIT ROUTINE [ 01/25/1999 10:30 AM ]
Source file <BLRMERGI.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EDIT | ; EDIT EXISTING AFFECTS RECORD MERGE ENTRY
|
|
| START | ; Does not prevent loading of the transport global.
; Environment check is done only during the install. |
|
| ADD | ; ADD AFFECTS RECORD MERGE ENTRY
|
|
| EXIT | ;
|
|
| POST | ; PEP - ENTRY POINT FOR POST INITITALIZATION
|
|
| CHECK | ; Perform environment check
|
| FileNo | Call Tags |
|---|---|
| ^DIC(9.4 - [#9.4] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(9.4 | ADD+3 |
| ^DIC(9.4 - [#9.4] | POST+2, POST+6 |
| ^VA(200 - [#200] | CHECK+10 |
| Name | Line Occurrences |
|---|---|
| ADD | POST+6 |
| CHECK | START+3 |
| EDIT | POST+7 |
| EXIT | START+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BLRPKIEN | POST+1~, POST+2*, POST+3, POST+6, EDIT+1, EDIT+2 |
| BLRVER | CHECK+1~, CHECK+14*, CHECK+15 |
| >> DA | EDIT+3* |
| >> DA(1 | ADD+4*, EDIT+2* |
| >> DIC | ADD+1* |
| >> DIC("P" | ADD+3* |
| >> DIC(0 | ADD+2* |
| >> DIE | EDIT+1* |
| >> DINUM | ADD+5* |
| >> DR | EDIT+4* |
| DUZ | CHECK+6, CHECK+10 |
| DUZ(0 | CHECK+6 |
| IOM | CHECK+2 |
| IOSL | CHECK+2 |
| U | CHECK+2 |
| >> X | ADD+6* |
| >> XPDENV | START+2 |
| >> XPDIQ("XPZ1" | CHECK+19* |
| >> XPDQUIT | CHECK+4*, CHECK+8*, CHECK+12*, CHECK+17*, EXIT+1, EXIT+2 |