SDEC820P ;ALB/MGD,BWF - SD*5.3*820 Post Init Routine ; June 28, 2022@14:03
Source file <SDEC820P.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FIND | ;FIND THE IEN FOR "VS GUI NATIONAL"
|
|
VERSION | ;SET THE NEW VERSION UPDATE IN SDEC SETTING FILE #409.98 TO 1.7.28
|
|
NOFIND | ;"VS GUI NATIONAL" NOT FOUND
|
|
TASK | ;
|
|
MSG(SDMES) | ;
|
|
VPS | ;
|
|
;
; Get Station Number |
||
ADD | ;** Add DSS IDs
|
|
NEW | ;STOP CODE NAME^NUMBER^RESTRICTION TYPE^RESTRICTION DATE^CDR
|
|
MESS | ;** Add message
|
|
MESSEX | ;** Display message if stop code already exists
|
|
EDIT(SDXX) | ;- Edit fields w/new values if stop code record already exists
|
|
HDR(SDVAR) | ;- Header
|
|
HDR1 | ;; Stop Code Name
|
|
HDR2 | ;; CDR Stop Code Name
|
|
HDR3 | ;; Stop Code Name Rest. Type Date
|
Name | Field # of Occurrence |
---|---|
NOW^%DTC | TASK+8 |
^%ZTLOAD | TASK+8 |
FILE^DICN | ADD+17 |
^DIE | VERSION+1, VERSION+4, EDIT+7 |
$$GET1^DIQ | MAIL+5 |
$$FMADD^XLFDT | VPS+2 |
$$NOW^XLFDT | VPS+4 |
^XMD | MAIL+15 |
BMES^XPDUTL | MSG+1, ADD+8, ADD+11, HDR+4 |
MES^XPDUTL | FIND+2, NOFIND+1, ADD+7, MESS+3, MESS+6, MESS+8, MESSEX+3, MESSEX+5 |
$$KSP^XUPARAM | MAIL+4 |
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GET1^DIQ |
^DIC(40.7 - [#40.7] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(40.7 - [#40.7] | ADD+17, ADD+18, EDIT+4 |
^SC - [#44] | VPS+22, VPS+24, VPS+26, VPS+28 |
^SDEC(409.831 - [#409.831] | VPS+18, VPS+19 |
^SDEC(409.84 - [#409.84] | VPS+5, VPS+6, VPS+8, VPS+10, VPS+12, VPS+14, VPS+16, VPS+17, VPS+20, VPS+29 , VPS+30, VPS+31*, VPS+32*, VPS+33, VPS+34 |
^SDEC(409.85 - [#409.85] | VPS+41, VPS+43, VPS+44, VPS+45, VPS+47, VPS+49, VPS+50, VPS+51, VPS+52*, VPS+53* , VPS+54, VPS+55 |
^SDEC(409.98 - [#409.98] | FIND+3, VERSION+3 |
^XTMP("SDEC820P" | VPS+2*, VPS+3*, VPS+29*, VPS+30*, VPS+33*, VPS+34*, VPS+35*, VPS+36*, VPS+50*, VPS+51* , VPS+54*, VPS+55* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
APTDT | VPS+1~, VPS+5*, VPS+6, VPS+22, VPS+24, VPS+26, VPS+28 |
APTIEN | VPS+1~, VPS+6*, VPS+8, VPS+10, VPS+12, VPS+14, VPS+16, VPS+17, VPS+20, VPS+29 , VPS+30, VPS+31, VPS+32, VPS+33, VPS+34, VPS+35 |
CHKIN | VPS+1~, VPS+28*, VPS+31, VPS+32, VPS+35 |
COUNT | VPS+39~, VPS+40*, VPS+46*, VPS+48*, VPS+53 |
DA | VERSION+1*, VERSION+2!, VERSION+4*, VERSION+5!, ADD+13!, EDIT+3~, EDIT+4*, EDIT+5 |
DD | ADD+13! |
DFN | VPS+1~, VPS+20*, VPS+24, VPS+45* |
DIC | ADD+12*, ADD+19! |
DIC("DR" | ADD+14*, ADD+15* |
DIC(0 | ADD+12* |
DIE | VERSION+1*, VERSION+2!, VERSION+4*, VERSION+5!, EDIT+3~, EDIT+6* |
DIFROM | MAIL+3~ |
DLAYGO | ADD+12*, ADD+19!, EDIT+3~ |
DO | ADD+13! |
DR | VERSION+1*, VERSION+2!, VERSION+4*, VERSION+5!, EDIT+3~, EDIT+6* |
DT | VERSION+1, VERSION+4, VPS+2 |
DUZ | MAIL+9, MAIL+14 |
ECXADMSG | MESS+1~, MESS+4*, MESS+5*, MESS+6, MESS+7*, MESS+8, MESSEX+1~, MESSEX+4*, MESSEX+5 |
HLAPPT | VPS+1~, VPS+21*, VPS+22*, VPS+24, VPS+26, VPS+28 |
HOSPLOC | VPS+1~, VPS+19*, VPS+22, VPS+24, VPS+26, VPS+28 |
MESS1 | MAIL+3~, MAIL+6*, MAIL+13 |
MIENS | VPS+39~ |
MRTCCHILDIEN | VPS+39~, VPS+49*, VPS+50, VPS+51, VPS+52, VPS+53, VPS+54, VPS+55 |
PARENTIEN | VPS+39~ |
PARENTINTERVAL | VPS+39~, VPS+44*, VPS+52 |
REQUESTIEN | VPS+39~, VPS+40*, VPS+41*, VPS+43, VPS+44, VPS+45, VPS+47, VPS+49 |
RESOURCE | VPS+1~, VPS+17*, VPS+18, VPS+19 |
SDECDA | FIND+1~, FIND+3*, VERSION+1 |
SDECDA1 | FIND+1~, VERSION+3*, VERSION+4 |
SDHDR | HDR+2~, HDR+3*, HDR+4 |
SDMES | MSG~, MSG+1 |
SDVAR | ADD+6*, MESS+2, MESS+9!, MESSEX+2, MESSEX+6!, HDR~, HDR+1 |
SDX | ADD+5~, ADD+13* |
SDXX | ADD+5~, ADD+13*, ADD+14, ADD+15, ADD+16, ADD+17, ADD+18, MESS+4, MESS+5, MESS+7 , MESSEX+4, EDIT~, EDIT+2, EDIT+4, EDIT+6 |
STANUM | MAIL+3~, MAIL+4*, MAIL+5*, MAIL+6 |
STOPDT | VPS+1~, VPS+4*, VPS+5 |
SUBIEN | VPS+39~, VPS+46*, VPS+47*, VPS+49 |
TEXT | MAIL+3~ |
TEXT(1 | MAIL+11* |
TEXT(2 | MAIL+12* |
U | VPS+2, VPS+10, VPS+12, VPS+14, VPS+16, VPS+17, VPS+19, VPS+20, VPS+24, VPS+26 , VPS+28, VPS+29, VPS+30, VPS+31, VPS+32, VPS+33, VPS+34, VPS+43, VPS+44, VPS+45 , VPS+49, VPS+50, VPS+51, VPS+52, VPS+53, VPS+54, VPS+55, EDIT+6 |
X | TASK+6~, TASK+8, ADD+16*, ADD+19! |
XMDUZ | MAIL+3~, MAIL+9*, MAIL+14* |
XMSUB | MAIL+3~, MAIL+13* |
XMTEXT | MAIL+3~, MAIL+10* |
XMY | MAIL+3~ |
XMY( | MAIL+14* |
ZTDESC | TASK+6~, TASK+7* |
ZTDTH | TASK+6~, TASK+8* |
ZTIO | TASK+6~, TASK+8* |
ZTRTN | TASK+6~, TASK+8* |
ZTSAVE | TASK+6~ |
ZTSAVE("*" | TASK+8* |
ZTSK | TASK+6~, TASK+9, TASK+10, TASK+12 |
Name | Field # of Occurrence |
---|---|
$T(@(3) | HDR+3 |
$T(NEW+SDX | ADD+13 |