V 10
1
LANG:1 2 HV
PANEL,272 101 218 157 N {204,204,204} 0
EEE E E 1 -1 -1 0  20 30
"" 0 1
EE 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
6 43
"Border1"
""
1 10 150 E E E 1 E 1 E N {0,0,0} E N {204,153,204} E E
 E E
39 0 0 0 0 0
EE E
0
1
LANG:1 0 
1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  1 E 10 10 210 150
2 1
"Text1"
""
1 18 40 E E E 1 E 1 E N {0,0,0} E N "_Transparent" E E
 E E
2 0 0 0 0 0
EE E
0
1
LANG:1 0 
1
"dashclr"N "_Transparent"
E E 0 1 1 0 1 E U  0 E 20 42 70 57
0 2 0 "s" 0 0 0 192 0 0  20 42
 1
1
LANG:1 105 -microsoft windows-Arial-bold-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,700,0,0,0,0,3,2,1,34,Arial
0 ""
1
LANG:1 9 Shutt Off
2 46
"Text6"
""
1 125 40 E E E 1 E 1 E N {0,0,0} E N {255,255,255} E E
 E E
42 0 0 0 0 0
EE E
0
1
LANG:1 0 
1
"dashclr"N "_Transparent"
"// SimpleCtrlScriptStart {invalid}
main()
{
  EP_textFieldIn();
}

EP_textFieldIn()
{
dyn_errClass err;

  if( dpSubStr( \"SCTmops1:Monitoring.Crate_Ramp_Off:_original\", DPSUB_DP_EL ) == \"\" )
  {
    setValue(\"\", \"color\", \"_dpdoesnotexist\");
    return;
  }

  dpConnect(\"EP_textFieldInCB\",
            \"SCTmops1:Monitoring.Crate_Ramp_Off:_original.._value\",
            \"SCTmops1:Crate00.Stat:_original.._value\");

  err = getLastError();
  if (dynlen(err) > 0)
    setValue(\"\", \"color\", \"_dpdoesnotexist\");

}


EP_textFieldInCB(string dp1, float ramp_status, string dp2, unsigned PS_Stat)
{
  if  (!PS_Stat) {
  	setValue( \"\", \"backCol\", \"Red\" );
	setValue( \"\", \"text\", \"DISABLED\" );
	return;
	}
  	
  if ( !ramp_status )
	{
	setValue(\"\", \"text\", \"OFF\" );
  	setValue( \"\", \"backCol\", \"\" );
	}
  else 
	{
	setValue( \"\", \"text\", \"ON\" );
	setValue( \"\", \"backCol\", \"alarmKamUnq\" );
	EP_childPanelOn();
	EP_sendPDO();
//	setValue( \"\", \"backCol\", \"Red\" );
//	setValue( \"\", \"text\", \"DONE\" );
	dpSet(\"SCTmops1:Crate00.Stat:_original.._value\", 0 );
	}
}


EP_childPanelOn()
{
 ChildPanelOnCentralModal(\"subpanels\\\\Cooling_Error.pnl\",
      \"Cooling Error\",
      makeDynString(\"\"));
}


EP_sendPDO()
{
dyn_errClass err;
int lv, icard, channel, i,crate;
int set;
string datapoint;

  dpGet(\"Crate.Numb:_original.._value\", crate);
  sprintf(datapoint,\"Crate%02d.Controller.CCch_Set.Send:_original.._value\",crate);
   
  for (i=0;i<=47;i++){
	channel=i+100;

	dpSetWait(datapoint, channel);
 
	delay(0,50);
	dpSetWait(datapoint, i);
  
	err = getLastError();
	if (dynlen(err) > 0)
		errorDialog(err);
  }
}
// SimpleCtrlScript {EP_textFieldIn}
// DP {SCTmops1:Monitoring.Crate_Ramp_Off}
// DPConfig {:_original.._value}
// DPType {bool}
// UseDPUnit {TRUE}
// UseDPFormat {TRUE}
// SimpleCtrlScriptEnd {EP_textFieldIn}
" 0
 E 0 1 1 0 1 E U  1 E 127 42 193 58
1 2 0 "s" 0 0 0 64 0 0  127 42
 1
1
LANG:1 119 -microsoft windows-Courier New-normal-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,400,0,0,0,0,3,2,1,49,Courier New
0 ""
1
LANG:1 5 Text4
25 49
"Table1"
""
1 15 70 E E E 1 E 1 E N "_WindowText" E N "_Window" E E
 E E
44 0 0 0 0 0
EE E
0
1
LANG:1 0 
0
1
LANG:1 118 -microsoft windows-Courier New-normal-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,400,0,0,0,0,0,0,0,0,Courier New
0 ""
13 68 207 147
"main()
{
EP_textFieldIn();
}


EP_textFieldIn()
{
dyn_errClass err;

  if( dpSubStr( \"SCTmops1:Monitoring.Crate_Ramp_Off:_original.._value\", DPSUB_DP_EL ) == \"\" )
  {
    setValue(\"\", \"color\", \"_dpdoesnotexist\");
    return;
  }

  dpConnect(\"EP_textFieldInCB\",
            \"SCTmops1:Monitoring.Crate_Ramp_Off:_original.._value\");
  err = getLastError();
  if (dynlen(err) > 0)
    setValue(\"\", \"color\", \"_dpdoesnotexist\");

}


EP_textFieldInCB(string dp, float ramp_status )
{
  int row,col;
  time t;
  string tim;
  getValue(\"\", \"currentCell\", row, col);
  if ( ramp_status )
	{
	t=getCurrentTime();
	  tim=formatTime(\"%H:%M:%S\", t);
	setValue(\"\", \"appendLine\", row, \"#1\", tim, \"#2\",\"Crate shuted down!\");
	}
}
" 0
 E 0 0 1 2 1 "#1" 0 1 0 "s" 1
LANG:1 2 #1
E1
LANG:1 0 
 80 "#2" 0 1 0 "s" 1
LANG:1 2 #2
E1
LANG:1 0 
 200 25 25 "" 1 1
LANG:1 2 #1
8 18 1
LANG:1 118 -microsoft windows-Courier New-normal-r-normal-*-*-110-100-100-*-*-iso8859-1|-12,0,0,0,400,0,0,0,0,0,0,0,0,Courier New
0 ""
0 1 1 0 0
1 0
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
0
0