©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
ORCENV ;SLC/MLI - Environment check routine ; 18 March 97
Source file <ORCENV.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; check environment
|
|
| CMOPCHK() | ; check to see if CMOP processing is inactivated
|
|
| VARIABLE() | ; check for crucial variables
|
|
| LIST | ; list of packages and patches to check
|
|
| ENQ | ||
| NUMBERS(STRING) | ; get list of numbers from string by parsing
|
|
| PATCHCHK() | ; check for packages and patches
|
| Name | Field # of Occurrence |
|---|---|
| $$PATCH^XPDUTL | PATCHCHK+24 |
| $$VERSION^XPDUTL | PATCHCHK+11, PATCHCHK+13 |
| BMES^XPDUTL | VARIABLE+2, PATCHCHK+3, PATCHCHK+10, CMOPCHK+3 |
| MES^XPDUTL | VARIABLE+6, VARIABLE+9, VARIABLE+10, VARIABLE+11, PATCHCHK+12, PATCHCHK+16, PATCHCHK+18, PATCHCHK+20, PATCHCHK+26, PATCHCHK+27 , PATCHCHK+28, CMOPCHK+5, CMOPCHK+6, CMOPCHK+8 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PSX(550 - [#550] | CMOPCHK+2 |
| Name | Line Occurrences |
|---|---|
| $$CMOPCHK | EN+4 |
| $$NUMBERS | PATCHCHK+9 |
| $$PATCHCHK | EN+5 |
| $$VARIABLE | EN+3 |
| ENQ | EN+3, EN+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABORT | EN+1~, EN+2*, EN+3*, EN+4*, EN+5*, ENQ, VARIABLE+1~, VARIABLE+3*, VARIABLE+5*, VARIABLE+8* , VARIABLE+10, VARIABLE+11, VARIABLE+12, PATCHCHK+1~, PATCHCHK+2*, PATCHCHK+17*, PATCHCHK+25*, PATCHCHK+29 |
| CURRENT | PATCHCHK+1~, PATCHCHK+13*, PATCHCHK+14, PATCHCHK+15, PATCHCHK+19, PATCHCHK+20 |
| DUZ(0 | VARIABLE+7 |
| I | VARIABLE+1~, VARIABLE+4*, VARIABLE+6, PATCHCHK+1~, PATCHCHK+4*, NUMBERS+1~, NUMBERS+3* |
| J | PATCHCHK+1~, PATCHCHK+22*, NUMBERS+1~, NUMBERS+4* |
| LIST | NUMBERS+1~, NUMBERS+2*, NUMBERS+4*, NUMBERS+5*, NUMBERS+6 |
| NMSP | PATCHCHK+1~, PATCHCHK+6*, PATCHCHK+11, PATCHCHK+13, PATCHCHK+23 |
| OK | PATCHCHK+5~, PATCHCHK+6*, PATCHCHK+25*, PATCHCHK+27 |
| OPTIONAL | PATCHCHK+1~, PATCHCHK+8*, PATCHCHK+15 |
| PACKAGE | PATCHCHK+1~, PATCHCHK+6*, PATCHCHK+10, PATCHCHK+12, PATCHCHK+16, PATCHCHK+18, PATCHCHK+20, PATCHCHK+27, PATCHCHK+28 |
| PATCH | PATCHCHK+1~, PATCHCHK+23*, PATCHCHK+24, PATCHCHK+26 |
| PATCHES | PATCHCHK+5~, PATCHCHK+9*, PATCHCHK+21, PATCHCHK+22 |
| STRING | NUMBERS~, NUMBERS+3 |
| VERSION | PATCHCHK+1~, PATCHCHK+7*, PATCHCHK+10, PATCHCHK+14, PATCHCHK+18, PATCHCHK+19, PATCHCHK+23, PATCHCHK+27, PATCHCHK+28 |
| VIRGIN | PATCHCHK+1~, PATCHCHK+8*, PATCHCHK+11 |
| X | PATCHCHK+1~, PATCHCHK+4*, PATCHCHK+6, PATCHCHK+7, PATCHCHK+8, PATCHCHK+9, PATCHCHK+22*, PATCHCHK+23, NUMBERS+1~, NUMBERS+3* , NUMBERS+4, NUMBERS+5 |
| >> XPDABORT | ENQ* |
| Y | EN+1~, EN+3*, EN+4*, EN+5*, CMOPCHK+1~, CMOPCHK+2*, CMOPCHK+4, CMOPCHK+9 |
| Name | Field # of Occurrence |
|---|---|
| $T(LIST+I | PATCHCHK+4 |