Subversion Repositories DevTools

Rev

Rev 6610 | Rev 6615 | 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 
<!--#include file="common/_rtree_common.asp"-->
18 
<%
19 
'------------ Variable Definition -------------
20 
Dim rsTemp
21 
Dim parSdkId
22 
Dim parMode
23 
'------------ Constants Declaration -----------
24 
'------------ Variable Init -------------------
25 
parSdkId = Request ("sdk_id")
26 
parMode = Request ("mode")
27 
'----------------------------------------------
28 
%>
29 
<%
30 
'------------------------------------------------------------------------------------------------------------------------
31 
%>
32 
<%
33 
'------------------------ MAIN LINE ---------------------------------
34 
'--------------------------------------------------------------------
35 
%>
36 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
37 
	<tr>
38 
	 <td background="images/bg_form_lightbluedark.gif">
39 
 
40 
						<table width="100%" border="0" cellspacing="1" cellpadding="1">
41 
                          <tr>
42 
						    <td width="33%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">SDK Version</td>
43 
						    <td width="33%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">Version Used</td>
44 
						    <td width="33%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col"></td>
45 
						    <td width="1" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">Last&nbsp;Modified</td>
46 
						  </tr>
47 
                          <%
48 
						  OraDatabase.Parameters.Add "PV_ID",  Request("pv_id"),   ORAPARM_INPUT, ORATYPE_NUMBER
49 
						  OraDatabase.Parameters.Add "SDK_ID", parSdkId, ORAPARM_INPUT, ORATYPE_NUMBER
50 
						  OraDatabase.Parameters.Add "MATCH",  parMode, ORAPARM_INPUT, ORATYPE_NUMBER
51 
 
52 
						  Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedBySDKDetail.sql"), cint(0))
53 
 
54 
						  OraDatabase.Parameters.Remove "MATCH"
55 
						  OraDatabase.Parameters.Remove "PV_ID"
56 
						  OraDatabase.Parameters.Remove "SDK_ID"
57 
						  %>
58 
						  <%If rsTemp.RecordCount < 1 Then%>
59 
						  <tr>
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 
							<td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
64 
                          </tr>
65 
						  <%End If%>
66 
			  			  <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
67 
                          <tr>
68 
                            <td background="images/bg_form_lightgray.gif" nowrap>
69 
                                <a href="sdk_main_page.asp#url=sdk_details.asp&sdktag_id=<%=rsTemp("SDKTAG_ID")%>" class="txt_linked">
70 
                                    <%=SdkIcon(rsTemp("SDK_STATE"))%>&nbsp;
71 
                                    <%=rsTemp("sdktag_name")%></a>
72 
                            </td>
73 
                            <td background="images/bg_form_lightgray.gif" nowrap>
74 
                              <a href="dependencies.asp?pv_id=<%=rsTemp("pv_id")%>" class="txt_linked <%=iif(rsTemp("MATCH") <> 1,"err_alert","")%>">
75 
                                    <%=rsTemp("pkg_name")%>&nbsp;<%=rsTemp("pkg_version")%></a>
76 
                            </td>
77 
                            <td background="images/bg_form_lightgray.gif" nowrap>
78 
                            </td>
79 
                            <td background="images/bg_form_lightgray.gif" nowrap class="form_item">
6612 dpurdie 80 
                                <%=emailField(enum_imgUser & rsTemp("full_name"), rsTemp("user_email"))%>&nbsp;<%=DisplayDate ( rsTemp("modified_stamp") )%>
5945 dpurdie 81 
                            </td>
82 
                          </tr>
83 
                          <%rsTemp.MoveNext
84 
						  WEnd
85 
						  rsTemp.Close
86 
						  Set rsTemp = nothing%>
87 
                        </table>
88 
    </td>
89 
  </tr>
90 
</table>
91 
<%
92 
Call Destroy_All_Objects
93 
%>