Subversion Repositories DevTools

Rev

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

Rev 6615 Rev 6790
Line 32... Line 32...
32 
%>
 32 
%>
33 
<%
 33 
<%
34 
'------------------------ MAIN LINE ---------------------------------
 34 
'------------------------ MAIN LINE ---------------------------------
35 
'--------------------------------------------------------------------
 35 
'--------------------------------------------------------------------
36 
%>
 36 
%>
37 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
 37 
<table width="100%" border="0" cellspacing="1" cellpadding="1" class="stdGrey">
38 
	<tr>
 38 
    <thead>
39 
	 <td background="images/bg_form_lightbluedark.gif">
- 
 
40
39 
      <tr>
41 
						<table width="100%" border="0" cellspacing="1" cellpadding="1">
 40 
        <th width="33%" nowrap>Package and Version</th>
42 
                          <tr>
 41 
        <th width="33%" nowrap>Version Used</th>
43 
						    <td width="33%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">Package and Version</td>
 - 
 
44 
						    <td width="33%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">Version Used</td>
 - 
 
45 
						    <td width="33%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col"></td>
 42 
        <th width="33%" nowrap></th>
46 
						    <td width="1" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">Last&nbsp;Modified</td>
 43 
        <th width="1"   nowrap>Last&nbsp;Modified</th>
47 
						  </tr>
 44 
      </tr>
48 
                          <%
 45 
    </thead>
- 
 
 46 
  <%
49 
						  OraDatabase.Parameters.Add "PV_ID",  Request("pv_id"),   ORAPARM_INPUT, ORATYPE_NUMBER
47 
  OraDatabase.Parameters.Add "PV_ID",  Request("pv_id"),   ORAPARM_INPUT, ORATYPE_NUMBER
50 
						  OraDatabase.Parameters.Add "PKG_ID", pkgId, ORAPARM_INPUT, ORATYPE_NUMBER
48 
  OraDatabase.Parameters.Add "PKG_ID", pkgId, ORAPARM_INPUT, ORATYPE_NUMBER
51 
						  OraDatabase.Parameters.Add "MATCH",  parMode, ORAPARM_INPUT, ORATYPE_NUMBER
49 
  OraDatabase.Parameters.Add "MATCH",  parMode, ORAPARM_INPUT, ORATYPE_NUMBER
52
50
53 
						  Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedByPackageDetail.sql"), cint(0))
 51 
  Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedByPackageDetail.sql"), cint(0))
54
52
55 
						  OraDatabase.Parameters.Remove "MATCH"
 53 
  OraDatabase.Parameters.Remove "MATCH"
56 
						  OraDatabase.Parameters.Remove "PV_ID"
 54 
  OraDatabase.Parameters.Remove "PV_ID"
57 
						  OraDatabase.Parameters.Remove "PKG_ID"
 55 
  OraDatabase.Parameters.Remove "PKG_ID"
58
56
59 
						  %>
 57 
  %>
60 
						  <%If rsTemp.RecordCount < 1 Then%>
 58 
  <%If rsTemp.RecordCount < 1 Then%>
61 
						  <tr>
59 
  <tr>
62 
						    <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
 - 
 
63 
                            <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
 - 
 
64 
							<td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
 - 
 
65 
							<td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
 - 
 
66 
                          </tr>
 60 
    <td nowrap>&nbsp;</td>
67 
						  <%End If%>
 - 
 
68 
			  			  <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
 - 
 
69 
                          <tr>
- 
 
70 
                            <td background="images/bg_form_lightgray.gif" nowrap>
 - 
 
71 
                                <%If rsTemp("dlocked") = "Y" Then%><%=imgPkgLocked%><%Else%><%=imgPkgLockSpacer%><%End If%>
 - 
 
72 
                                <a href="view_by_version.asp?pkg_id=<%=pkgId%>&listby=1" class="txt_linked">
 - 
 
73 
                                    <%=rsTemp("pkg_name")%></a>&nbsp;<a href="dependencies.asp?pv_id=<%=rsTemp("pv_id")%>" class="txt_linked"><%=rsTemp("pkg_version")%></a>
 - 
 
74 
                                </a>
 - 
 
75 
                            </td>
 - 
 
76 
                            <td background="images/bg_form_lightgray.gif" nowrap>
 - 
 
77 
                              <a href="dependencies.asp?pv_id=<%=rsTemp("used_pv_id")%>" class="txt_linked <%=iif(rsTemp("MATCH") <> 1,"err_alert","")%>">
 - 
 
78 
                                    <%=rsTemp("used_version")%>
 - 
 
79 
                            </td>
 - 
 
80 
                            <td background="images/bg_form_lightgray.gif" nowrap>
 - 
 
81 
                            </td>
 61 
    <td nowrap>&nbsp;</td>
82 
                            <td background="images/bg_form_lightgray.gif" nowrap class="form_item">
 - 
 
83 
                                <%=enum_imgUser%><%=emailField(rsTemp("full_name"), rsTemp("user_email"))%>&nbsp;<%=DisplayDate ( rsTemp("modified_stamp") )%>
 - 
 
84 
                            </td>
 62 
    <td nowrap>&nbsp;</td>
85 
                          </tr>
 63 
    <td nowrap>&nbsp;</td>
86 
                          <%rsTemp.MoveNext
 - 
 
87 
						  WEnd
 - 
 
88 
						  rsTemp.Close
 - 
 
89 
						  Set rsTemp = nothing%>
 - 
 
90 
                        </table>
 - 
 
91 
    </td>
- 
 
92 
  </tr>
 64 
  </tr>
- 
 
 65 
  <%End If%>
- 
 
 66 
  <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
- 
 
 67 
  <tr>
- 
 
 68 
    <td nowrap>
- 
 
 69 
        <%If rsTemp("dlocked") = "Y" Then%><%=imgPkgLocked%><%Else%><%=imgPkgLockSpacer%><%End If%>
- 
 
 70 
        <a href="view_by_version.asp?pkg_id=<%=pkgId%>&listby=1" class="txt_linked">
- 
 
 71 
            <%=rsTemp("pkg_name")%></a>&nbsp;<a href="dependencies.asp?pv_id=<%=rsTemp("pv_id")%>" class="txt_linked"><%=rsTemp("pkg_version")%></a>
- 
 
 72 
        </a>
- 
 
 73 
    </td>
- 
 
 74 
    <td nowrap>
- 
 
 75 
      <a href="dependencies.asp?pv_id=<%=rsTemp("used_pv_id")%>" class="txt_linked <%=iif(rsTemp("MATCH") <> 1,"err_alert","")%>">
- 
 
 76 
            <%=rsTemp("used_version")%>
- 
 
 77 
    </td>
- 
 
 78 
    <td nowrap>
- 
 
 79 
    </td>
- 
 
 80 
    <td nowrap>
- 
 
 81 
        <%=enum_imgUser%><%=emailField(rsTemp("full_name"), rsTemp("user_email"))%>&nbsp;<%=DisplayDate ( rsTemp("modified_stamp") )%>
- 
 
 82 
    </td>
- 
 
 83 
  </tr>
- 
 
 84 
  <%rsTemp.MoveNext
- 
 
 85 
  WEnd
- 
 
 86 
  rsTemp.Close
- 
 
 87 
  Set rsTemp = nothing%>
93 
</table>
 88 
</table>
94 
<%
 89 
<%
95 
Call Destroy_All_Objects
 90 
Call Destroy_All_Objects
96 
%>
91 
%>
97 

            92