©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
LA67 ;VA/DALOI/JMC - LA*5.2*67 PATCH ENVIRONMENT CHECK ROUTINE ;5/13/2002
Source file <LA67.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRE | ; KIDS Pre install for LA*5.2*67
|
|
| POST | ; KIDS Post install for LA*5.2*67
|
|
| EN | ; Does not prevent loading of the transport global.
; Environment check is done only during the install. |
|
| EXIT | ;
; I $G(XPDQUIT) D BMES^XPDUTL($$CJ^XLFSTR("--- Install Environment Check FAILED ---",80)) ; I '$G(XPDQUIT) D BMES^XPDUTL($$CJ^XLFSTR("--- Environment Check is Ok ---",80)) |
|
| CHECK | ; Perform environment check
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | POST+32, POST+41 |
| $$FIND1^DIC | PRE+14, POST+7, POST+21, POST+28, POST+37 |
| FILE^DIE | POST+11, POST+24 |
| UPDATE^DIE | PRE+10, PRE+12 |
| ^DIK | PRE+15 |
| $$SITE^VASITE | POST+15 |
| $$HTE^XLFDT | EN+6, EN+10, POST+49 |
| $$CJ^XLFSTR | EN+14, CHECK+2, CHECK+5, CHECK+8, EXIT+4, EXIT+5, PRE+5, PRE+6, PRE+17, POST+3 , POST+4, POST+12, POST+17, POST+25, POST+30, POST+33, POST+39, POST+42, POST+46, POST+48 , POST+53 |
| BMES^XPDUTL | EN+14, CHECK+2, CHECK+5, CHECK+8, EXIT+4, EXIT+5, PRE+5, PRE+6, PRE+17, POST+3 , POST+4, POST+12, POST+17, POST+25, POST+30, POST+33, POST+39, POST+42, POST+46, POST+48 , POST+53 |
| $$ACTIVE^XUSER | CHECK+7 |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | FIND1^DIC |
| ^LAB(62.4 - [#62.4] | FIND1^DIC |
| ^LAHM(62.48 - [#62.48] | Classic Fileman Calls, FIND1^DIC |
| ^HL(771 - [#771] | FIND1^DIC |
| Name | Line Occurrences |
|---|---|
| CHECK | EN+16 |
| EXIT | EN+17 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | PRE+2~, PRE+15*, POST+1~ |
| >> DIC | POST+31*, POST+40* |
| >> DIC("DR" | POST+31*, POST+40* |
| >> DIC(0 | POST+31*, POST+40* |
| DIK | PRE+2~, PRE+15*, POST+1~ |
| DLAYGO | POST+1~, POST+31*, POST+40* |
| DT | POST+15 |
| DUZ | CHECK+4, CHECK+7 |
| DUZ(0 | CHECK+4 |
| FDA | PRE+2~, POST+1~ |
| FDA(1 | PRE+9*, POST+8*, POST+9*, POST+10*, POST+23* |
| FDA(2 | PRE+11* |
| IEN | POST+1~, POST+7*, POST+8, POST+9, POST+10 |
| IOM | CHECK+1 |
| IOSL | CHECK+1 |
| LA7200 | POST+1~, POST+28*, POST+29, POST+37*, POST+38 |
| LA7ERR | PRE+2~ |
| LA7FAC | POST+1~, POST+15*, POST+16, POST+23 |
| LA7I | POST+1~, POST+6*, POST+7, POST+10, POST+18*, POST+19, POST+20 |
| LA7X | POST+1~, POST+19*, POST+20*, POST+21 |
| LA7Y | POST+1~, POST+21*, POST+22, POST+23 |
| LAI | PRE+2~, PRE+8*, PRE+9, PRE+11, PRE+14*, PRE+15 |
| U | CHECK+1 |
| >> X | POST+31*, POST+40* |
| >> XPDENV | EN+5 |
| >> XPDIQ("XPZ1" | CHECK+10* |
| >> XPDNM | EN+6, EN+10, EXIT+4, EXIT+5, POST+49 |
| >> XPDQUIT | CHECK+3*, CHECK+6*, CHECK+9*, EXIT+4, EXIT+5 |
| XQA | EN+3~, POST+1~ |
| XQA("G.LMI" | EN+6*, EN+11*, POST+50* |
| XQAMSG | EN+3~, EN+6*, EN+10*, EN+14, POST+1~, POST+49*, POST+53 |
| >> Y | POST+33, POST+42 |