Subversion Repositories DevTools

Rev

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

Rev 1281 Rev 3974
Line 40... Line 40...
40 
	If Cint(NNiss_db) = enumCLEARQUEST_DEVI_ID Then
 40 
	If Cint(NNiss_db) = enumCLEARQUEST_DEVI_ID Then
41 
		SQLstr = _
 41 
		SQLstr = _
42 
		" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_
 42 
		" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_
43 
    "   FROM cq_devi.admin.software_issue si"&_
 43 
    "   FROM cq_devi.admin.software_issue si"&_
44 
		"  WHERE si.dbid = "& NNiss_id
 44 
		"  WHERE si.dbid = "& NNiss_id
45 
 
 - 
 
46 
	'ElseIf Cint(NNiss_db) = enumCLEARQUEST_DPGIM_ID Then
 - 
 
47 
	'	SQLstr = _
 - 
 
48 
	'	" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_
 - 
 
49 
	'	"   FROM dpgim.admin.software_issue si"&_
 - 
 
50 
	'	"  WHERE si.dbid = "& NNiss_id
 - 
 
51 
 
 - 
 
52 
	ElseIf Cint(NNiss_db) = enumCLEARQUEST_VT5DM_ID Then
 - 
 
53 
		SQLstr = _
 - 
 
54 
		" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_
 - 
 
55 
    "   FROM CQ_VT5DM.admin.software_issue si"&_
 - 
 
56 
		"  WHERE si.dbid = "& NNiss_id
 - 
 
57 
 
 - 
 
58 
	End If
 45 
	End If
59 
	OOrsCQ.ActiveConnection = CQ_conn
 46 
	OOrsCQ.ActiveConnection = CQ_conn
60 
	OOrsCQ.Source = SQLstr
 47 
	OOrsCQ.Source = SQLstr
61 
	OOrsCQ.CursorType = 0
 48 
	OOrsCQ.CursorType = 0
62 
	OOrsCQ.CursorLocation = 2
 49 
	OOrsCQ.CursorLocation = 2