;File: Sys_bascon.
com
;Desription: Base system configuration file for Auto Backup
; Version 9.2 SP1
;----------------------------------------------------------------------------------
----------
@SYSTEM = "SYS_A" ;System node name or tcp/ip address
@APL_NAME = "TUTOR" ;Name of main application
@APL_NUMS = (1,1,3) ;Application numbers in the order:(Main, Watch-
dog, Backup)
;Application number must be <= 10.
;----------------------------------------------------------------------------------
----------
;Base System Object
@l_Standard_Paths = do(read_text("/STool/Def/Path_Def.txt"))
#CREATE SYS:B = List(-
SA = 209,- ;Station address of base system
ND = 9,- ;Node number of base system
TM = "SYS",- ;Time Master, SYS or APL
TR = "LOCAL",- ;Time Reference, LOCAL or UTC
SH = 1,- ;SHADOWING ENABLED
DN = 1,- ;Default NET node number
DS = "STA",- ;Default STA type: E.G. STA,RTU,SPA,REX
DE = 0,- ;DDE server 0=disabled, 1=enabled
PC = 8192,- ;Picture Cache (kB)
RC = 8192,- ;Report Cache (kB)
-
- ;MS-STOOL Settings
PH = %l_Standard_Paths,-
SV = (0,- ;System Variables
list(t_System_Configuration_File = "sys_/SysConf.ini",- ;System
Configuration information
b_Conf_Mech_In_Use = TRUE,- ;enables/disables start-up configuration
b_SSS_Mech_In_Use = TRUE,- ;enables/disables system self supervision
routing
t_Version = "8.4.3")),-
- ;Operating System events
OE = 0,- ;1=Enabled, 0=Disabled
OT = (Bit_Mask(0,1,2,3,4),- ;Application events (Bit 0=ERROR, 1=WARNING,
2=INFORMATION, 3=AUDIT_SUCCESS, 4=AUDIT_FAILURE)
Bit_Mask(0,1,2,3,4),- ;System events (Bit 0=ERROR, 1=WARNING,
2=INFORMATION, 3=AUDIT_SUCCESS, 4=AUDIT_FAILURE)
Bit_Mask(0,1,2,3,4)),- ;Security events (Bit 0=ERROR, 1=WARNING,
2=INFORMATION, 3=AUDIT_SUCCESS, 4=AUDIT_FAILURE)
-
FS = "NEVER") ;File sync. criteria:
NEVER,MAINT,SET,CHECKPOINT,ALWAYS
;----------------------------------------------------
;Communication Links
;NOTE! Use the system configuration tool to create a link for the PC-NET!
#CREATE LIN:V = LIST(- ;Link to DCP-NET (requires DCP driver)
LT = "RAM",- ;Link type
SD = "RM00",- ;DCP card (first:RM00, second RM01)
RE = "BCC",- ;Redundancy
TI = 2,- ;Timeout length (s)
NA = 3,- ;NAK limit
EN = 3) ;ENQ limit
;#CREATE LIN1:B = %LIN
#CREATE LIN:V = LIST(- ;Link to other SYS or LAN frontend (requires
TCP/IP)
LT = "LAN") ;Link type
;#CREATE LIN2:B = %LIN
;----------------------------------------------------
;Node objects (NET's and SYS's)
;NOTE! Use the system configuration tool to create nodes for the PC-NET!
#CREATE NOD:V = LIST(- ;Node for DCP-NET
LI = 1,- ;Link number
SA = 201) ;Station address: 0..255
;#CREATE NOD1:B = %NOD
#CREATE NOD:V = LIST(- ;Node for LAN frontend or SYS
LI = 2,-
SA = 202)
;#CREATE NOD2:B = %NOD
#CREATE NOD:V = LIST(- ;Node for Base System
NN = %System,-
LI = 2,-
SA = 209)
#CREATE NOD9:B = %NOD
;----------------------------------------------------
;Printers
;#do Read_Text("sys_/pr_default.dat") ;This line is needed for the transparent
printer below
;#CREATE PRI:V = LIST(- ;Transparent type printer
; TT = "LOCAL",- ;Translation type
; DT = "TRANSPARENT",- ;Device type
; OJ = 1,- ;Printer opened on job basis
; DC = "LINE",- ;Device connection: CONSOLE, LINE OR NET
; CS = %CS,- ;Control sequences
; SD = "\\My_NT\My_Printer",- ;System device name
; LP = 66) ;Lines per page
;#CREATE PRI1:B = %PRI
#CREATE PRI:V = LIST(-
TT = "LOCAL",-
DT = "NORMAL",-
DC = "LINE",-
SD = "\\My_NT\My_Printer",-
LP = 66)
;#CREATE PRI2:B = %PRI
#CREATE PRI:V = LIST(-
TT = "LOCAL",-
DT = "COLOR",-
DC = "NET",-
ND = 4,- ;NET node number: 1..99
TN = 1,- ;Translated object number (printer nr in net)
LP = 66)
;#CREATE PRI3:B = %PRI
;#CREATE PRI:V = LIST(- ;Required if HP of application is
"EVENT_LOG" (History logging Policy)
; TT = "LOCAL",-
; OD = "LOG",- ;Output destination (LOG, PRINTER)
; LL = "DAY",- ;Log Length (DAY, WEEK, MONTH)
; LD = "/APL/TUTOR/PICT",- ;Log directory
; LP = 0)
;#CREATE PRI15:B = %PRI
;----------------------------------------------------
;Monitors
#LOOP_WITH I = 1..5
#CREATE MON'I':B = LIST(-
TT = "LOCAL",- ;Translation type
DT = "X") ;X monitor
@MON_MAP(%I) = -1
#LOOP_END
#LOOP_WITH I = 6..10
#Create MON'I':B = LIST(-
TT = "LOCAL",- ;Translation type
DT = "VS") ;Visual SCIL monitor
@MON_MAP(%I) = -1
#LOOP_END
;----------------------------------------------------
;Applications
;The usage of OI & OX -attributes (required by LIB 500)
@SV(15) = LIST(-
Process_Objects=LIST(-
OI=LIST(-
Title1=VECTOR("Substation"),-
Title2=VECTOR("Bay"),-
Title3=VECTOR("Device"),-
Title4=VECTOR(""),-
Title5=VECTOR(""),-
Length1=10,-
Length2=15,-
Length3=5,-
Length4=0,-
Length5=0,-
Field1=VECTOR("STA"),-
Field2=VECTOR("BAY"),-
Field3=VECTOR("DEV"),-
Field4=VECTOR(""),-
Field5=VECTOR("")),-
OX=LIST(-
Title1=VECTOR("Object text"),-
Length1=30)))
;Create Application specific global paths
@l_Global_Paths = list()
;Add LIB5xx global paths to list if LIB5xx installed
@t_LIB_Path_Def_File = "/LIB4/Base/Bbone/Use/Bgu_Glpath.txt"
#if File_Manager("EXISTS", Fm_Scil_File(%t_LIB_Path_Def_File)) #then #block
#error continue
@v_File_Contents = read_text(%t_LIB_Path_Def_File)
#if substr(%v_File_Contents(1),5,16) == "LIB 500 revision" and
substr(%v_File_Contents(1),22,5) >= "4.0.2" #then #block
#modify l_Global_Paths:v = do(read_text(%t_LIB_Path_Def_File))
#block_end
#error stop
#block_end
#if substr(SYS:BPR, 1, 7) == "SYS_600" #then #block ; PP
;Add SA_LIB global paths to list
@t_SALIB_Path_Def_File = "/SA_LIB/Base/Bbone/Use/Bgu_Glpath.txt"
#if File_Manager("EXISTS", Fm_Scil_File(%t_SALIB_Path_Def_File)) #then #block
#error continue
@v_File_Contents = read_text(%t_SALIB_Path_Def_File)
#if substr(%v_File_Contents(1),5,14) == "SA LIB version" and
substr(%v_File_Contents(1),20,5) >= "1.0.0" #then #block
#modify l_Global_Paths:v = do(read_text(%t_sALIB_Path_Def_File))
#block_end
#error stop
#block_end
#block_end
#CREATE APL:V = LIST(- ; ** Main Application **
TT = "LOCAL",- ;Translation Type
NA = %APL_NAME,- ;Name of application directory
AS = "HOT",- ;Application state (COLD,WARM,HOT)
PH = %l_Global_Paths,-
PQ = 2,- ;Number of parallel queues
HB = 0,- ;History buffer size
SV = %SV,- ;System variable (RESERVED)
CP = "SHARED",- ;Color Allocation Policy
-; RC = VECTOR("FILE_FUNCTIONS_CREATE_DIRECTORIES"),- ;Revision compatibility
HP = "DATABASE",- ;History Logging Policy ("DATABASE", "EVENT_LOG", "NONE")
EE = 1,- ;System Events & Operating System Events (1=Enabled,
0=Disabled)
AA = 1,- ;Number of APL-APL servers
MO = %MON_MAP,- ;Monitor mapping
PR = (1,2,3),- ;Printer mapping
SN = %APL_NUMS(3),- ;Shadow application
SW = %APL_NUMS(2),- ;Shadow watchdog
-; ;Shadowing optional attributes with default values
SC = 240- ;Shadow maximum connection time in seconds
-; SR = 5,- ;Shadow maximum receive wait time in seconds
-; SI = 1000,- ;Shadow diagnostic interval in milliseconds
-; SY = 0) ;Shadow time sync interval in seconds
)
#LOOP_WITH I = 1 .. LENGTH(%APL_NUMS)
@NUM = %APL_NUMS(%I)
#SET APL:VAP(%NUM) = %NUM
#LOOP_END
@APLN = %APL_NUMS(1)
#CREATE APL'APLN':B = %APL
#IF %APL_NUMS(1) <> %APL_NUMS(2) #THEN #BLOCK
#CREATE APL:V = LIST(- ; ** Watch dog Application **
TT = "LOCAL",- ;Translation Type
NA = "WD",- ;Name of application directory
AS = "HOT",- ;Application state (COLD,WARM,HOT)
PH = %l_Global_Paths,-
PQ = 2,- ;Number of parallel queues
HB = 0,- ;History buffer size
SV = %SV,- ;System variable (RESERVED)
CP = "SHARED",- ;Color Allocation Policy
-; RC = VECTOR("FILE_FUNCTIONS_CREATE_DIRECTORIES"),- ;Revision compatibility
HP = "DATABASE",- ;History Logging Policy ("DATABASE", "EVENT_LOG", "NONE")
EE = 0,- ;System Events & Operating System Events (1=Enabled,
0=Disabled)
MO = %MON_MAP,- ;Monitor mapping
PR = (1,2,3)) ;Printer mapping
#LOOP_WITH I = 1 .. LENGTH(%APL_NUMS)
@NUM = %APL_NUMS(%I)
#SET APL:VAP(%NUM) = %NUM
#LOOP_END
@APLN = %APL_NUMS(2)
#CREATE APL'APLN':B = %APL
#BLOCK_END
#CREATE APL:V = LIST(- ; ** Backup Application **
TT = "LOCAL",- ;Translation Type
NA = SUBSTR("BCK" + %APL_NAME,1,8),- ;Name of application directory
AS = "COLD",- ;Application state (COLD,WARM,HOT)
PH = %l_Global_Paths,-
HB = 0,- ;History buffer size
SV = %SV,- ;System variable (RESERVED)
CP = "SHARED",- ;Color Allocation Policy
RC = VECTOR("FILE_FUNCTIONS_CREATE_DIRECTORIES"),- ;Revision compatibility
HP = "DATABASE",- ;History Logging Policy ("DATABASE", "EVENT_LOG", "NONE")
EE = 0,- ;System Events & Operating System Events (1=Enabled,
0=Disabled)
MO = %MON_MAP,- ;Monitor mapping
PR = (1,2,3),- ;Printer mapping
SN = %APL_NUMS(1),- ;Shadow application
SW = %APL_NUMS(2)- ;Shadow watchdog
)
#LOOP_WITH I = 1 .. LENGTH(%APL_NUMS)
@NUM = %APL_NUMS(%I)
#SET APL:VAP(%NUM) = %NUM
#LOOP_END
@APLN = %APL_NUMS(3)
#CREATE APL'APLN':B = %APL
;----------------------------------------------------
;Station Types
#SET STY3:BCX = "ANSI X3-28"
#SET STY4:BCX = "SPIDER RTUs"
#SET STY5:BCX = "SINDAC (ADLP80 S)"
#SET STY6:BCX = "P214"
#SET STY7:BCX = "SINDAC (ADLP180)"
#SET STY8:BCX = "PAC-5"
#SET STY9:BCX = "SATTCON/COMLI"
#SET STY17:BCX = "LON"
#SET STY20:BCX = "LCU 500"
#SET STY21:BCX = "SPACOM"
#CREATE STY22:B = LIST(NA = "SPI", DB = "STA", CX = "S.P.I.D.E.R/RP570")
#CREATE STY23:B = LIST(NA = "LMK", DB = "REX", CX = "LonMark")
#CREATE STY24:B = LIST(NA = "ADE", DB = "STA", CX = "Ademco")
#CREATE STY25:B = LIST(NA = "PCO", DB = "STA", CX = "Procontic / RCOM")
#CREATE STY26:B = LIST(NA = "WES", DB = "STA", CX = "Westinghouse")
#CREATE STY27:B = LIST(NA = "ATR", DB = "STA", CX = "Alpha Meter")
#CREATE STY28:B = LIST(NA = "PLC", DB = "RTU", CX = "PLC")
#SET STY29:BCX = "IEC 60870-5-10x"
#SET STY30:BCX = "DNP V3.00"
#SET STY33:BCX = "OPC Alarm & Event Server"
;----------------------------------------------------
;Node, Link for PC-NET & Stations
@i_Status = do (read_text("Sys_Tool/Create_C.scl"), "BASE_SYSTEM")
;----------------------------------------------------
;Other Stations
;NOTE! Use the system configuration tool to create stations for the PC-NET!
;NET 1 (DCP-NET) stations
;#CREATE STA:V = LIST(-
; TT = "EXTERNAL",-
; ST = "RTU",-
; ND = 1,-
; TN = 1)
;#CREATE STA1:B = %STA
