Subversion Repositories DevTools

Rev

Rev 6612 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5945 dpurdie 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
3 
'=====================================================
4 
'   UsedBySDKDetail.asp
5 
'=====================================================
6 
%>
7 
<%
8 
Option explicit
9 
' Good idea to set when using redirect
10 
Response.Expires = 0	' always load the page, dont store
11 
%>
12 
<!--#include file="common/conf.asp"-->
13 
<!--#include file="common/globals.asp"-->
14 
<!--#include file="common/formating.asp"-->
15 
<!--#include file="common/qstr.asp"-->
16 
<!--#include file="common/common_subs.asp"-->
17 
<%
18 
'------------ Variable Definition -------------
19 
Dim rsTemp
20 
Dim parSdkId
21 
Dim parMode
22 
'------------ Constants Declaration -----------
23 
'------------ Variable Init -------------------
24 
parSdkId = Request ("sdk_id")
25 
parMode = Request ("mode")
26 
'----------------------------------------------
27 
%>
28 
<%
29 
'------------------------------------------------------------------------------------------------------------------------
30 
%>
31 
<%
32 
'------------------------ MAIN LINE ---------------------------------
33 
'--------------------------------------------------------------------
34 
%>
35 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
36 
	<tr>
37 
	 <td background="images/bg_form_lightbluedark.gif">
38 
 
39 
						<table width="100%" border="0" cellspacing="1" cellpadding="1">
40 
                          <tr>
41 
						    <td width="33%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">SDK Version</td>
42 
						    <td width="33%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">Version Used</td>
43 
						    <td width="33%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col"></td>
44 
						    <td width="1" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">Last&nbsp;Modified</td>
45 
						  </tr>
46 
                          <%
47 
						  OraDatabase.Parameters.Add "PV_ID",  Request("pv_id"),   ORAPARM_INPUT, ORATYPE_NUMBER
48 
						  OraDatabase.Parameters.Add "SDK_ID", parSdkId, ORAPARM_INPUT, ORATYPE_NUMBER
49 
						  OraDatabase.Parameters.Add "MATCH",  parMode, ORAPARM_INPUT, ORATYPE_NUMBER
50 
 
51 
						  Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedBySDKDetail.sql"), cint(0))
52 
 
53 
						  OraDatabase.Parameters.Remove "MATCH"
54 
						  OraDatabase.Parameters.Remove "PV_ID"
55 
						  OraDatabase.Parameters.Remove "SDK_ID"
56 
						  %>
57 
						  <%If rsTemp.RecordCount < 1 Then%>
58 
						  <tr>
59 
						    <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
60 
                            <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
61 
							<td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
62 
							<td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
63 
                          </tr>
64 
						  <%End If%>
65 
			  			  <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
66 
                          <tr>
67 
                            <td background="images/bg_form_lightgray.gif" nowrap>
68 
                                <a href="sdk_main_page.asp#url=sdk_details.asp&sdktag_id=<%=rsTemp("SDKTAG_ID")%>" class="txt_linked">
69 
                                    <%=SdkIcon(rsTemp("SDK_STATE"))%>&nbsp;
70 
                                    <%=rsTemp("sdktag_name")%></a>
71 
                            </td>
72 
                            <td background="images/bg_form_lightgray.gif" nowrap>
73 
                              <a href="dependencies.asp?pv_id=<%=rsTemp("pv_id")%>" class="txt_linked <%=iif(rsTemp("MATCH") <> 1,"err_alert","")%>">
74 
                                    <%=rsTemp("pkg_name")%>&nbsp;<%=rsTemp("pkg_version")%></a>
75 
                            </td>
76 
                            <td background="images/bg_form_lightgray.gif" nowrap>
77 
                            </td>
78 
                            <td background="images/bg_form_lightgray.gif" nowrap class="form_item">
6612 dpurdie 79 
                                <%=emailField(enum_imgUser & rsTemp("full_name"), rsTemp("user_email"))%>&nbsp;<%=DisplayDate ( rsTemp("modified_stamp") )%>
5945 dpurdie 80 
                            </td>
81 
                          </tr>
82 
                          <%rsTemp.MoveNext
83 
						  WEnd
84 
						  rsTemp.Close
85 
						  Set rsTemp = nothing%>
86 
                        </table>
87 
    </td>
88 
  </tr>
89 
</table>
90 
<%
91 
Call Destroy_All_Objects
92 
%>