Subversion Repositories DevTools

Rev

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

Rev 5190 Rev 5357
Line 1... Line 1...
1 
<%@LANGUAGE="VBSCRIPT"%>
 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
 2 
<%
3 
Option explicit
 3 
Option explicit
4 
Response.Expires = 0	' always load the page, dont store
 4 
Response.Expires = 0	' always load the page, dont store
5 
%>
 5 
%>
6 
<%
 6 
<%
7 
'=====================================================
 7 
'=====================================================
8 
'			VERSIONS HISTORY - PATCHES
 8 
'			VERSIONS HISTORY - PATCHES
9 
'=====================================================
 9 
'=====================================================
10 
%>
 10 
%>
11 
<!--#include file="common/conf.asp"-->
 11 
<!--#include file="common/conf.asp"-->
12 
<!--#include file="common/globals.asp"-->
 12 
<!--#include file="common/globals.asp"-->
13 
<!--#include file="common/formating.asp"-->
 13 
<!--#include file="common/formating.asp"-->
14 
<!--#include file="common/qstr.asp"-->
 14 
<!--#include file="common/qstr.asp"-->
15 
<!--#include file="common/common_subs.asp"-->
 15 
<!--#include file="common/common_subs.asp"-->
16 
<!--#include file="_tabs.asp"-->
 16 
<!--#include file="_tabs.asp"-->
17 
<!--#include file="_wform_versions_history_main.asp"-->
 17 
<!--#include file="_wform_versions_history_main.asp"-->
18 
<!--#include file="common/_popup_window_common.asp"-->
 18 
<!--#include file="common/_popup_window_common.asp"-->
19 
<%
 19 
<%
20 
'------------ ACCESS CONTROL ------------------
 20 
'------------ ACCESS CONTROL ------------------
21 
%>
 21 
%>
22 
<!--#include file="_access_control_general.asp"-->
 22 
<!--#include file="_access_control_general.asp"-->
23 
<%
 23 
<%
24 
'------------ Variable Definition -------------
 24 
'------------ Variable Definition -------------
25 
Dim rsSQL
 25 
Dim rsSQL
26 
'------------ Constants Declaration -----------
 26 
'------------ Constants Declaration -----------
27 
'------------ Variable Init -------------------
 27 
'------------ Variable Init -------------------
28 
'----------------------------------------------
 28 
'----------------------------------------------
29 
%>
 29 
%>
30 
<%
 30 
<%
31 
'-----------------------------------------------------------------------------------------------------------------------------------
 31 
'-----------------------------------------------------------------------------------------------------------------------------------
32 
Function DBGet_Patches ( nPv_id )
 32 
Function DBGet_Patches ( nPv_id )
33 
	DBGet_Patches = _
 33 
	DBGet_Patches = _
34 
	"   SELECT pv.pkg_version, pv.dlocked, pv.modified_stamp, usr.full_name,"&_
 34 
	"   SELECT pv.pkg_version, pv.dlocked, pv.modified_stamp, usr.full_name,"&_
35 
	"	       usr.user_email, pv.pv_id, pv.comments"&_
 35 
	"	       usr.user_email, pv.pv_id, pv.comments"&_
36 
	"	  FROM PACKAGE_PATCHES pp, PACKAGE_VERSIONS pv, USERS usr"&_
 36 
	"	  FROM PACKAGE_PATCHES pp, PACKAGE_VERSIONS pv, USERS usr"&_
37 
	"	 WHERE pp.patch_id = pv.pv_id"&_
 37 
	"	 WHERE pp.patch_id = pv.pv_id"&_
38 
	"	   AND pv.modifier_id = usr.user_id"&_
 38 
	"	   AND pv.modifier_id = usr.user_id"&_
39 
	"	   AND pp.pv_id = "& nPv_id &_
 39 
	"	   AND pp.pv_id = "& nPv_id &_
40 
	"	ORDER BY pv.modified_stamp"
 40 
	"	ORDER BY pv.modified_stamp"
41 
End Function
 41 
End Function
42 
'-----------------------------------------------------------------------------------------------------------------------------------
 42 
'-----------------------------------------------------------------------------------------------------------------------------------
43 
%>
 43 
%>
44 
<!--#include file="_menu_def.asp"-->
 44 
<!--#include file="_menu_def.asp"-->
45 
<html>
 45 
<html>
46 
<head>
 46 
<head>
47 
<title>Release Manager</title>
 47 
<title>Release Manager</title>
48 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
 48 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
49 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 49 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
50 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
 50 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
51 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
 51 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
52 
<script language="JavaScript" src="images/common.js"></script>
 52 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
53 
<!--#include file="_jquery_includes.asp"-->
 53 
<script language="JavaScript" src="images/common.js"></script>
54 
<script language="JavaScript" type="text/JavaScript">
 54 
<!--#include file="_jquery_includes.asp"-->
55 
<!--
 55 
<script language="JavaScript" type="text/JavaScript">
56 
function setLayerHeight () {
 56 
<!--
57 
	var h = screen.height;
 57 
function setLayerHeight () {
58 
	MM_findObj("LayerDetails").style.height = (h-300)/2 +"px";
 58 
	var h = screen.height;
59 
	MM_findObj("LayerVersions").style.height = (h-300)/2 +"px";
 59 
	MM_findObj("LayerDetails").style.height = (h-300)/2 +"px";
60 
}
60 
	MM_findObj("LayerVersions").style.height = (h-300)/2 +"px";
61 
//-->
 61 
}
62 
</script>
 62 
//-->
63 
</head>
 63 
</script>
64 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();setLayerHeight();">
 64 
</head>
65 
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
 65 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();setLayerHeight();">
66 
  <tr>
66 
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
67 
    <td width="1%" background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
 67 
  <tr>
68 
    <td width="100%" valign="top" background="images/bg_lght_gray.gif">
 68 
    <td width="1%" background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
69 
	  <!--#include file="_version_browser.asp"-->
 69 
    <td width="100%" valign="top" background="images/bg_lght_gray.gif">
70 
    </td>
 70 
	  <!--#include file="_version_browser.asp"-->
71 
  </tr>
 71 
    </td>
72 
  <tr>
72 
  </tr>
73 
    <td background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="300"></td>
 73 
  <tr>
74 
    <td valign="top">
74 
    <td background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="300"></td>
75 
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
 75 
    <td valign="top">
76 
        <tr>
76 
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
77 
          <td align="right" background="images/bg_lght_gray.gif"><br>
77 
        <tr>
78 
            <!-- TABS ------------------------------------------->
 78 
          <td align="right" background="images/bg_lght_gray.gif"><br>
79 
            <%
 79 
            <!-- TABS ------------------------------------------->
80 
			If IsEmpty( Request("pv_id") ) Then
 80 
            <%
81 
				Call Generate_Tab_Menu ( TABarray5D, Empty, "blue" )
 81 
			If IsEmpty( Request("pv_id") ) Then
82 
			Else
 82 
				Call Generate_Tab_Menu ( TABarray5D, Empty, "blue" )
83 
				Call Generate_Tab_Menu ( TABarray5, "Patches", "blue" )
 83 
			Else
84 
			End If
 84 
				Call Generate_Tab_Menu ( TABarray5, "Patches", "blue" )
85 
			%>
 85 
			End If
86 
            <!------------------------------------------------------------->
 86 
			%>
87 
          </td>
 87 
            <!------------------------------------------------------------->
88 
        </tr>
 88 
          </td>
89 
        <tr>
 89 
        </tr>
90 
          <td background="images/lbox_bg_blue.gif">&nbsp;</td>
 90 
        <tr>
91 
        </tr>
 91 
          <td background="images/lbox_bg_blue.gif">&nbsp;</td>
92 
      </table>
 92 
        </tr>
93 
	  <!----------------------------------------------  DETAILS --------------------------------------------------->
 93 
      </table>
94 
	  <%If NOT IsEmpty( Request("pv_id") ) Then%>
 94 
	  <!----------------------------------------------  DETAILS --------------------------------------------------->
95 
      <table width="100%" border="0" cellspacing="0" cellpadding="10">
 95 
	  <%If NOT IsEmpty( Request("pv_id") ) Then%>
96 
        <tr>
 96 
      <table width="100%" border="0" cellspacing="0" cellpadding="10">
97 
          <td>
 97 
        <tr>
98 
		  <div id="LayerDetails" style="height: 350px; overflow: auto;" name="LayerDetails">
98 
          <td>
99 
              <table width="100%" border="0" cellspacing="1" cellpadding="2">
 99 
		  <div id="LayerDetails" style="height: 350px; overflow: auto;" name="LayerDetails">
100 
                <tr>
100 
              <table width="100%" border="0" cellspacing="1" cellpadding="2">
101 
				  <td width="1%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field"></td>
 101 
                <tr>
102 
				  <td width="1%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Patch Version&nbsp;&nbsp;</td>
 102 
				  <td width="1%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field"></td>
103 
                  <td width="100%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Reason for this version&nbsp;&nbsp;</td>
 103 
				  <td width="1%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Patch Version&nbsp;&nbsp;</td>
104 
                  <td width="1%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Release Date</td>
 104 
                  <td width="100%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Reason for this version&nbsp;&nbsp;</td>
105 
                </tr>
 105 
                  <td width="1%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Release Date</td>
106 
				<%Set rsSQL = OraDatabase.DbCreateDynaset( DBGet_Patches ( parPv_id ), cint(0))%>
 106 
                </tr>
107 
				<%If rsSQL.RecordCount < 1 Then%>
 107 
				<%Set rsSQL = OraDatabase.DbCreateDynaset( DBGet_Patches ( parPv_id ), cint(0))%>
108 
				<tr>
108 
				<%If rsSQL.RecordCount < 1 Then%>
109 
				  <td background="images/bg_form_lightgray.gif">&nbsp;</td>
 109 
				<tr>
110 
				  <td background="images/bg_form_lightgray.gif">&nbsp;</td>
 110 
				  <td background="images/bg_form_lightgray.gif">&nbsp;</td>
111 
                  <td nowrap background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 111 
				  <td background="images/bg_form_lightgray.gif">&nbsp;</td>
112 
                  <td nowrap background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 112 
                  <td nowrap background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
113 
                </tr>
 113 
                  <td nowrap background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
114 
				<%End If%>
 114 
                </tr>
115 
				<%While (NOT rsSQL.BOF) AND (NOT rsSQL.EOF)%>
 115 
				<%End If%>
116 
				<%
 116 
				<%While (NOT rsSQL.BOF) AND (NOT rsSQL.EOF)%>
117 
				anchorName = "ANC_"& rsSQL("pv_id")
 117 
				<%
118 
				' Because this is a patch link, make sure it is transfered to release notes tab
 118 
				anchorName = "ANC_"& rsSQL("pv_id")
119 
				URLstring = "_wform_versions_history_release_notes.asp?"& Persists_Query_String( "pv_id="& rsSQL("pv_id") &"&filter_reset=true" ) &"#"& anchorName
 119 
				' Because this is a patch link, make sure it is transfered to release notes tab
120 
				%>
 120 
				URLstring = "_wform_versions_history_release_notes.asp?"& Persists_Query_String( "pv_id="& rsSQL("pv_id") &"&filter_reset=true" ) &"#"& anchorName
121 
                <tr>
121 
				%>
122 
				  <td background="images/bg_form_lightgray.gif"><%If rsSQL("dlocked") = "Y" Then%><%=IMG_OFFICIAL%><%Else%><%=IMG_NOT_OFFICIAL%><%End If%></td>
 122 
                <tr>
123 
                  <td nowrap background="images/bg_form_lightgray.gif" class="form_item"><a href="<%=URLstring%>" class="txt_linked"><%=rsSQL("pkg_version")%></a></td>
 123 
				  <td background="images/bg_form_lightgray.gif"><%If rsSQL("dlocked") = "Y" Then%><%=IMG_OFFICIAL%><%Else%><%=IMG_NOT_OFFICIAL%><%End If%></td>
124 
				  <td background="images/bg_form_lightgray.gif" class="form_item" valign="top"><%=NewLine_To_BR ( To_HTML( rsSQL("comments") ) )%></td>
 124 
                  <td nowrap background="images/bg_form_lightgray.gif" class="form_item"><a href="<%=URLstring%>" class="txt_linked"><%=rsSQL("pkg_version")%></a></td>
125 
                  <td nowrap background="images/bg_form_lightgray.gif" class="form_item" valign="top"><%If rsSQL("dlocked") = "Y" Then%><%=EuroDate ( rsSQL("modified_stamp") )%> by <a href="mailto:<%=rsSQL("user_email")%>" class="txt_linked"><%=rsSQL("full_name")%></a><%End If%></td>
 125 
				  <td background="images/bg_form_lightgray.gif" class="form_item" valign="top"><%=NewLine_To_BR ( To_HTML( rsSQL("comments") ) )%></td>
126 
                </tr>
 126 
                  <td nowrap background="images/bg_form_lightgray.gif" class="form_item" valign="top"><%If rsSQL("dlocked") = "Y" Then%><%=EuroDate ( rsSQL("modified_stamp") )%> by <a href="mailto:<%=rsSQL("user_email")%>" class="txt_linked"><%=rsSQL("full_name")%></a><%End If%></td>
127 
				<%rsSQL.MoveNext
 127 
                </tr>
128 
				  WEnd%>
 128 
				<%rsSQL.MoveNext
129 
              </table>
 129 
				  WEnd%>
130 
            </div>
 130 
              </table>
131 
		  </td>
 131 
            </div>
132 
        </tr>
 132 
		  </td>
133 
      </table>
 133 
        </tr>
134 
	  <%End If%>
 134 
      </table>
135 
	  <!----------------------------------------------  END DETAILS --------------------------------------------------->
 135 
	  <%End If%>
136 
	  </td>
 136 
	  <!----------------------------------------------  END DETAILS --------------------------------------------------->
137 
  </tr>
 137 
	  </td>
138 
  <tr>
138 
  </tr>
139 
    <td background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
 139 
  <tr>
140 
    <td background="images/lbox_bg_blue.gif"><img src="images/h_trsp_dot.gif" width="1" height="10"></td>
 140 
    <td background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
141 
  </tr>
 141 
    <td background="images/lbox_bg_blue.gif"><img src="images/h_trsp_dot.gif" width="1" height="10"></td>
142 
</table>
 142 
  </tr>
143 
</body>
 143 
</table>
144 
</html>
 144 
</body>
145 
 
 145 
</html>
146 
<!-- DESTRUCTOR ------->
 146 
 
- 
 
 147 
<!-- DESTRUCTOR ------->
147 
<!--#include file="common/destructor.asp"-->
 148 
<!--#include file="common/destructor.asp"-->
148 

            149