©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
XPDIJ ;SFISC/RSD - Install Job ;08/14/2008
Source file <XPDIJ.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;install all packages
|
|
| ERR | ||
| LNRF(RN) | ;Load needed routines first
|
|
| VOLERR(V,F) | ;volume set not updated,V=volume set, F=flag
|
|
| SAVE(X) | ;restore routine X
|
|
| RTN(XPDA) | ;restore all routines for package XPDA
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZISC | EN+35, EN+71 |
| $$EC^%ZOSV | ERR+1 |
| ^%ZTER | ERR+3 |
| $$NEWERR^%ZTER | EN+7 |
| UNWIND^%ZTER | ERR+5 |
| ^%ZTLOAD | EN+53 |
| FILE^DIE | EN+33, EN+70 |
| EXIT^XPDID | EN+35, EN+71, ERR+3 |
| INIT^XPDID | EN+10 |
| UPDATE^XPDID | RTN+6, RTN+12 |
| IN^XPDIJ1 | EN+22 |
| INHIBIT^XPDIJ1 | EN+12, EN+56 |
| POST^XPDIJ1 | EN+28 |
| $$ANSWER^XPDIQ | EN+12, EN+44, EN+56 |
| $$RTNUP^XPDUTL | LNRF+4 |
| BMES^XPDUTL | EN+44, ERR+3 |
| MES^XPDUTL | VOLERR+5 |
| RTNLOG^XPDUTL | SAVE+3 |
| KIDS^XQ81 | EN+44 |
| SETUP^XQALERT | VOLERR+5, ERR+5 |
| OFF^XQOO1 | EN+16 |
| ON^XQOO1 | EN+37 |
| $$GET^XUPARAM | EN+64 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("DEL" | EN+65, RTN+10 |
| ^%ZOSF("SAVE" | SAVE+3 |
| ^%ZOSF("TRAP" | EN+8 |
| ^%ZOSF("UCI" | EN+50 |
| ^XPD(9.7 - [#9.7] | EN+9, EN+19, EN+22, EN+41, EN+48, EN+52, EN+60, VOLERR+4, ERR+4 |
| ^XTMP("XPDI" | EN+27, EN+63, EN+65, EN+67!, RTN+4, RTN+9*, LNRF+1 |
| ^XTMP("XQOO" | EN+14, EN+37! |
| Name | Line Occurrences |
|---|---|
| LNRF | EN+3, EN+4 |
| SAVE | RTN+7, LNRF+3 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EN+19, EN+41, EN+52, EN+60, RTN+4 |
| ^(0 | EN+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | EN+19*, EN+22, EN+41*, EN+43, EN+61~, EN+63*, EN+64*, EN+65, SAVE+1~ |
| DIE | SAVE+1~, SAVE+2* |
| DUZ | EN+6~*, VOLERR+4, ERR+4 |
| DUZ(0 | EN+6* |
| F | VOLERR~, VOLERR+2 |
| IEN | EN+5~ |
| RN | LNRF~, LNRF+1, LNRF+3, LNRF+4 |
| U | EN+14, EN+16, EN+22, EN+37, EN+52, EN+64, EN+65, RTN+9, RTN+10 |
| V | VOLERR~, VOLERR+2, VOLERR+3, VOLERR+4 |
| X | EN+5~, EN+6*, EN+8*, EN+61~, EN+65*, SAVE~, SAVE+3, RTN+3~, RTN+10*, LNRF+2~ |
| XCM | SAVE+1~ |
| XCN | SAVE+1~, SAVE+2*, LNRF+4* |
| XCS | SAVE+1~ |
| XPD | EN+20~, EN+32~, EN+61~, EN+63*, EN+64 |
| XPD( | EN+32*, EN+69* |
| XPD0 | EN+5~, EN+9*, EN+14, EN+16 |
| XPDA | EN+9, EN+19, EN+20~, EN+22*, EN+27, EN+32, EN+41, EN+42~, EN+43*, EN+48 , EN+52, EN+60, RTN~, RTN+2, RTN+4, RTN+9, VOLERR+4, ERR+4, LNRF+1 |
| XPDABORT | EN+5~, EN+19, EN+22, EN+25, EN+35 |
| XPDBLD | EN+26~, EN+27*, RTN+9 |
| XPDERROR | ERR~, ERR+1*, ERR+3 |
| XPDGREF | EN+26~, EN+27* |
| XPDI | EN+5~, EN+60*, EN+63, EN+65, EN+67, EN+69, RTN+3~*, RTN+4*, RTN+7, RTN+10 |
| >> XPDIDCNT | RTN+6*, RTN+12 |
| >> XPDIDMOD | RTN+6 |
| >> XPDIDVT | RTN+6, RTN+12 |
| XPDJ | RTN+3~, RTN+4*, RTN+7, RTN+9, RTN+10 |
| XPDMENU | EN+5~, EN+40*, EN+41, EN+44* |
| XPDMES | VOLERR+1~, VOLERR+5 |
| XPDMES(1 | VOLERR+2* |
| XPDMES(2 | VOLERR+2* |
| XPDMES(3 | VOLERR+3* |
| XPDNM | EN+20~, EN+22* |
| XPDQUIT | EN+5~ |
| XPDSET | EN+5~, EN+14*, EN+16, EN+37 |
| >> XPDT("MASTER" | EN+25 |
| XPDU | EN+49~, EN+50*, EN+53 |
| XPDV | EN+20~, EN+49~, EN+50*, EN+52* |
| XPDV0 | EN+20~, EN+49~, EN+52*, EN+53 |
| XPDVOL | EN+5~, EN+20~ |
| XPDX | EN+20~ |
| XPDY | EN+20~, EN+49~, EN+50*, EN+52 |
| XQA | VOLERR+1~, ERR~ |
| XQA( | VOLERR+4*, ERR+4* |
| XQAMSG | VOLERR+1~, VOLERR+4*, ERR~, ERR+4* |
| Y | EN+5~, EN+14*, EN+17*, EN+19*, EN+20~, EN+40*, EN+41*, EN+42~, EN+50, EN+59* , EN+60*, EN+61~ |
| ZTCPU | EN+49~, EN+53* |
| ZTDESC | EN+5~, EN+53* |
| ZTDTH | EN+5~, EN+53* |
| ZTIO | EN+5~, EN+53* |
| >> ZTREQ | EN+30* |
| ZTRTN | EN+5~, EN+53* |
| ZTSK | EN+5~, EN+30 |
| ZTUCI | EN+49~, EN+53* |