Subversion Repositories DevTools

Rev

Rev 119 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 119 Rev 171
Line 30... Line 30...
30 
<%
 30 
<%
31 
'--------------------------------------------------------------------------------------------------------------------------
 31 
'--------------------------------------------------------------------------------------------------------------------------
32 
Sub SetPause ()
 32 
Sub SetPause ()
33 
	On Error Resume Next
 33 
	On Error Resume Next
34
34
35 
 
 - 
 
36 
	OraDatabase.Parameters.Add "RCON_ID", 			Request("rcon_id"), 	ORAPARM_INPUT, ORATYPE_NUMBER
35 
	OraDatabase.Parameters.Add "RCON_ID", 			Request("rcon_id"), 	ORAPARM_INPUT, ORATYPE_NUMBER
37
36
38 
	objEH.TryORA ( OraSession )
 37 
	objEH.TryORA ( OraSession )
39
38
40 
	OraDatabase.ExecuteSQL _
 39 
	OraDatabase.ExecuteSQL _
Line 49... Line 48...
49 
'--------------------------------------------------------------------------------------------------------------------------
 48 
'--------------------------------------------------------------------------------------------------------------------------
50 
%>
 49 
%>
51 
<%
 50 
<%
52 
'**************************** M  A  I  N ******************************
 51 
'**************************** M  A  I  N ******************************
53 
' --- Form is Valid ---
 52 
' --- Form is Valid ---
- 
 
 53 
 
- 
 
 54 
'if pausing all daemons of release, (rcon_id not specified)
- 
 
 55 
If Request("rcon_id").Count = 0 Then
- 
 
 56 
  Call SetDaemonStates(request("rtag_id"),enum_DAEMON_PAUSE)
- 
 
 57 
Else
- 
 
 58 
'if pausing a specific daemon (rcon_id specified)
54 
Call SetPause()
 59 
  Call SetPause()
- 
 
 60 
End If
55 
 
 61 
 
56 
If objEH.Finally Then
 62 
If objEH.Finally Then
57 
	Call OpenInWindow ( "build_status.asp?rtag_id="&request("rtag_id") )
 63 
	Call OpenInWindow ( "build_status.asp?rtag_id="&request("rtag_id") )
58 
End If
 64 
End If
59 
'**********************************************************************
 65 
'**********************************************************************