SR100UTL ;BIR/ADM - SR*3*100 INSTALL UTILITY ; [ 02/18/04 10:19 AM ]
Source file <SR100UTL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PRE | ; pre-install entry
; delete ADIC, AUD, AUD1 x-refs, delete x-ref nodes |
|
POST | ; post-install entry
; delete file 136 |
|
DEL | ||
EN1 | ; queued entry point
|
|
MSG | ; send mail message notification that post-insatll process is completed
|
|
STUBS | ; identify and create stub entries in TIU for reports to be signed
|
|
PARAM | ; set default site parameters
|
|
SRTAB | ; activate surgery tab system-wide
|
|
BOST | ; convert Boston prototype cases
|
|
MOVE | ; move reports for historical cases to TIU
|
|
NONOR | ; if dictated summary expected field is null, set to 0
|
Name | Field # of Occurrence |
---|---|
NOW^%DTC | POST+7 |
^%ZTLOAD | POST+7 |
$$GET1^DID | BOST+3 |
^DIK | PRE+2, PRE+3, PRE+4 |
EN^DIU2 | POST+2 |
NR^SROESX | STUBS+7 |
OR^SROESX | STUBS+6 |
$$INUSE^SROESXA | STUBS+8 |
AR^SROESXA | STUBS+8 |
MOVE^SROHIS | MOVE+3 |
$$DOCCLASS^TIULC1 | BOST+5 |
EXTRACT^TIULQ | BOST+7 |
$$WHATITLE^TIUPUTU | BOST+4 |
FILE^TIUSRVP | BOST+10 |
^XMD | MSG+4 |
PUT^XPAR | SRTAB+1 |
MES^XPDUTL | POST+8, DEL+1 |
FileNo | Call Tags |
---|---|
^SRF - [#130] | GET1^DID |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("DEL" | DEL+2 |
^%ZOSF("TEST" | DEL |
^SRF - [#130] | STUBS+4, STUBS+5, STUBS+6, STUBS+7, STUBS+8, BOST+6, BOST+9*, NONOR+1* |
^SRF("AC" | STUBS+3 |
^SRF("ADIC" | PRE+5! |
^SRF("AUD" | PRE+5! |
^SRO(133 - [#133] | PARAM+3* |
^SRT(0 | POST+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | POST+7 |
DA | PRE+2!*, PRE+3!*, PRE+4!*, PRE+5!, BOST+1~ |
DA(1 | PRE+2*, PRE+3*, PRE+4* |
DA(2 | PRE+2*, PRE+3*, PRE+4* |
DIC | BOST+1~ |
DIE | PRE+2! |
DIK | PRE+2!*, PRE+3!*, PRE+4!*, PRE+5! |
DIQ | BOST+1~ |
DIU | POST+2*! |
DIU(0 | POST+2* |
DIV | PARAM+1~, PARAM+3* |
DR | PRE+2!, BOST+1~ |
DUZ | MSG+1 |
I | POST+3~, POST+4*, MSG+4~ |
J | PARAM+1~ |
SRBOST | BOST+1~, BOST+6*, BOST+7, BOST+8, BOST+9, BOST+10 |
SRDT | STUBS+1~, STUBS+2*, STUBS+3* |
SREQ | BOST+1~, BOST+10! |
SREQ( | BOST+10* |
SREQ(1405 | BOST+10* |
SRERR | SRTAB+1, BOST+1~, BOST+7, BOST+10 |
SRINST | MOVE+1~, MOVE+2* |
SRINSTP | MOVE+1~, MOVE+2* |
>> SRNOW | POST+7* |
SRP | PARAM+1~, PARAM+2*, PARAM+3 |
SRPAR | BOST+1~, BOST+5*, BOST+10 |
SRPOS | POST+3~ |
SRPOS( | POST+4* |
SRPOS(10 | MOVE+2 |
SRPOS(11 | MOVE+2 |
SRPOS(4 | POST+5, PARAM+2 |
SRPOS(5 | STUBS+1, STUBS+2, MOVE+1 |
SRPOS(6 | EN1+3 |
SRPOS(7 | MOVE+1*, MOVE+2 |
SRPOS(8 | MOVE+2 |
SRPOS(9 | MOVE+2 |
SRRPT | MOVE+1~ |
SRRPT(1 | MOVE+2* |
SRRPT(2 | MOVE+2* |
SRRPT(3 | MOVE+2* |
SRRPT(4 | MOVE+2* |
SRSD | MOVE+1~, MOVE+2* |
SRTITL | BOST+1~, BOST+4*, BOST+5, BOST+10 |
SRTN | STUBS+1~, STUBS+3*, STUBS+4, STUBS+5, STUBS+6, STUBS+7, STUBS+8, BOST+1~, BOST+6*, BOST+8 , BOST+9, BOST+10, NONOR+1 |
>> SRTXT(1 | MSG+2* |
SRX | BOST+1~, BOST+4* |
SRY | BOST+1~, BOST+8! |
SRY( | BOST+8 |
>> X | DEL*, DEL+1 |
>> XMDUZ | MSG+3* |
>> XMSUB | MSG+1* |
>> XMTEXT | MSG+3* |
>> XMY( | MSG+1* |
>> XPDQUES("POS" | POST+4 |
Y | PARAM+1~ |
Z | PARAM+1~ |
>> ZTDESC | POST+7* |
>> ZTDTH | POST+7* |
>> ZTIO | POST+7* |
>> ZTREQ | MSG+4* |
>> ZTRTN | POST+7* |
>> ZTSAVE("SRPOS*" | POST+7* |