SR47UTL ;BIR/ADM-PRE & POST INIT FOR SR*3*47 ; [ 03/05/96 2:00 PM ]
Source file <SR47UTL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PRE | ; preinit action for SR*3*47
|
|
END | ||
TSK | ; task install notification message
|
|
MSG | ; send mail message to national database
|
|
QMSG | ; queue install message to national database
|
|
POST | ; postinit action for SR*3*47
; update completed assessments with PIMS info |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("PROD" | TSK+1 |
^%ZOSF("UCI" | TSK+1 |
^DD(130 | PRE+5!, PRE+6! |
^SRF - [#130] | POST+3, POST+4 |
^SRF("ARS" | POST+2 |
^SRO(136.5 - [#136.5] | PRE+1*, PRE+2*, PRE+3*, PRE+4* |
^XMB("NETNAME" | TSK+2, MSG+1 |
^XPD(9.7 - [#9.7] | MSG+1, MSG+2 |
Name | Line Occurrences |
---|---|
END | TSK+1, TSK+2, MSG+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | QMSG+1 |
DFN | POST+2*, END! |
DUZ | MSG+5 |
>> I | PRE+4*, POST+4* |
NOGO | POST+4*, POST+5, END! |
SR | POST+4*, END! |
SRD | TSK+2*, END!, MSG+1*, MSG+3 |
SRDA | END!, MSG+1*, MSG+2 |
SRMSG | END!, MSG+3! |
SRMSG(1 | MSG+3* |
SRMSG(2 | MSG+4* |
SRMSG(3 | MSG+4* |
SRTN | POST+2*, POST+3, POST+4, END! |
SRX | END! |
SRY | END!, MSG+2*, MSG+4 |
SRZ | END!, MSG+2*, MSG+4 |
>> X | POST+4*, MSG+1* |
XMDUZ | END!, MSG+5* |
XMSUB | END!, MSG+5* |
XMTEXT | END!, MSG+7* |
XMY | END! |
XMY("G.SRCOSERV@ISC-CHICAGO.VA.GOV" | MSG+6* |
>> Y | TSK+1 |
>> Z | MSG+2* |
>> ZTDESC | QMSG+1* |
>> ZTDTH | QMSG+1* |
>> ZTIO | QMSG+1* |
>> ZTREQ | MSG+7* |
>> ZTRTN | QMSG+1* |