| Line 34... |
Line 34... |
| 34 |
Const enumLoc_summary = 3
|
34 |
Const enumLoc_summary = 3
|
| 35 |
Const enumLoc_status = 4
|
35 |
Const enumLoc_status = 4
|
| 36 |
Const enumLoc_priority = 5
|
36 |
Const enumLoc_priority = 5
|
| 37 |
Const enumLoc_issue_type = 6
|
37 |
Const enumLoc_issue_type = 6
|
| 38 |
'------------ Variable Init -------------------
|
38 |
'------------ Variable Init -------------------
|
| 39 |
Set rsCQ = Server.CreateObject("ADODB.Recordset")
|
- |
|
| 40 |
Set fixedIssDict = CreateObject("Scripting.Dictionary")
|
39 |
Set fixedIssDict = CreateObject("Scripting.Dictionary")
|
| 41 |
Set notesIssDict = CreateObject("Scripting.Dictionary")
|
40 |
Set notesIssDict = CreateObject("Scripting.Dictionary")
|
| 42 |
Set depIssDict = CreateObject("Scripting.Dictionary")
|
41 |
Set depIssDict = CreateObject("Scripting.Dictionary")
|
| 43 |
Set vcsInfoCollector = CreateObject("Scripting.Dictionary")
|
42 |
Set vcsInfoCollector = CreateObject("Scripting.Dictionary")
|
| 44 |
'----------------------------------------------
|
43 |
'----------------------------------------------
|
| Line 157... |
Line 156... |
| 157 |
Set rsQry = OraDatabase.DbCreateDynaset( sqlstr, cint(0) )
|
156 |
Set rsQry = OraDatabase.DbCreateDynaset( sqlstr, cint(0) )
|
| 158 |
|
157 |
|
| 159 |
End Sub
|
158 |
End Sub
|
| 160 |
'----------------------------------------------------------------------------------------------------------------------------------------
|
159 |
'----------------------------------------------------------------------------------------------------------------------------------------
|
| 161 |
Function Get_CQ_Issues ( SSsql, OOrsCQ )
|
160 |
Function Get_CQ_Issues ( SSsql, OOrsCQ )
|
| 162 |
If OOrsCQ.State = 1 Then
|
- |
|
| 163 |
OOrsCQ.Close()
|
- |
|
| 164 |
End If
|
- |
|
| 165 |
|
161 |
|
| 166 |
On Error Resume Next
|
162 |
On Error Resume Next
|
| 167 |
OOrsCQ.ActiveConnection = CQ_conn
|
163 |
Set OOrsCQ = OraDatabase.DbCreateDynaset( SSsql, cint(0))
|
| 168 |
OOrsCQ.Source = SSsql
|
- |
|
| 169 |
OOrsCQ.CursorType = 0
|
- |
|
| 170 |
OOrsCQ.CursorLocation = 2
|
- |
|
| 171 |
OOrsCQ.LockType = 3
|
- |
|
| 172 |
OOrsCQ.Open()
|
- |
|
| 173 |
|
- |
|
| 174 |
Get_CQ_Issues = Err.Number
|
164 |
Get_CQ_Issues = Err.Number
|
| 175 |
|
165 |
|
| 176 |
End Function
|
166 |
End Function
|
| 177 |
'----------------------------------------------------------------------------------------------------------------------------------------
|
167 |
'----------------------------------------------------------------------------------------------------------------------------------------
|
| 178 |
Function Get_Dependency_CQ_Issues ( SSsql, OOrsCQ, DDdepIss, AAiss )
|
168 |
Function Get_Dependency_CQ_Issues ( SSsql, OOrsCQ, DDdepIss, AAiss )
|
| 179 |
Dim recCnt
|
169 |
Dim recCnt
|
| 180 |
If OOrsCQ.State = 1 Then
|
- |
|
| 181 |
OOrsCQ.Close()
|
- |
|
| 182 |
End If
|
- |
|
| 183 |
|
- |
|
| 184 |
OOrsCQ.ActiveConnection = CQ_conn
|
- |
|
| 185 |
OOrsCQ.Source = SSsql
|
- |
|
| 186 |
OOrsCQ.CursorType = 0
|
- |
|
| 187 |
OOrsCQ.CursorLocation = 2
|
- |
|
| 188 |
OOrsCQ.LockType = 3
|
- |
|
| 189 |
|
170 |
|
| 190 |
On Error Resume Next
|
171 |
On Error Resume Next
|
| 191 |
OOrsCQ.Open()
|
172 |
Set OOrsCQ = OraDatabase.DbCreateDynaset( SSsql, cint(0))
|
| 192 |
|
173 |
|
| 193 |
' Exit with error if error occurs
|
174 |
' Exit with error if error occurs
|
| 194 |
Get_Dependency_CQ_Issues = Err.Number
|
175 |
Get_Dependency_CQ_Issues = Err.Number
|
| 195 |
If Err.Number <> 0 Then Exit Function
|
176 |
If Err.Number <> 0 Then Exit Function
|
| 196 |
|
177 |
|
| 197 |
|
- |
|
| 198 |
recCnt = 1
|
178 |
recCnt = 1
|
| 199 |
|
179 |
|
| 200 |
While ((NOT OOrsCQ.BOF) AND (NOT OOrsCQ.EOF))
|
180 |
While ((NOT OOrsCQ.BOF) AND (NOT OOrsCQ.EOF))
|
| 201 |
ReDim Preserve AAiss( 6, recCnt )
|
181 |
ReDim Preserve AAiss( 6, recCnt )
|
| 202 |
'If NOT DDdepIss.Exists Cstr(rsTemp("iss_db") &"."& rsTemp("iss_id")) Then
|
182 |
'If NOT DDdepIss.Exists Cstr(rsTemp("iss_db") &"."& rsTemp("iss_id")) Then
|
| Line 1499... |
Line 1479... |
| 1499 |
<%While ((NOT rsCQ.BOF) AND (NOT rsCQ.EOF))%>
|
1479 |
<%While ((NOT rsCQ.BOF) AND (NOT rsCQ.EOF))%>
|
| 1500 |
<tr>
|
1480 |
<tr>
|
| 1501 |
<td align="center" nowrap bgcolor=#e4e9ec><img src="images/i_tick_black.gif" width="7" height="7" vspace="2"></td>
|
1481 |
<td align="center" nowrap bgcolor=#e4e9ec><img src="images/i_tick_black.gif" width="7" height="7" vspace="2"></td>
|
| 1502 |
<td bgcolor=#f5f5f5 nowrap class="form_item"><a href="javascript:;" onClick="MM_openBrWindow('_wform_issues_details.asp?iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','IssueDetails','resizable=yes,width=580,height=500')" class="txt_linked"><%=rsCQ("iss_num")%></a></td>
|
1482 |
<td bgcolor=#f5f5f5 nowrap class="form_item"><a href="javascript:;" onClick="MM_openBrWindow('_wform_issues_details.asp?iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','IssueDetails','resizable=yes,width=580,height=500')" class="txt_linked"><%=rsCQ("iss_num")%></a></td>
|
| 1503 |
<td bgcolor=#f5f5f5 class="form_item">
|
1483 |
<td bgcolor=#f5f5f5 class="form_item">
|
| 1504 |
<%If rsCQ("iss_db") = enumCLEARQUEST_DEVI_ID Then%>
|
1484 |
<%If Cint(rsCQ("iss_db")) = enumCLEARQUEST_DEVI_ID Then%>
|
| 1505 |
DEVI
|
1485 |
DEVI
|
| 1506 |
<%Else%>
|
1486 |
<%Else%>
|
| 1507 |
UNKNOWN
|
1487 |
UNKNOWN
|
| 1508 |
<%End If%></td>
|
1488 |
<%End If%></td>
|
| 1509 |
<td bgcolor=#f5f5f5 class="form_item"><%=NewLine_To_BR ( To_HTML ( rsCQ("summary") ) )%></td>
|
1489 |
<td bgcolor=#f5f5f5 class="form_item"><%=NewLine_To_BR ( To_HTML ( rsCQ("summary") ) )%></td>
|
| Line 1684... |
Line 1664... |
| 1684 |
<a href="javascript:;" onClick="MM_openBrWindow('_wform_issues_details.asp?iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','IssueDetails','resizable=yes,width=580,height=500')" class="txt_linked">
|
1664 |
<a href="javascript:;" onClick="MM_openBrWindow('_wform_issues_details.asp?iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','IssueDetails','resizable=yes,width=580,height=500')" class="txt_linked">
|
| 1685 |
<%=rsCQ("iss_num")%>
|
1665 |
<%=rsCQ("iss_num")%>
|
| 1686 |
</a>
|
1666 |
</a>
|
| 1687 |
</td>
|
1667 |
</td>
|
| 1688 |
<td bgcolor=#f5f5f5 class="form_item">
|
1668 |
<td bgcolor=#f5f5f5 class="form_item">
|
| 1689 |
<%If rsCQ("iss_db") = enumCLEARQUEST_DEVI_ID Then%>
|
1669 |
<%If CInt(rsCQ("iss_db")) = enumCLEARQUEST_DEVI_ID Then%>
|
| 1690 |
DEVI
|
1670 |
DEVI
|
| 1691 |
<%Else%>
|
1671 |
<%Else%>
|
| 1692 |
UNKNOWN
|
1672 |
UNKNOWN
|
| 1693 |
<%End If%>
|
1673 |
<%End If%>
|
| 1694 |
</td>
|
1674 |
</td>
|
| Line 1801... |
Line 1781... |
| 1801 |
<a href="javascript:;" onClick="MM_openBrWindow('_wform_issues_details.asp?iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','IssueDetails','resizable=yes,width=580,height=500')" class="txt_linked">
|
1781 |
<a href="javascript:;" onClick="MM_openBrWindow('_wform_issues_details.asp?iss_db=<%=rsCQ("iss_db")%>&iss_id=<%=rsCQ("iss_id")%>','IssueDetails','resizable=yes,width=580,height=500')" class="txt_linked">
|
| 1802 |
<%=rsCQ("iss_num")%>
|
1782 |
<%=rsCQ("iss_num")%>
|
| 1803 |
</a>
|
1783 |
</a>
|
| 1804 |
</td>
|
1784 |
</td>
|
| 1805 |
<td bgcolor=#f5f5f5 class="form_item">
|
1785 |
<td bgcolor=#f5f5f5 class="form_item">
|
| 1806 |
<%If rsCQ("iss_db") = enumCLEARQUEST_DEVI_ID Then%>
|
1786 |
<%If CInt(rsCQ("iss_db")) = enumCLEARQUEST_DEVI_ID Then%>
|
| 1807 |
DEVI
|
1787 |
DEVI
|
| 1808 |
<%Else%>
|
1788 |
<%Else%>
|
| 1809 |
UNKNWOWN
|
1789 |
UNKNOWN
|
| 1810 |
<%End If%>
|
1790 |
<%End If%>
|
| 1811 |
</td>
|
1791 |
</td>
|
| 1812 |
<td bgcolor=#f5f5f5 class="form_item"><%=NewLine_To_BR ( To_HTML ( rsCQ("summary") ) )%></td>
|
1792 |
<td bgcolor=#f5f5f5 class="form_item"><%=NewLine_To_BR ( To_HTML ( rsCQ("summary") ) )%></td>
|
| 1813 |
<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("issue_type")%></td>
|
1793 |
<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("issue_type")%></td>
|
| 1814 |
<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("priority")%></td>
|
1794 |
<td nowrap bgcolor=#f5f5f5 class="form_item"><%=rsCQ("priority")%></td>
|
| Line 1901... |
Line 1881... |
| 1901 |
|
1881 |
|
| 1902 |
<%If IsNull(pkgInfoHash.Item ("is_patch")) Then%>
|
1882 |
<%If IsNull(pkgInfoHash.Item ("is_patch")) Then%>
|
| 1903 |
<fieldset class="fset"><legend class="body_colb"><img src="images/s_bugs.gif" width="21" height="18" border="0" hspace="4" align="absmiddle">Dependency Issues</legend>
|
1883 |
<fieldset class="fset"><legend class="body_colb"><img src="images/s_bugs.gif" width="21" height="18" border="0" hspace="4" align="absmiddle">Dependency Issues</legend>
|
| 1904 |
<table width="100%" border="0" cellspacing="1" cellpadding="2">
|
1884 |
<table width="100%" border="0" cellspacing="1" cellpadding="2">
|
| 1905 |
|
1885 |
|
| 1906 |
<%Call Get_Package_Issues ( parPv_id, SQLstr, NULL, NULL, NULL )
|
1886 |
<%retVal = Get_Package_Issues ( parPv_id, SQLstr, NULL, NULL, NULL )
|
| 1907 |
If (retVal > 0) Then
|
1887 |
If (retVal > 0) Then
|
| 1908 |
retVal = Get_Dependency_CQ_Issues ( SQLstr, rsCQ, depIssDict, issArr )
|
1888 |
retVal = Get_Dependency_CQ_Issues ( SQLstr, rsCQ, depIssDict, issArr )
|
| 1909 |
If retVal = 0 Then%>
|
1889 |
If retVal = 0 Then%>
|
| 1910 |
<%
|
1890 |
<%
|
| 1911 |
currG1 = 0
|
1891 |
currG1 = 0
|
| Line 1960... |
Line 1940... |
| 1960 |
<img src="images/spacer.gif" width="7" height="7" vspace="2">
|
1940 |
<img src="images/spacer.gif" width="7" height="7" vspace="2">
|
| 1961 |
<%End If%>
|
1941 |
<%End If%>
|
| 1962 |
</td>
|
1942 |
</td>
|
| 1963 |
<td bgcolor=#f5f5f5 nowrap class="form_item"><a href="javascript:;" onClick="MM_openBrWindow('_wform_issues_details.asp?iss_db=<%=asDepIss( iss_db_id, enumLoc_iss_db )%>&iss_id=<%=asDepIss( iss_db_id, enumLoc_iss_id )%>','IssueDetails','resizable=yes,width=580,height=520')" class="txt_linked"><%=asDepIss( iss_db_id, enumLoc_iss_num )%></a></td>
|
1943 |
<td bgcolor=#f5f5f5 nowrap class="form_item"><a href="javascript:;" onClick="MM_openBrWindow('_wform_issues_details.asp?iss_db=<%=asDepIss( iss_db_id, enumLoc_iss_db )%>&iss_id=<%=asDepIss( iss_db_id, enumLoc_iss_id )%>','IssueDetails','resizable=yes,width=580,height=520')" class="txt_linked"><%=asDepIss( iss_db_id, enumLoc_iss_num )%></a></td>
|
| 1964 |
<td bgcolor=#f5f5f5 class="form_item">
|
1944 |
<td bgcolor=#f5f5f5 class="form_item">
|
| 1965 |
<%If asDepIss( iss_db_id, enumLoc_iss_db ) = enumCLEARQUEST_DEVI_ID Then%>
|
1945 |
<%If CInt(asDepIss( iss_db_id, enumLoc_iss_db )) = enumCLEARQUEST_DEVI_ID Then%>
|
| 1966 |
DEVI
|
1946 |
DEVI
|
| 1967 |
<%Else%>
|
1947 |
<%Else%>
|
| 1968 |
UNKNOWN
|
1948 |
UNKNOWN
|
| 1969 |
<%End If%></td>
|
1949 |
<%End If%></td>
|
| 1970 |
<td bgcolor=#f5f5f5 class="form_item"><%=asDepIss( iss_db_id, enumLoc_summary)%></td>
|
1950 |
<td bgcolor=#f5f5f5 class="form_item"><%=asDepIss( iss_db_id, enumLoc_summary)%></td>
|