Subversion Repositories DevTools

Rev

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

Rev 159 Rev 3975
Line 18... Line 18...
18 
			nIss_db = enumCLEARQUEST_DEVI_ID
 18 
			nIss_db = enumCLEARQUEST_DEVI_ID
19 
			SQLstr = _
 19 
			SQLstr = _
20 
			" SELECT si.dbid"&_
 20 
			" SELECT si.dbid"&_
21 
      "   FROM cq_devi.admin.software_issue si"&_
 21 
      "   FROM cq_devi.admin.software_issue si"&_
22 
			"  WHERE si.new_num = '"& Request("iss_id_num") &"'"
 22 
			"  WHERE si.new_num = '"& Request("iss_id_num") &"'"
23 
 
 - 
 
24 
		ElseIf Ucase(Request("iss_db_name")) = "TDSE" Then
 - 
 
25 
			nIss_db = enumCLEARQUEST_TDSE_ID
 - 
 
26 
			SQLstr = _
 - 
 
27 
			" SELECT si.dbid"&_
 - 
 
28 
      "   FROM cq_tdse.admin.request si"&_
 - 
 
29 
			"  WHERE si.job_number = '"& Request("iss_id_num") &"'"
 - 
 
30 
 
 - 
 
31 
		Else
 23 
		Else
32 
			' Database name unknown!
 24 
			' Database name unknown!
33 
			' Error message...
 25 
			' Error message...
34 
			Call RaiseMsg ( enum_WMSG_ERROR, "Database name "& Request("iss_db_name") &" is unknown!" )
 26 
			Call RaiseMsg ( enum_WMSG_ERROR, "Database name "& Request("iss_db_name") &" is unknown!" )
35 
		End If
 27 
		End If