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
|
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GET1^DIQ |
^DIC(40.7 - [#40.7] | Classic Fileman Calls |