Subversion Repositories DevTools

Rev

Rev 6615 | Rev 6676 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6615 Rev 6623
Line 48... Line 48...
48
	OraDatabase.Parameters.Add "VIEW_ID", 			parViewId, 		            ORAPARM_INPUT, ORATYPE_NUMBER
48
	OraDatabase.Parameters.Add "VIEW_ID", 			parViewId, 		            ORAPARM_INPUT, ORATYPE_NUMBER
49
 
49
 
50
	objEH.TryORA ( OraSession )
50
	objEH.TryORA ( OraSession )
51
    objEH.ErrorRedirect = FALSE
51
    objEH.ErrorRedirect = FALSE
52
 
52
 
53
	OraDatabase.ExecuteSQL _
-
 
54
	"BEGIN ADD_AUTOBUILD_FAILURE_INFO ( :PROJ_ID, :VIEW_ID, :USER_ID_LIST ); END;"
53
	OraDatabase.ExecuteSQL "BEGIN ADD_AUTOBUILD_FAILURE_INFO ( :PROJ_ID, :VIEW_ID, :USER_ID_LIST ); END;"
55
 
54
 
56
	objEH.CatchORA ( OraSession )
55
	objEH.CatchORA ( OraSession )
57
 
56
 
58
	OraDatabase.Parameters.Remove "USER_ID_LIST"
57
	OraDatabase.Parameters.Remove "USER_ID_LIST"
59
	OraDatabase.Parameters.Remove "PROJ_ID"
58
	OraDatabase.Parameters.Remove "PROJ_ID"