©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
AMERENV1 ; IHS/OIT/SCR - ERS V3.0 ENVIRONMENT CHECK ROUTINE ;
Source file <AMERENV1.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 3 | HOME^%ZIS $$CJ^XLFSTR ($$LAST,$$VERSION,BMES,MES)^XPDUTL |
| VA Fileman | 3 | ^%DT DT^DICRW ^DIR |
| Emergency Room | 1 | ^AMER0 |
| IHS VA Utilities | 1 | $$LOC^XBFUNC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| KERNEL | ; CHECK FOR KERNEL 8.0
|
|
| PIMS | ; CHECK FOR PIMS 5.3
|
|
| LETSGO | ; USER IDENTIFIED -- LET'S GO
|
|
| TABMENU(MSG,TAB,TAIL) | ; GENERIC MESSAGE OUTPUT
|
|
| SORRY(MSG,MODE) | ; MESSAGE TO DISPLAY WHEN SOMETHING GOES WRONG
|
|
| AICD7 | ; CHECK FOR AICD 3.51 patch 7
|
|
| USERID | ; CHECK FOR USER ID
|
|
| XMPATCH(CHK) | ||
| PRECHK | ; EP
|
|
| OKAY(MSG,TAB) | ; MESSAGE WITH "OK" AT THE END
|
|
| PCC | ; CHECK FOR PCC DATA ENTRY 2.0
|
|
| AG | ; CHECK FOR AG 7.1 PATCH 2
|
|
| FILEMAN | ; CHECK FOR FILEMAN 22.0
|
|
| BACKUPS | ; CHECK TO CONFIRM BACKUPS HAVE BEEN DONE
|
|
| AMER | ; CHECK FOR AMER PATCH 2 ;IHS/OIT/GIS 8/23/11 patch 3
|
|
| XMV8() | ; CHECK FOR MAILMAN v8.0
|
|
| ENVOK | ; ENVIRONMENT OK
|
|
| MM1006 | ; CHECK FOR MAILMAN patch 1006
|
| Name | Field # of Occurrence |
|---|---|
| ^%DT | BACKUPS+9 |
| HOME^%ZIS | USERID+5 |
| ^AMER0 | AMER+2 |
| DT^DICRW | USERID+5 |
| ^DIR | BACKUPS+6 |
| $$LOC^XBFUNC | SORRY+14 |
| $$CJ^XLFSTR | SORRY+14, SORRY+16, SORRY+18, SORRY+20, SORRY+21, SORRY+23 |
| $$LAST^XPDUTL | AICD7+2, AG+2, AMER+3 |
| $$VERSION^XPDUTL | PIMS+2, AICD7+1, AG+1, PCC+1, AMER+2, XMV8+2 |
| BMES^XPDUTL | PRECHK+1, AMER+1, FILEMAN+2, KERNEL+2, PIMS+3, MM1006+6, AICD7+3, AG+3, PCC+2, AMER+1 , ENVOK+1, BACKUPS+1, BACKUPS+12, SORRY+27, XMV8+3 |
| MES^XPDUTL | LETSGO+1, BACKUPS+13, OKAY+4, TABMENU+5 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | BACKUPS+9 |
| ^DD("VERSION" | FILEMAN+1 |
| ^DIC(9.4 - [#9.4] | KERNEL+1, XMPATCH+2, XMPATCH+4, XMPATCH+6, XMPATCH+7 |
| ^VA(200 - [#200] | USERID+6, BACKUPS+10 |
| Name | Line Occurrences |
|---|---|
| $$XMPATCH | MM1006+7 |
| $$XMV8 | MM1006+2 |
| OKAY | AMER+3, FILEMAN+4, KERNEL+4, PIMS+6, MM1006+3, MM1006+5, MM1006+8, AICD7+7, AG+7, PCC+4 , AMER+5, XMV8+5 |
| SORRY | USERID+1, USERID+3, USERID+7, AMER+2, FILEMAN+3, KERNEL+3, PIMS+4, PIMS+5, MM1006+7, MM1006+10 , AICD7+5, AICD7+6, AG+5, AG+6, PCC+3, AMER+4, BACKUPS+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %DT | BACKUPS+9* |
| CHK | XMPATCH~, XMPATCH+7 |
| DIFQ | SORRY+8! |
| >> DIR("A" | BACKUPS+5* |
| >> DIR("B" | BACKUPS+4* |
| >> DIR(0 | BACKUPS+3* |
| >> DIRUT | BACKUPS+7 |
| DUZ | USERID+1, USERID+6, BACKUPS+10 |
| DUZ(0 | USERID+3 |
| >> LINE | PRECHK+4* |
| MESSAGE | SORRY+1~, SORRY+3*, SORRY+6*, SORRY+16, OKAY+1~, OKAY+3*, OKAY+4, XMV8+4*, XMV8+5, TABMENU+1~ , TABMENU+3*, TABMENU+4*, TABMENU+5 |
| MODE | SORRY~, SORRY+2, SORRY+6 |
| MSG | SORRY~, SORRY+18, OKAY~, OKAY+3, TABMENU~, TABMENU+3 |
| OKGIS | XMPATCH+1~ |
| OKPATCH | XMPATCH+1~, XMPATCH+3*, XMPATCH+4, XMPATCH+6, XMPATCH+7*, XMPATCH+8 |
| PAT | XMPATCH+1~, XMPATCH+3*, XMPATCH+4*, XMPATCH+6, XMPATCH+7 |
| PATCH | XMPATCH+1~, XMPATCH+5*, XMPATCH+6*, XMPATCH+7 |
| STR | PRECHK+2~, BACKUPS+10*, BACKUPS+11*, BACKUPS+12, SORRY+10~, SORRY+27 |
| STR(1 | SORRY+11* |
| STR(10 | SORRY+20* |
| STR(11 | SORRY+21* |
| STR(12 | SORRY+22* |
| STR(13 | SORRY+23* |
| STR(14 | SORRY+24* |
| STR(15 | SORRY+25* |
| STR(16 | SORRY+26* |
| STR(2 | SORRY+12*, SORRY+25 |
| STR(3 | SORRY+13* |
| STR(4 | SORRY+14* |
| STR(5 | SORRY+15* |
| STR(6 | SORRY+16* |
| STR(7 | SORRY+17* |
| STR(8 | SORRY+18* |
| STR(9 | SORRY+19* |
| TAB | OKAY~, OKAY+2*, OKAY+3, TABMENU~, TABMENU+2*, TABMENU+3 |
| TAIL | TABMENU~, TABMENU+4 |
| U | USERID+6, BACKUPS+10 |
| >> VERSION | MM1006+2*, MM1006+3, MM1006+4, MM1006+10 |
| >> X | USERID+6*, USERID+7, LETSGO+1, FILEMAN+1*, FILEMAN+3, FILEMAN+4, KERNEL+1*, KERNEL+3, KERNEL+4, PIMS+2* , PIMS+4, PIMS+5, PIMS+6, AICD7+1*, AICD7+2, AICD7+4, AICD7+5, AICD7+6, AG+1*, AG+2 , AG+4, AG+5, AG+6, PCC+1*, PCC+3, AMER+2*, AMER+3, AMER+4, BACKUPS+9*, XMV8+2* , XMV8+4, XMV8+6 |
| XMPTR | XMPATCH+1~, XMPATCH+2*, XMPATCH+4, XMPATCH+6, XMPATCH+7 |
| >> XPDABORT | PRECHK+12*, SORRY+4* |
| >> XPDDIQ("XPO1" | PRECHK+11* |
| >> XPDDIQ("XPZ1" | PRECHK+9* |
| >> XPDDIQ("XPZ2" | PRECHK+9* |
| >> XPDNOQUE | PRECHK+5* |
| Y | AICD7+2~*, AICD7+4, AICD7+5, AICD7+6, AG+2~*, AG+4, AG+5, AG+6, AMER+3*, BACKUPS+7 , BACKUPS+11 |
| Name | Field # of Occurrence |
|---|---|
| $T( | AMER+2 |