V 10 1 LANG:1 8 (NoName) PANEL,-1 -1 535 545 N "dcsUiWindowBack" 2 "$HostName" "$SystemName" "main() { int appo; string sAppo; // Static settings if(isDollarDefined(\"$SystemName\")) { sSystemName = $SystemName; txtSysName.text = sSystemName; appo = getSystemId(sSystemName+\":\"); txtSysNumber.text = (appo > 0) ? appo : \"-\"; } else { sSystemName = \"\"; txtSysName.text = \"Undefined!\"; txtSysNumber.text =\"-\"; } if(isDollarDefined(\"$HostName\")) { txtHostName.text = $HostName; txtHostIP.text = getHostByName($HostName); } else txtHostName.text = \"Undefined !\"; // System NONE if(sSystemName == \"none\") { __HideAllPVSSControls(); return; } // Verify if is distribuited if(!isDistributed()) { sAppo = substr(getSystemName(),0,strlen(getSystemName())-1); if(sAppo == sSystemName) setMultiValue(\"txtConnectionStatus\",\"backCol\",\"FwStateOKPhysics\",\"txtConnectionStatus\",\"text\",\"Not Distributed!\"); else setMultiValue(\"txtConnectionStatus\",\"backCol\",\"DpDoesNotExist\",\"txtConnectionStatus\",\"text\",\"Not Distributed!\"); return; } // Distributed // connect the State of Distribution if (!dpExists(getSystemName()+\"_DistManager.State.SystemNums\")) setMultiValue(\"txtConnectionStatus\",\"backCol\",\"DpDoesNotExist\",\"txtConnectionStatus\",\"text\",\"Not Distributed!\"); else dpConnect(\"_DistribConnectionStatus\",getSystemName()+\"_DistManager.State.SystemNums:_original.._value\"); if (!dpExists(sSystemName+\":_MemoryCheck.UsedKB\")) setMultiValue(\"txtMemUsed\",\"backCol\",\"DpDoesNotExist\", \"txtMemStat\",\"backCol\",\"DpDoesNotExist\", \"txtDiskUsed\",\"backCol\",\"DpDoesNotExist\",\"txtDskStat\", \"backCol\",\"DpDoesNotExist\"); else dpConnect(\"_DistribHwStatus\",sSystemName+\":_MemoryCheck.UsedKB:_original.._value\",sSystemName+\":_ArchivDisk.UsedKB:_original.._value\"); // Managers status if (!dpExists(sSystemName+\":_Connections.Ctrl.ManNums\")) setValue(\"tblManagers\",\"backCol\",\"DpDoesNotExist\"); else dpConnect(\"_DistribCtrlManagers\",sSystemName+\":_Connections.Ctrl.ManNums:_original.._value\"); if (!dpExists(sSystemName+\":_Connections.Driver.ManNums\")) setValue(\"tblDrivers\",\"backCol\",\"DpDoesNotExist\"); else dpConnect(\"_DistribDrivers\",sSystemName+\":_Connections.Driver.ManNums:_original.._value\"); // Archives bool bArchive; if (dpExists(sSystemName+\":_DataManager.UseValueArchive\")) { dpGet(sSystemName+\":_DataManager.UseValueArchive:_online.._value\",bArchive); if (bArchive) dpQueryConnectAll(\"_QueryArchive\", 1,\"ident\", \"SELECT '.state:_online.._value, .general.arName:_online.._value' FROM '_ValueArchive_*' REMOTE '\"+sSystemName+\"'\"+\" WHERE ('.state:_online.._value' < 3 AND _DPT = \\\"_ValueArchive\\\")\"); if (dpExistsDPE(sSystemName+\":_DataManager.UseRDBArchive\")) dpGet(sSystemName+\":_DataManager.UseRDBArchive:_online.._value\",bArchive); if (bArchive) dpQueryConnectAll(\"_QueryCBRDB\", 1,\"ident\", \"SELECT '.dbConnection.connected:_online.._value, .arNr:_online.._value' FROM '*' REMOTE '\"+sSystemName+\"'\"+\" WHERE (_DPT = \\\"_RDBArchive\\\")\"); //OPC Clients dpQueryConnectAll(\"_QueryOPC\", 1,\"opc\", \"SELECT '.ServerStateTxt:_online.._value, .VendorInfo:_online.._value' FROM '*' REMOTE '\"+sSystemName+\"'\"+\" WHERE (_DPT = \\\"_OPCServer\\\")\"); } else { setMultiValue(\"tblArchives\",\"backCol\",\"DpDoesNotExist\",\"tblOPC\",\"backCol\",\"DpDoesNotExist\"); } } _DistribConnectionStatus(string dpe, dyn_int diNums) { int i; string sNome; if( getSystemName() == sSystemName +\":\" ) { setMultiValue(\"txtConnectionStatus\",\"backCol\",\"FwStateOKPhysics\",\"txtConnectionStatus\",\"text\",\"CONNECTED\"); return; } for(i=1;i<= dynlen(diNums);i++) { sNome = getSystemName(diNums[i]); if(sSystemName == substr(sNome,0,strlen(sNome)-1)) { setMultiValue(\"txtConnectionStatus\",\"backCol\",\"FwStateOKPhysics\",\"txtConnectionStatus\",\"text\",\"CONNECTED\"); return; } } setMultiValue(\"txtConnectionStatus\",\"backCol\",\"FwStateAttention2\",\"txtConnectionStatus\",\"text\",\"NOT CONNECTED\"); return; } _DistribHwStatus(string dpe, int iMem, string dp2, int iDsk) { string sMemSta, sDskSta; int iMemPerc, iDskPerc; dpGet(sSystemName+\":_MemoryCheck.Status:_original.._value\",sMemSta, sSystemName+\":_ArchivDisk.Status:_original.._value\",sDskSta, sSystemName+\":_MemoryCheck.FreePerc:_original.._value\",iMemPerc, sSystemName+\":_ArchivDisk.FreePerc:_original.._value\",iDskPerc); iDsk = iDsk / 1000; iMemPerc = 100 - iMemPerc; iDskPerc = 100 - iDskPerc; setMultiValue(\"txtMemUsed\",\"text\",iMem, \"txtMemStat\",\"text\",sMemSta, \"txtMemStat\",\"backCol\",(sMemSta == \"OK\") ? \"FwStateOKPhysics\" :\"FwStateAttention1\", \"txtDiskUsed\",\"text\",iDsk,\"txtDskStat\", \"text\",sDskSta, \"txtDskStat\",\"backCol\",(sDskSta == \"OK\") ? \"FwStateOKPhysics\" :\"FwStateAttention1\"); setValue(\"bdMemPerc\",\"scale\", (float)iMemPerc / 100.0, 1); setValue(\"bdDiskPerc\",\"scale\", (float)iDskPerc / 100.0, 1 ); } _DistribDrivers(string dp, dyn_int dui) { int i; string sDT; if ( dynlen( dui ) <= 0) return; tblDrivers.deleteAllLines; for (i=1;i<=dynlen(dui);i++) { dpGet( sSystemName+\":_Driver\"+i+\".DT:_online.._value\", sDT); if(sDT == \"\") sDT = \"DRIVER\"; tblDrivers.appendLine(\"Drivers\", sDT, \"Numbers\", dui[i]); } } _DistribCtrlManagers(string dp, dyn_int dui) { dyn_string dsDebugResult; string sResult, sSystemName; int i,j; dyn_string dsTemp; int count = 0; bool flag = false; int iTemp = 0; sSystemName = substr(dp,0,strpos(dp,\":\")); sResult = \"\"; if ( dynlen( dui ) > 0) { for (i=1;i<=dynlen(dui);i++) { dynClear(dsDebugResult ); if (dpExists(sSystemName+\":_CtrlDebug_CTRL_\"+(dui[i]))) { dynClear(dsTemp); count = 0; dpSetWait(sSystemName+\":_CtrlDebug_CTRL_\"+(dui[i])+\".Command:_original.._value\", \"info scripts\"); while ( dynlen(dsDebugResult) < 1 && count < 50) // max 10 seconds { delay(0,10); dpGet(sSystemName+\":_CtrlDebug_CTRL_\"+(dui[i])+\".Result:_online.._value\", dsDebugResult); count ++; } for (j=1; j<= dynlen(dsDebugResult); j++) { dsTemp = strsplit(dsDebugResult[j], \";\"); if (sResult != \"\") sResult += \",\"; sResult += dsTemp[dynlen(dsTemp)]; if( dsTemp[dynlen(dsTemp)] == \"fwFsmSrvr\" ) bIsFSMHost = true; } } iTemp = dui[i] +1; } } tblManagers.deleteAllLines; dsTemp = strsplit(sResult,\",\"); for( i=1; i<=dynlen(dsTemp);i++) tblManagers.appendLine(\"Managers\",dsTemp[i]); setMultiValue(\"txtFSMSrvStatus\",\"text\",(bIsFSMHost)?\"RUNNING\":\"STOPPED\", \"txtFSMSrvStatus\",\"backCol\",(bIsFSMHost)?\"FwStateOKPhysics\":\"FwStateAttention3\"); } _QueryArchive(string ident, dyn_dyn_anytype val) { int i, rows; string sAppo; dyn_string dsApa; tblArchives.deleteAllLines; rows = 0; for (i = 2; i <= dynlen(val); i++) { sAppo = val[i][1]; sAppo = substr(sAppo,strpos(sAppo,\":\")+1); dsApa = strsplit(sAppo,\"_\"); if(dynlen(dsApa) == 3) { // tblArchives.appendLine(\"Archive\",dsApa[2]+ \" \" +dsApa[3],\"State\",(val[i][2] == 1)?\"RUN\":\"STOP\"); tblArchives.appendLine(\"Archive\",val[i][3],\"State\",(val[i][2] == 1)?\"RUN\":\"STOP\"); setValue(\"tblArchives\",\"cellBackColRC\",rows,\"State\",(val[i][2] == 1)?\"FwStateOKPhysics\":\"FwStateAttention3\");rows++; } } } _QueryCBRDB(string ident, dyn_dyn_anytype val) { int i; string sAppo; dyn_string dsApa; tblCBRDB.deleteAllLines; for (i = 2; i <= dynlen(val); i++) { sAppo = val[i][1]; sAppo = substr(sAppo,strpos(sAppo,\":\")+1); dsApa = strsplit(sAppo,\"_\"); if(dynlen(dsApa) == 3) tblCBRDB.appendLine(\"Archive\",dsApa[2]+ \" \" +dsApa[3],\"State\",(val[i][2] == 1)?\"RUN\":\"STOP\"); } } _QueryOPC(string ident, dyn_dyn_anytype val) { int i; string sAppo; tblOPC.deleteAllLines; for (i = 2; i <= dynlen(val); i++) { sAppo = val[i][1]; sAppo = substr(sAppo,strpos(sAppo,\":\")+2); tblOPC.appendLine(\"OPCs\",sAppo,\"State\",val[i][2]); } } " 0 E E E E 1 0 0 0 0 0 ""0 1 E "global string sSystemName; global bool bIsFSMHost = false; void __HideAllPVSSControls() { setMultiValue(\"tblArchives\",\"visible\",false, \"tblManagers\",\"visible\",false, \"tblDrivers\",\"visible\",false, \"tblOPC\",\"visible\",false, \"txtFSMSrvStatus\",\"visible\",false, \"txtFSMToDo\",\"visible\",false, \"txtFsmAction\",\"visible\",false, \"txtAPIPid\",\"visible\",false, \"txtDskStat\",\"visible\",false, \"txtMemStat\",\"visible\",false, \"txtDiskUsed\",\"visible\",false, \"txtMemUsed\",\"visible\",false, \"txtSysName\",\"visible\",false, \"txtSysNumber\",\"visible\",false, \"txtConnectionStatus\",\"visible\",false); } " 0 2 "CBRef""1" "EClose"E "" DISPLAY_LAYER, 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 LAYER, 0 1 LANG:1 6 Layer1 4 28 "Line1" "" 1 1 123 E E E 1 E 1 E N "_WindowText" E N {255,255,255} E E E E 29 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 1 123 531 123 4 29 "Line2" "" 1 1 124 E E E 1 E 1 E N {255,255,255} E N {255,255,255} E E E E 30 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 1 124 531 124 4 51 "Line7" "" 1 1 178 E E E 1 E 1 E N "_WindowText" E N {255,255,255} E E E E 52 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 531 177 1 177 6 57 "RECTANGLE1" "" 1 1 46 E E E 1 E 1 E N "_WindowText" E N {255,255,255} E E E E 58 0 0 0 0 0 E E E 2 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 1 0 1 -1 -1 2 0 3 "pictures/dcsUi/logo.bmp" 13434828 E 1 1 63 46 1 60 0 "" 0 1 "leftClick" 1 1 "main() { int replaced; string componentName, path, tempPanelPath, helpFile, browserCommand; dyn_string aux, exceptionInfo; // DebugN(\"The good path is \" + panelPath); if(!goodPanelName) { fwException_raise( exceptionInfo, \"ERROR\", \"Open panel name doesn't match with PVSS database. Try opening the panel again.\", \"\"); fwExceptionHandling_display(exceptionInfo); return; } // Get component name. We assume panels are inside a directory // named after the component name strreplace(panelPath, \"\\\\\", \"/\"); aux = strsplit(panelPath, \"/\"); componentName = aux[1]; // DebugN(panelPath, componentName); // Remove extension if given if(strpos(panelPath, \".pnl\") >= 0) { tempPanelPath = substr(panelPath, 0, strpos(panelPath, \".pnl\")); } else { tempPanelPath = panelPath; } // try to find the help file associated with the panel helpFile = tempPanelPath + \".html\"; // DebugN(\"helpFile \" + helpFile + \" tempPanelPath \" + tempPanelPath + \" componentName \" + componentName); path = getPath(HELP_REL_PATH, componentName + \"/panels/\" + helpFile); if(path == \"\") { helpFile = tempPanelPath + \".htm\"; // DebugN(\"helpFile \" + helpFile); path = getPath(HELP_REL_PATH, componentName + \"/panels/\" + helpFile); // DebugN(componentName + \"/panels/\" + helpFile); if(path == \"\") { fwException_raise( exceptionInfo, \"ERROR\", \"Could not find the help file associated with the current panel\", \"\"); fwExceptionHandling_display(exceptionInfo); return; } } // DebugN(\"Final help path \" + path); fwOpenProgressBar(\"Help\", \"Opening help file...\", 1); // If there were no exceptions, then display the help if(_WIN32) { dpGet(\"fwGeneral.help.helpBrowserCommandWindows\", browserCommand); replaced = strreplace(browserCommand, \"$1\", path); if(replaced == 0) browserCommand = browserCommand + \" \" + path; // system(\"start iexplore \" + path + \" &\"); system(browserCommand); } else { dpGet(\"fwGeneral.help.helpBrowserCommandLinux\", browserCommand); replaced = strreplace(browserCommand, \"$1\", path); if(replaced == 0) browserCommand = browserCommand + \" \" + path; system(browserCommand); // system(\"start iexplore \" + path + \" &\"); } fwCloseProgressBar(); } " 0 1 "message" 1 1 "main() { time rootPanelPathTime, childPanelPathTime; unsigned managerNumber = myManNum(); string rootPanelPath, childPanelPath, rootPanelName, childPanelName, panelName; if(isDollarDefined(\"$sPanelRelativePath\")) { panelPath = $sPanelRelativePath; } if(panelPath == \"\") { dpGet( \"_Ui_\" + managerNumber + \".RootPanelOrigOn.FileName\", rootPanelPath, \"_Ui_\" + managerNumber + \".RootPanelOrigOn.FileName:_original.._stime\", rootPanelPathTime, \"_Ui_\" + managerNumber + \".RootPanelOrigOn.PanelName\", rootPanelName, \"_Ui_\" + managerNumber + \".ChildPanelOn.FileName\", childPanelPath, \"_Ui_\" + managerNumber + \".ChildPanelOn.FileName:_original.._stime\", childPanelPathTime, \"_Ui_\" + managerNumber + \".ChildPanelOn.PanelName\", childPanelName); // DebugN(rootPanelPath, rootPanelPathTime, childPanelPath, childPanelPathTime); if(rootPanelPathTime > childPanelPathTime) { panelPath = rootPanelPath; panelName = rootPanelName; } else { panelPath = childPanelPath; panelName = childPanelName; } if(myPanelName() == panelName) { goodPanelName = TRUE; // DebugN(\"Correct panel name\"); } else { goodPanelName = FALSE; // DebugN(\"Wrong panel name\"); } } // DebugN(\"The good path is \" + panelPath); }" 0 0 2 59 "PRIMITIVE_TEXT1" "" 1 11 276 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 59 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 2 1 E U 1 E 11 276 306 295 0 2 2 "0s" 0 0 0 64 0 0 11 276 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,505,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 15 Archive Manager 13 61 "cmdPmon" "" 1 440 494 E E E 1 E 1 E N "dcsUiButtonFore" E N "dcsUiButtonBack" E E E E 60 0 0 0 0 0 E E E 0 1 LANG:1 0 0 1 LANG:1 85 -*-Arial-*-r-normal-*-*-100-100-100-*-*-iso8859-1|-13,0,0,0,505,0,0,0,0,0,0,0,0,Arial 0 "" 438 492 513 528 T 1 LANG:1 4 PMON "main() { ChildPanelOnModal(\"dcsFsmTools/dcsHostPMon.pnl\",\"HostProcessMonitor\", makeDynString(\"$HostName:\"+txtHostName.text),10,10); }" 0 E E E 0 LAYER, 1 1 LANG:1 6 Layer2 0 LAYER, 2 1 LANG:1 6 Layer3 0 LAYER, 3 1 LANG:1 6 Layer4 0 LAYER, 4 1 LANG:1 6 Layer5 0 LAYER, 5 1 LANG:1 6 Layer6 0 LAYER, 6 1 LANG:1 6 Layer7 0 LAYER, 7 1 LANG:1 6 Layer8 4 31 "Line3" "" 1 1 267 E E E 1 E 1 E N "_WindowText" E N {255,255,255} E E E E 32 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 1 267 531 267 4 32 "Line4" "" 1 1 268 E E E 1 E 1 E N {255,255,255} E N {255,255,255} E E E E 33 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 1 268 531 268 2 33 "Text20" "" 1 240 256 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 34 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 338 274 494 290 0 2 0 "0s" 0 0 0 64 0 0 338 274 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 17 Running Ctrl Mngr 2 35 "Text21" "" 1 320 386 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 36 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 321 419 427 435 0 2 0 "0s" 0 0 0 64 0 0 321 419 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 15 Running Drivers 2 53 "Text5" "" 1 10 386 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 54 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 11 419 287 435 0 2 0 "0s" 0 0 0 64 0 0 11 419 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 10 OPC Server 25 38 "tblArchives" "" 1 10 294 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 39 0 0 0 0 0 E E E 0 1 LANG:1 0 0 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 8 292 310 408 EE 0 0 1 2 1 "Archive" 19 1 0 "s" 1 LANG:1 7 Archive E 1 LANG:1 0 226 "State" 5 1 0 "s" 1 LANG:1 5 State E 1 LANG:1 0 70 18 18 "" 1 1 LANG:1 2 #1 8 30 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 0 1 0 1 7 1 0 25 39 "tblManagers" "" 1 320 -212 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 40 0 0 0 0 0 E E E 0 1 LANG:1 0 0 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 334 290 498 406 EE 0 0 1 1 1 "Managers" 13 1 0 "s" 1 LANG:1 8 Managers E 1 LANG:1 0 160 18 18 "" 1 1 LANG:1 2 #1 8 30 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 0 1 0 1 7 1 0 25 40 "tblDrivers" "" 1 143 -267 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 41 0 0 0 0 0 E E E 0 1 LANG:1 0 0 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 317 435 431 529 EE 0 0 1 2 1 "Drivers" 5 1 0 "s" 1 LANG:1 7 Drivers E 1 LANG:1 0 66 "Numbers" 1 1 0 "s" 1 LANG:1 7 Numbers E 1 LANG:1 0 24 18 18 "" 1 1 LANG:1 2 #1 8 30 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 0 1 0 1 7 1 0 25 54 "tblOPC" "" 1 -1173 -568 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 55 0 0 0 0 0 E E E 0 1 LANG:1 0 0 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 7 435 291 529 EE 0 0 1 2 1 "OPCs" 11 1 0 "s" 1 LANG:1 4 OPCs E 1 LANG:1 0 132 "State" 11 1 0 "s" 1 LANG:1 5 State E 1 LANG:1 0 129 18 18 "" 1 1 LANG:1 2 #1 8 30 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 0 1 0 1 7 1 0 2 43 "Text23" "" 1 10 170 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 44 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 13 189 99 205 0 2 0 "0s" 0 0 0 64 0 0 13 189 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 10 FSM Server 2 44 "txtFSMSrvStatus" "" 1 102 170 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 45 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" "main() { }" 0 E 0 1 1 0 1 E U 1 E 105 189 228 205 1 2 0 "0s" 0 0 0 65 0 0 105 189 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 45 "txtFSMToDo" "" 1 72 200 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 46 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" "// SimpleCtrlScriptStart {invalid} main() { dyn_errClass err; if( !dpExists( $SystemName+\":ToDo.status:_original.._value\")) { setValue(\"txtFSMToDo\", \"visible\", false); return; } dpConnect(\"_txtFSMToDoCB\",$SystemName+\":ToDo.status:_original.._value\"); err = getLastError(); if (dynlen(err) > 0) setValue(\"txtFSMToDo\", \"visible\", false); } _txtFSMToDoCB(string dp, string sNewValue) { setMultiValue(\"txtFSMToDo\", \"backCol\", (sNewValue == \"working\")?\"FwStateAttention1\":\"FwStateOKPhysics\", \"txtFSMToDo\", \"text\", dpValToString(dp, sNewValue, TRUE) ); } // SimpleCtrlScript {EP_textFieldIn} // DP {hmp_liq:ToDo.status} // DPConfig {:_original.._value} // DPType {string} // UseDPUnit {TRUE} // UseDPFormat {TRUE} // SimpleCtrlScriptEnd {EP_textFieldIn} " 0 E 0 1 1 0 1 E U 1 E 75 219 229 232 1 2 0 "0s" 0 0 0 65 0 0 75 219 1 1 LANG:1 84 -*-Arial-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 46 "txtFsmAction" "" 1 72 219 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 47 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" "// SimpleCtrlScriptStart {invalid} main() { dyn_errClass err; if( !dpExists( $SystemName+\":ToDo.action:_original.._value\")) { setValue(\"txtFsmAction\", \"visible\", false); return; } dpConnect(\"_txtFSMToDoCB\",$SystemName+\":ToDo.action:_original.._value\"); err = getLastError(); if (dynlen(err) > 0) setValue(\"txtFsmAction\", \"visible\", false); } _txtFSMToDoCB(string dp, string sNewValue) { setMultiValue(\"txtFsmAction\", \"text\", dpValToString(dp, sNewValue, TRUE) ); } // SimpleCtrlScript {EP_textFieldIn} // DP {hmp_liq:ToDo.status} // DPConfig {:_original.._value} // DPType {string} // UseDPUnit {TRUE} // UseDPFormat {TRUE} // SimpleCtrlScriptEnd {EP_textFieldIn} " 0 E 0 1 1 0 1 E U 1 E 75 238 229 251 1 2 0 "0s" 0 0 0 65 0 0 75 238 1 1 LANG:1 84 -*-Arial-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 47 "txtAPIPid" "" 1 240 170 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 48 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" "// SimpleCtrlScriptStart {invalid} main() { dyn_errClass err; if( !dpExists( $SystemName+\":ToDo.apiPid:_original.._value\")) { setValue(\"txtAPIPid\", \"visible\", false); return; } dpConnect(\"_txtFSMToDoCB\",$SystemName+\":ToDo.apiPid:_original.._value\"); err = getLastError(); if (dynlen(err) > 0) setValue(\"txtAPIPid\", \"visible\", false); } _txtFSMToDoCB(string dp, int iNewValue) { setMultiValue(\"txtAPIPid\", \"text\", (iNewValue != 0)?\"PVSS00smi.exe RUNNING\":\"PVSS00smi STOPPED\" ); } // SimpleCtrlScript {EP_textFieldIn} // DP {hmp_liq:ToDo.status} // DPConfig {:_original.._value} // DPType {string} // UseDPUnit {TRUE} // UseDPFormat {TRUE} // SimpleCtrlScriptEnd {EP_textFieldIn} " 0 E 0 1 1 0 1 E U 1 E 243 189 439 202 1 2 0 "0s" 0 0 0 64 0 0 243 189 1 1 LANG:1 87 -*-Arial-bold-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,697,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 48 "Text27" "" 1 20 200 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 49 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 23 219 69 232 0 2 0 "0s" 0 0 0 64 0 0 23 219 1 1 LANG:1 84 -*-Arial-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 5 State 2 49 "txtDNSPid" "" 1 240 190 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 50 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" "// SimpleCtrlScriptStart {invalid} main() { dyn_errClass err; if( !dpExists( $SystemName+\":ToDo.dim_dns_up:_original.._value\")) { setValue(\"txtDNSPid\", \"visible\", false); return; } dpConnect(\"_txtFSMToDoCB\",$SystemName+\":ToDo.dim_dns_up:_original.._value\"); err = getLastError(); if (dynlen(err) > 0) setValue(\"txtDNSPid\", \"visible\", false); } _txtFSMToDoCB(string dp, int iNewValue) { string sDns; dpGet($SystemName+\":ToDo.dim_dns_node:_original.._value\",sDns); setMultiValue(\"txtDNSPid\", \"text\", (iNewValue != 0)?\"DIM :\"+sDns+\" RUNNING\":\"DIM :\"+sDns+\" STOPPED\" ); } // SimpleCtrlScript {EP_textFieldIn} // DP {hmp_liq:ToDo.status} // DPConfig {:_original.._value} // DPType {string} // UseDPUnit {TRUE} // UseDPFormat {TRUE} // SimpleCtrlScriptEnd {EP_textFieldIn} " 0 E 0 1 1 0 1 E U 1 E 243 209 439 222 1 2 0 "0s" 0 0 0 64 0 0 243 209 1 1 LANG:1 87 -*-Arial-bold-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,697,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 50 "Text3" "" 1 20 219 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 51 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 23 238 69 251 0 2 0 "0s" 0 0 0 64 0 0 23 238 1 1 LANG:1 84 -*-Arial-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 6 Action 4 52 "Line8" "" 1 0 179 E E E 1 E 1 E N {255,255,255} E N {255,255,255} E E E E 53 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 530 178 0 178 2 25 "txtMemStat" "" 1 450 114 E E E 1 E 1 E N "dcsUiWindowFore" E N {255,255,255} E E E E 26 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 453 133 499 146 1 2 0 "0s" 0 0 0 65 0 0 453 133 1 1 LANG:1 84 -*-Arial-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 27 "txtDskStat" "" 1 450 137 E E E 1 E 1 E N "dcsUiWindowFore" E N {255,255,255} E E E E 28 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" "main() { }" 0 E 0 1 1 0 1 E U 1 E 453 156 499 169 1 2 0 "0s" 0 0 0 65 0 0 453 156 1 1 LANG:1 84 -*-Arial-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 6 20 "Border1" "" 1 240 128 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 21 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 1 0 1 1 17 1 E 240 114 442 128 6 21 "Border2" "" 1 240 151 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 22 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 1 0 1 1 17 1 E 240 137 443 151 6 22 "bdMemPerc" "" 1 241 127 E E E 1 E 1 E N "dcsUiDisplayBack" E N "dcsUiDisplayFore" E E E E 23 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 1 0 1 1 17 1 E 241 115 441 127 6 23 "bdDiskPerc" "" 1 241 150 E E E 1 E 1 E N "dcsUiDisplayBack" E N "dcsUiDisplayFore" E E E E 24 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 1 0 1 1 17 1 E 241 138 441 150 2 14 "Text9" "" 1 10 114 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 15 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 13 133 124 149 0 2 0 "0s" 0 0 0 64 0 0 13 133 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 13 Memory Status 2 15 "Text10" "" 1 10 137 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 16 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 13 156 124 172 0 2 0 "0s" 0 0 0 64 0 0 13 156 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 11 Disk Status 2 16 "txtMemUsed" "" 1 130 114 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 17 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" "main() { }" 0 E 0 1 1 0 1 E U 1 E 133 133 179 149 1 2 0 "0s" 0 0 0 66 0 0 133 133 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 17 "txtDiskUsed" "" 1 130 137 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 18 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 133 156 179 172 1 2 0 "0s" 0 0 0 66 0 0 133 156 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 18 "Text13" "" 1 182 114 E E E 1 E 1 E N "dcsUiDisplayMidFore" E N "dcsUiDisplayBack" E E E E 19 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 185 133 221 149 1 2 0 "0s" 0 0 0 64 0 0 185 133 1 1 LANG:1 84 -*-Arial-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 6 KBytes 2 19 "Text14" "" 1 183 137 E E E 1 E 1 E N "dcsUiDisplayMidFore" E N "dcsUiDisplayBack" E E E E 20 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 186 156 222 172 1 2 0 "0s" 0 0 0 64 0 0 186 156 1 1 LANG:1 84 -*-Arial-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 6 MBytes 2 4 "txtHostName" "" 1 130 30 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 5 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 133 49 239 65 1 2 0 "0s" 0 0 0 64 0 0 133 49 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 7 "Text2" "" 1 10 30 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 8 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 13 49 124 65 0 2 0 "0s" 0 0 0 64 0 0 13 49 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 9 Host Name 2 8 "txtSysName" "" 1 130 55 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 9 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 133 74 239 90 1 2 0 "0s" 0 0 0 64 0 0 133 74 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 9 "Text4" "" 1 10 55 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 10 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 13 74 124 90 0 2 0 "0s" 0 0 0 64 0 0 13 74 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 11 System Name 2 10 "txtSysNumber" "" 1 340 55 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 11 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" "main() { }" 0 E 0 1 1 0 1 E U 1 E 350 74 376 90 1 2 0 "0s" 0 0 0 65 0 0 350 74 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 11 "Text6" "" 1 250 55 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 12 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 265 74 341 90 0 2 0 "0s" 0 0 0 64 0 0 265 74 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 10 Sys Number 2 12 "Text7" "" 1 10 80 E E E 1 E 1 E N "dcsUiLabelFore" E N "dcsUiLabelBack" E E E E 13 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 13 99 124 115 0 2 0 "0s" 0 0 0 64 0 0 13 99 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 17 Connection Status 2 13 "txtConnectionStatus" "" 1 130 80 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 14 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 133 99 279 115 1 2 0 "0s" 0 0 0 65 0 0 133 99 1 1 LANG:1 84 -*-Arial-*-r-normal-*-13-*-100-100-*-*-iso8859-1|-13,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 30 "txtHostIP" "" 1 250 30 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 31 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 253 49 359 65 1 2 0 "0s" 0 0 0 64 0 0 253 49 1 1 LANG:1 84 -*-Arial-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 2 56 "txtNetTest" "" 1 430 30 E E E 1 E 1 E N "dcsUiDisplayFore" E N "dcsUiDisplayBack" E E E E 56 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E U 1 E 433 49 509 65 1 2 0 "0s" 0 0 0 65 0 0 433 49 1 1 LANG:1 84 -*-Arial-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 1 - 13 55 "Button1" "" 1 378 47 E E E 1 E 1 E N "dcsUiButtonFore" E N "dcsUiButtonBack" E E E E 55 0 0 0 0 0 E E E 0 1 LANG:1 0 0 1 LANG:1 84 -*-Arial-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,404,0,0,0,0,0,0,0,0,Arial 0 "" 376 45 430 69 T 1 LANG:1 8 Test NET "main() { this.enabled = false; txtNetTest.text = dcsUiBase_TestNetworkConnection(txtHostName.text) ? \"GOOD !!\" : \"LOSS !!\" ; delay(10,0); this.enabled = true; txtNetTest.text = \"-\"; }" 0 E E E 2 1 "Text1" "" 1 279.060377358491 0 E E E 1 E 1 E N "dcsUiTitleFore" E N "dcsUiTitleBack" E E E E 2 0 0 0 0 0 E E E 0 1 LANG:1 0 1 "dashclr"N "_Transparent" E E 0 1 1 0 1 E 1.34409398362407 0 1 279.060377358491 0 1 E -156 3 160 22 0 2 0 "0s" 0 0 0 65 0 0 2 3 1 1 LANG:1 87 -*-Arial-bold-r-normal-*-12-*-100-100-*-*-iso8859-1|-12,0,0,0,758,0,0,0,0,0,0,0,0,Arial 0 "" 1 LANG:1 45 ALICE DCS UI - Distributed Host Status v.0.2 0 3 0 "Group27" "objects\\fwGeneral\\fwHelpButton.pnl" 940 750 T 59 1 0 1 -439 -748 1 "$sPanelRelativePath""dcsFsmTools/dcsHostStatus.pnl" 0