Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
119 ghuddy 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'|                                                   |
5
'|		           Documentation		             |
6
'|                                                   |
7
'=====================================================
8
%>
9
<%
10
Option explicit
11
' Good idea to set when using redirect
12
Response.Expires = 0	' always load the page, dont store
13
%>
14
<!--#include file="common/conf.asp"-->
15
<!--#include file="common/globals.asp"-->
16
<!--#include file="common/formating.asp"-->
17
<!--#include file="common/qstr.asp"-->
18
<!--#include file="common/common_subs.asp"-->
19
<!--#include file="common/common_dbedit.asp"-->
20
<!--#include file="_tabs.asp"-->
21
<!--#include file="_action_buttons.asp"-->
22
<!--#include file="common/_package_common.asp"-->
23
<%
24
'------------ ACCESS CONTROL ------------------
25
%>
26
<!--#include file="_access_control_general.asp"-->
27
<%
28
'------------ Variable Definition -------------
29
Dim rsTemp
30
Dim	rsQry
31
Dim retVal
32
'------------ Constants Declaration -----------
33
'------------ Variable Init -------------------
34
'----------------------------------------------
35
%>
36
<html>
37
<title><%=Title(Request("rtag_id"))%></title>
38
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
39
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
40
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
41
<link rel="stylesheet" href="images/navigation.css" type="text/css">
42
<script language="JavaScript" src="images/common.js"></script>
43
<script language="JavaScript" src="scripts/remote_scripting.js"></script>
5085 dpurdie 44
<!--#include file="_jquery_includes.asp"-->
119 ghuddy 45
 
46
<!-- DROPDOWN MENUS -->
47
<!--#include file="_menu_def.asp"-->
48
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
49
</head>
50
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
51
<!-- MENU LAYERS -------------------------------------->
52
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)"> 
53
  <!----------------------------------------------------->
54
</div>
55
<!-- HEADER -->
56
<!--#include file="_header.asp"-->
57
<!-- BODY ---->
58
<table width="100%" border="0" cellspacing="0" cellpadding="0">
59
	<tr> 
60
		<td valign="top" width="1" background="images/bg_bage.gif">
61
		<!-- LEFT -->
62
		<!--#include file="_environment.asp"-->
63
		</td>
64
		<td width="1" bgcolor="#999999"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
65
		<td valign="top" width="100%">
66
		<!-- MIDDLE -->
67
		<table width="100%" border="0" cellspacing="0" cellpadding="0">
68
		  <tr>
69
		    <td width="1%" background="images/bg_action_norm.gif"><IMG height=35 src="images/spacer.gif" width=15></td>
185 brianf 70
		    <td width="100%" background="images/bg_action_norm.gif"><%Call RenderActionBar(parRtag_id,parPv_id)%></td>
119 ghuddy 71
		    <td width="1%" background="images/bg_action_norm.gif"><IMG height=1 src="images/spacer.gif" width=15></td>
72
		  </tr>
183 brianf 73
          <tr>
74
            <td background="images/bg_lght_gray.gif"><IMG height="45" src="images/spacer.gif" width=1></td>
187 brianf 75
            <td background="images/bg_lght_gray.gif"><%Call RenderStatus(parRtag_id,parPv_id)%></td>
183 brianf 76
            <td background="images/bg_lght_gray.gif">&nbsp;</td>
77
          </tr>
119 ghuddy 78
		  <tr>
79
		    <td background="images/bg_lght_gray.gif">&nbsp;</td>
80
		    <td valign="bottom" background="images/bg_lght_gray.gif">
81
		      <table width="100" border="0" cellspacing="0" cellpadding="0">
82
		        <tr>
4687 dpurdie 83
		          <td><IMG height="1" src="images/spacer.gif" width="0" alt="tab-left-margin" ></td>
119 ghuddy 84
		          <td>
85
				  <!-- TABS ------------------------------------->
86
				  <%Call Generate_Tab_Menu ( TABarray1, "Documentation", "orange" )%>
87
				  </td>
88
		        </tr>
89
		      </table>
90
		    </td>
91
		    <td background="images/bg_lght_gray.gif">&nbsp;</td>
92
		  </tr>
93
		  <tr>
94
		    <td background="images/lbox_bg_orange.gif"><IMG height=35 src="images/spacer.gif" width=1></td>
95
		    <td background="images/lbox_bg_orange.gif">
96
			<!-- TAB ACTION BUTTONS ------------------------------------->
97
			<%Call Action_Buttons ( "Documentation" )%> 
98
			</td>
99
		    <td background="images/lbox_bg_orange.gif">&nbsp;</td>
100
		  </tr>
101
		  <tr>
102
		    <td></td>
103
		    <td valign="top">
104
			<!-- DETAILS ------------------------------------------------->
105
			<br> 					  
106
                        <span class="body_colb">Documentation</span><br>
107
                        <table width="100%" border="0" cellspacing="1" cellpadding="2">
108
                          <tr> 
109
							<td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">&nbsp;Download&nbsp;</td>
110
                            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">Title&nbsp;&nbsp;</td>
111
                            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">Document Number&nbsp;&nbsp;</td>
112
							<td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">Version&nbsp;&nbsp;</td>
113
                            <td background="images/bg_form_lightbluedark.gif" nowrap width="100%" class="form_field">Created&nbsp;&nbsp;</td>
114
                            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"></td>
115
							<td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"></td>
116
                          </tr>
117
                          <%
118
						  Dim sDocTitle, sDoc_version, dDoc_created, sLink
119
						  OraDatabase.Parameters.Add "PV_ID", parPv_id, 	ORAPARM_INPUT, ORATYPE_NUMBER 
120
 
121
						  Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("PackageDocumentation.sql"), cint(0))
122
						  %>
123
                          <%If rsTemp.RecordCount < 1 Then%>
124
                          <tr> 
125
                            <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
126
                            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
127
                            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
128
							<td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
129
							<td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
130
							<td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
131
							<td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
132
                          </tr>
133
                          <%End If%>
134
                          <%Do While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
135
						  	<%
136
							If IsNull(rsTemp("is_latest")) Then
137
								retVal =  Short_Document_Details ( rsTemp("doc_id"), sDocTitle, sDoc_version, dDoc_created  )
138
								sLink = DocRepositiryLinkOld & rsTemp("doc_id")
139
							Else
140
								retVal =  Lookup_Document ( rsTemp("doc_num"), sDocTitle, NULL, NULL, dDoc_created  )
141
								sLink = DocRepositiryLink & rsTemp("doc_num")
142
								sDoc_version = "Latest"
143
							End If
144
 
145
							If retVal <> 0 Then Exit Do
146
							%>
147
                          <tr>
148
							<td align="center" background="images/bg_form_lightgray.gif" class="form_item" valign="top"><a href="<%=sLink%>" target="_blank"><img src="images/i_download_small.gif" width="16" height="16" border="0" title="Download document from repository"></a></td>
149
                            <td nowrap background="images/bg_form_lightgray.gif" valign="top" class="form_item"><a href="<%=sLink%>" class="txt_linked" target="_blank"><%=sDocTitle%></a>&nbsp;&nbsp;</td>
150
                            <td nowrap background="images/bg_form_lightgray.gif" class="form_item" valign="top"><%=rsTemp("doc_num")%></td>
151
							<td nowrap background="images/bg_form_lightgray.gif" class="form_item" valign="top"><%=FormatVersion( sDoc_version )%></td>
152
							<td nowrap background="images/bg_form_lightgray.gif" class="form_item" valign="top"><%=EuroDate ( dDoc_created )%></td>
153
							<td align="center" background="images/bg_form_lightgray.gif" class="form_item" valign="top"><a href="javascript:;" onClick="MM_openBrWindow('_wform_import_docs.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>&version_id=<%=rsTemp("doc_id")%>&doc_num=<%=Server.URLEncode( rsTemp("doc_num") )%>&action=true&edit=true','ImportDocs','resizable=yes,width=600,height=220')" ><img src="images/i_edit.gif" title="Edit" hspace="3" border="0"></a></td>
154
                           	<td align="center" background="images/bg_form_lightgray.gif" class="form_item" valign="top"><a href="_remove_doc.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=rsTemp("pv_id")%>&doc_id=<%=rsTemp("doc_id")%>" onClick="return confirmDelete('this Document entry');"><img src="images/i_delete.gif" title="Remove from list" width="13" height="12" hspace="3" border="0"></a></td>
155
                          </tr>
156
                          <%rsTemp.MoveNext
157
						  Loop
158
						  rsTemp.Close
159
						  Set rsTemp = nothing
160
						  OraDatabase.Parameters.Remove "PV_ID"
161
						  %>
162
                        </table>
163
						<%If retVal <> 0 Then Response.write enumMSSQL_ERROR%>
164
                        <!------------------------------------------------------------>
165
           <br>
166
 
167
			<!-- END DETAILS ------------------------------------------------->
168
			</td>
169
		    <td>&nbsp;</td>
170
		  </tr>
171
		</table>
172
		<!-- END MIDDLE -------->
173
		</td>
174
	</tr>
175
</table>
176
 
177
<!-- FOOTER -->
178
<!--#include file="_footer.asp"-->
179
 
180
</body>
181
</html>			
182
<%
183
Call Destroy_All_Objects
184
%>