Subversion Repositories DevTools

Rev

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

Rev 133 Rev 151
Line 1... Line 1...
1
<%
1
<%
2
'=====================================================
2
'=====================================================
3
'					  NEW VERSION
3
'                 NEW VERSION
4
' 				         PAGE
4
'                      PAGE
5
'=====================================================
5
'=====================================================
6
%>
6
%>
7
<!--#include file="_tabs.asp"-->
7
<!--#include file="_tabs.asp"-->
8
<!--#include file="_drawExtensionSelectBox.asp"-->
8
<!--#include file="_drawExtensionSelectBox.asp"-->
-
 
9
<!--#include file="class/classSortHelper.asp"-->
9
<%
10
<%
10
'------------ Variable Definition -------------
11
'------------ Variable Definition -------------
-
 
12
Dim parAuto
11
Dim parPv_id
13
Dim parPv_id
12
Dim rsLocRel
14
Dim rsLocRel
13
Dim parPage_title
15
Dim parPage_title
14
Dim objPkgInfo
16
Dim objPkgInfo
15
Dim rsTemp2
17
Dim rsTemp2
-
 
18
Dim rsLatest
-
 
19
Dim aVersions
-
 
20
Dim lastRow, i
-
 
21
Dim objSortHelper
16
'------------ Constants Declaration -----------
22
'------------ Constants Declaration -----------
17
'------------ Variable Init -------------------
23
'------------ Variable Init -------------------
18
parPv_id = QStrPar("pv_id")
24
parPv_id = QStrPar("pv_id")
-
 
25
parAuto =  QStrPar("auto")
19
parPage_title = "NEW VERSION"
26
parPage_title = "NEW VERSION"
20
Set objPkgInfo = CreateObject("Scripting.Dictionary")
27
Set objPkgInfo = CreateObject("Scripting.Dictionary")
21
'-----------------------------------------------------------------------------------------------------------------------------
28
'-----------------------------------------------------------------------------------------------------------------------------
22
Function Get_Projects
29
Function Get_Projects
23
	Get_Projects = _
30
   Get_Projects = _
24
	" SELECT * FROM projects ORDER BY proj_name ASC"
31
   " SELECT * FROM projects ORDER BY proj_name ASC"
25
End Function
32
End Function
26
'-----------------------------------------------------------------------------------------------------------------------------
33
'-----------------------------------------------------------------------------------------------------------------------------
27
Sub GetPackageInfo( nPvId, outPkgInfo )
34
Sub GetPackageInfo( nPvId, outPkgInfo )
28
	Dim rsTemp, Query_String
35
   Dim rsTemp, Query_String
29
	If IsEmpty(nPvId) Then Exit Sub
36
   If IsEmpty(nPvId) Then Exit Sub
30
 
37
 
31
	Query_String = _
38
   Query_String = _
32
	" SELECT pv.pv_id, pkg.pkg_id, pkg.pkg_name, pv.pkg_version, pv.v_ext"&_
39
   " SELECT pv.pv_id, pkg.pkg_id, pkg.pkg_name, pv.pkg_version, pv.v_ext"&_
33
	"  FROM packages pkg, package_versions pv"&_
40
   "  FROM packages pkg, package_versions pv"&_
34
	" WHERE pkg.pkg_id = pv.pkg_id  AND pv.pv_id ="& nPvId
41
   " WHERE pkg.pkg_id = pv.pkg_id  AND pv.pv_id ="& nPvId
35
 
42
 
36
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
43
   Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
37
 
44
 
38
	If ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF)) Then
45
   If ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF)) Then
39
		outPkgInfo.Item("pv_id") = rsTemp.Fields("pv_id")
46
      outPkgInfo.Item("pv_id") = rsTemp.Fields("pv_id")
40
		outPkgInfo.Item("pkg_id") = rsTemp.Fields("pkg_id")
47
      outPkgInfo.Item("pkg_id") = rsTemp.Fields("pkg_id")
41
		outPkgInfo.Item("pkg_name") = rsTemp.Fields("pkg_name")
48
      outPkgInfo.Item("pkg_name") = rsTemp.Fields("pkg_name")
42
		outPkgInfo.Item("pkg_version") = rsTemp.Fields("pkg_version")
49
      outPkgInfo.Item("pkg_version") = rsTemp.Fields("pkg_version")
43
		outPkgInfo.Item("v_ext") = rsTemp.Fields("v_ext")
50
      outPkgInfo.Item("v_ext") = rsTemp.Fields("v_ext")
44
	End If
51
   End If
45
 
52
 
46
	rsTemp.Close
53
   rsTemp.Close
47
	Set rsTemp = nothing
54
   Set rsTemp = nothing
48
End Sub
55
End Sub
49
'-----------------------------------------------------------------------------------------------------------------------------
56
'-----------------------------------------------------------------------------------------------------------------------------
-
 
57
Function Get_Latest_All_Ext ( NNpkg_id, nPv_id )
-
 
58
	Get_Latest_All_Ext = _
-
 
59
	" SELECT pv.pkg_version, pv.dlocked,"&_
-
 
60
	"        DECODE ( pv.pv_id, "& nPv_id &", 'selected', NULL ) AS selected"&_
-
 
61
	"    FROM PACKAGES pkg, package_versions pv"&_
-
 
62
	"   WHERE pkg.pkg_id = pv.pkg_id  AND  pkg.pkg_id = "& NNpkg_id
-
 
63
End Function
-
 
64
'-----------------------------------------------------------------------------------------------------------------------------
50
%>
65
%>
51
<%
66
<%
52
'===================== MAIN LINE ============================
67
'===================== MAIN LINE ============================
53
Call GetPackageInfo( parPv_id, objPkgInfo )
68
Call GetPackageInfo( parPv_id, objPkgInfo )
-
 
69
 
-
 
70
If IsNull(parAuto) OR parAuto = "" Then
-
 
71
   parAuto = "1"
-
 
72
End If
54
'============================================================
73
'============================================================
55
%>
74
%>
56
<style TYPE="text/css">
-
 
57
	#spanVersionNumberAuto   { display:none }
-
 
58
	#spanVersionNumberManual { display:block }
-
 
59
</style>
-
 
60
<script language="JavaScript" type="text/JavaScript">
75
<script language="JavaScript" type="text/JavaScript">
61
<!--
76
<!--
62
 
77
 
63
/*
78
/*
64
Summary of Javascript functionality implemented by Haydon Knight for DEVI-044075 and DEVI-043066:
79
Summary of Javascript functionality implemented by Haydon Knight for DEVI-044075 and DEVI-043066:
65
 
80
 
66
The form 'NEWVersion' invokes _new_version.asp when submitted.  The value of the FRnewver input box (which is hidden)  is passed
81
The form 'NEWVersion' invokes _new_version.asp when submitted.  The value of the FRnewver input box (which is hidden)  is passed
67
through to _new_version.asp.  This value is kept identical to the text in the span 'spanFullVersion' and stores the full version number+extension.
82
through to _new_version.asp.  This value stores the full version number+extension.
68
The full version (that displayed and that stored in FRnewver) is updated by updateFullVersion(), which is invoked whenever the user
83
The full version (that displayed and that stored in FRnewver) is updated by updateFullVersion(), which is invoked whenever the user
69
changes the version base-number or version extension via any of:
84
changes the version base-number or version extension via any of:
70
 
85
 
71
1. clicking a radio button to select auto/manual
-
 
72
2. altering the value of the 'inputVersionNumberManual' text entry box
86
1. altering the value of the 'inputVersionNumber' text entry box
73
3. changing the extension via the 'v_ext' select pull-down menu.
87
2. changing the extension via the 'v_ext' select pull-down menu.
74
 
88
 
75
The radio button to select auto/manual is 'build_type', and a value of 'M' = manual and 'A' = auto.  Changing what is selected
89
The radio button to select auto/manual is 'build_type', and a value of 'M' = manual and 'A' = auto.  Changing what is selected
76
invokes changeVisibility(), which toggles which span out of spanVersionNumberAuto and spanVersionNumberManual is
90
invokes changeToAutoVersionNumberAssignment() or changeToManualVersionNumberAssignment(), which re-builds the form on the server
77
selected.  Each of these spans has their own input box for the version base, but spanVersionNumberAuto's input text box
91
with the appropriate query string value to indicate the build type.
78
is disabled.
-
 
79
*/
92
*/
80
 
93
 
81
window.onload = function()
94
window.onload = function()
82
{
95
{
83
    var fullVersion = "<%=objPkgInfo.Item("pkg_version")%>";
96
   var fullVersion = "<%=objPkgInfo.Item("pkg_version")%>";
84
	var versionExt  = "<%=objPkgInfo.Item("v_ext")%>";
97
   var versionExt  = "<%=objPkgInfo.Item("v_ext")%>";
85
 
98
 
-
 
99
   var isAutobuild = document.NEWversion.build_type[0].checked;
-
 
100
   if (!isAutobuild)
-
 
101
   {
-
 
102
      // We only update inputVersionNumber field on page load, for manual builds
86
	if (versionExt.length == 0)
103
      if (versionExt.length == 0)
87
	{
104
      {
88
		// is probably an old package version that was made in the days before we enforced all package versions
105
         // is probably an old package version that was made in the days before we enforced all package versions
89
		// to have an extension.
106
         // to have an extension.
90
		document.all['inputVersionNumberManual'].value = fullVersion;
107
         document.all['inputVersionNumber'].value = fullVersion;
91
	}
108
      }
92
	else
109
      else
93
	{
110
      {
94
		// strip extension
111
         // strip extension
95
		document.all['inputVersionNumberManual'].value = fullVersion.replace( /(.*)\..*/, "$1");
112
         document.all['inputVersionNumber'].value = fullVersion.replace( /(.*)\..*/, "$1");
-
 
113
      }
96
	}
114
   }
-
 
115
 
-
 
116
   // update FRnewver field from inputVersionNumber and v_ext fields
97
	updateFullVersion();
117
   updateFullVersion();
98
}
118
}
99
 
119
 
100
//////////////////////////////////////////////////////////////////
120
//////////////////////////////////////////////////////////////////
101
// Function: updateFullVersion
121
// Function: updateFullVersion
102
//
122
//
Line 109... Line 129...
109
//
129
//
110
// Notes: When the user updates the "version base" text field this function is called
130
// Notes: When the user updates the "version base" text field this function is called
111
//
131
//
112
function updateFullVersion()
132
function updateFullVersion()
113
{
133
{
114
	document.all['spanFullVersion'].innerHTML = getFullVersion();
134
   document.all['FRnewver'].value = getFullVersion();
115
	document.all['FRnewver'].value = document.all['spanFullVersion'].innerHTML;
-
 
116
}
135
}
117
 
136
 
118
 
137
 
119
//////////////////////////////////////////////////////////////////
138
//////////////////////////////////////////////////////////////////
120
// Function: getVersionBase
139
// Function: getVersionBase
Line 127... Line 146...
127
//
146
//
128
// Notes: If auto just returns ("auto")
147
// Notes: If auto just returns ("auto")
129
//
148
//
130
function getVersionBase()
149
function getVersionBase()
131
{
150
{
132
	var isManualBuild = document.NEWversion.build_type[0].checked;
151
   var isAutobuild = document.NEWversion.build_type[0].checked;
133
 
152
 
134
	if( !isManualBuild )
153
   if( isAutobuild )
135
      return "(auto)";
154
      return "(auto)";
136
 
155
 
137
    return document.all['inputVersionNumberManual'].value;
156
   return document.all['inputVersionNumber'].value;
138
}
157
}
139
 
158
 
140
 
159
 
141
//////////////////////////////////////////////////////////////////
160
//////////////////////////////////////////////////////////////////
142
// Function: getFullVersion
161
// Function: getFullVersion
Line 149... Line 168...
149
//
168
//
150
// Notes:
169
// Notes:
151
//
170
//
152
function getFullVersion()
171
function getFullVersion()
153
{
172
{
154
	var versionBase = getVersionBase();
173
   var versionBase = getVersionBase();
155
    var versionExt = document.all['v_ext'].value;
174
   var versionExt = document.all['v_ext'].value;
156
	return versionBase + versionExt;
175
   return versionBase + versionExt;
157
}
176
}
158
 
177
 
159
 
178
 
160
//////////////////////////////////////////////////////////////////
179
//////////////////////////////////////////////////////////////////
161
// Function: changeVisibility
180
// Function: changeToAutoVersionNumberAssignment
162
//
181
//
163
// Purpose: Toggles whether the auto or manual version base input span is displayed
182
// Purpose: Re-loads the form for use in auto version number assignment
164
//
183
//
165
// Arguments: isManualBuild - boolean value indicating whether user has selected 'manual' or not
184
// Arguments: None
166
//
185
//
167
// Returns: none
186
// Returns: none
168
//
187
//
169
// Notes: Called when user clicks the radio button to select auto/manual
-
 
170
//
-
 
171
function changeVisibility(isManualBuild)
188
function changeToAutoVersionNumberAssignment()
172
{
189
{
173
	if( isManualBuild )
-
 
174
	{
-
 
175
		document.all['spanVersionNumberAuto'].style.display = 'none';
-
 
176
		document.all['spanVersionNumberManual'].style.display = 'block';
190
   window.location.href = 'form_new_version.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>&auto=1';
177
    }
191
}
178
    else
-
 
179
    {
-
 
180
		document.all['spanVersionNumberAuto'].style.display = 'block';
-
 
181
		document.all['spanVersionNumberManual'].style.display = 'none';
-
 
182
    }
-
 
183
 
192
 
-
 
193
//////////////////////////////////////////////////////////////////
-
 
194
// Function: changeToManualVersionNumberAssignment
-
 
195
//
-
 
196
// Purpose: Re-loads the form for use in manual version number assignment
-
 
197
//
-
 
198
// Arguments: None
-
 
199
//
184
    updateFullVersion();
200
// Returns: none
-
 
201
//
-
 
202
function changeToManualVersionNumberAssignment()
-
 
203
{
-
 
204
   window.location.href = 'form_new_version.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>&auto=0';
185
}
205
}
186
 
206
 
-
 
207
 
187
// Do not remove these next few lines, otherwise the page does not load properly in Microsoft IE.
208
// Do not remove these next few lines, otherwise the page does not load properly in Microsoft IE.
188
//-->
209
//-->
189
</script>
210
</script>
190
 
211
 
191
<script>
212
<script>
192
 
213
 
193
 
214
 
194
function Dependency()
215
function Dependency()
195
{
216
{
196
parent.window.location.href="dependencies.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>";
217
   parent.window.location.href="dependencies.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>";
197
}
218
}
198
 
219
 
-
 
220
////////////////////////////////////////////////////////////////////////////////////////////////////////
-
 
221
// This function returns true if version is ok, else false
-
 
222
////////////////////////////////////////////////////////////////////////////////////////////////////////
199
function checkVersion()
223
function checkVersion()
200
{
224
{
201
	var fullVersion = document.all['FRnewver'].value
225
   var fullVersion = document.all['FRnewver'].value;
202
 
226
 
203
	var versionBase = fullVersion.replace( /(.*)(\..*)/, "$1");
227
   var versionBase = fullVersion.replace( /(.*)(\..*)/, "$1");
204
	var versionExt =  fullVersion.replace( /(.*)(\..*)/, "$2");
228
   var versionExt =  fullVersion.replace( /(.*)(\..*)/, "$2");
205
 
229
 
206
	var isAutobuild = document.NEWversion.build_type[1].checked;
230
   var isAutobuild = document.NEWversion.build_type[0].checked;
207
 
231
 
208
   document.MM_returnValue = MM_ValidateVersion(null, versionBase, versionExt, isAutobuild, false);
232
   return MM_ValidateVersion(null, versionBase, versionExt, isAutobuild, false);
-
 
233
}
209
 
234
 
-
 
235
////////////////////////////////////////////////////////////////////////////////////////////////////////
-
 
236
// This function returns true if form validation passes, else false
-
 
237
// It is called when a user hits the submit button.
-
 
238
////////////////////////////////////////////////////////////////////////////////////////////////////////
210
	if  (document.MM_returnValue == true)
239
function validateFormNEWversion()
211
	{
240
{
212
		parent.window.location.href="dependencies.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>";
241
   var f = document.getElementById('NEWversion');
213
	}
-
 
214
 
242
 
-
 
243
   if (f == null)
-
 
244
      alert('Failed To Get NEWversion');   // should never happen unless a coding/rendering mistake is made?
-
 
245
   else
-
 
246
   {
-
 
247
      // check the version number is good
-
 
248
      document.MM_returnValue = checkVersion();
215
	return document.MM_returnValue;
249
      if (document.MM_returnValue)
-
 
250
      {
-
 
251
         // check the reason for change is good
-
 
252
         // NOTE: MM_validateForm returns its result through MM_returnValue : true if validation passes, else false
-
 
253
         MM_validateForm('FRreason','Reason for This Version','maxLength:4000');
-
 
254
         if (document.MM_returnValue)
-
 
255
         {
-
 
256
            f.action='_new_version.asp';
-
 
257
            parent.window.location.href='dependencies.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>';
-
 
258
 
-
 
259
            return true; // let the submit happen
-
 
260
         }
-
 
261
      }
-
 
262
   }
-
 
263
   return false; // prevent the submit
216
}
264
}
-
 
265
 
217
</script>
266
</script>
218
 
267
 
219
<table width="650" border="0" cellspacing="0" cellpadding="0">
268
<table width="650" border="0" cellspacing="0" cellpadding="0">
220
  <tr>
269
   <tr>
221
    <td>
270
      <td>
222
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
271
         <table width="100%" border="0" cellspacing="0" cellpadding="0">
223
        <tr>
272
            <tr>
224
          <td width="1%">&nbsp;</td>
273
               <td width="1%">&nbsp;</td>
225
          <td align="right"><img src="images/h_trsp_dot.gif" width="30" height="30"></td>
274
               <td align="right"><img src="images/h_trsp_dot.gif" width="30" height="30"></td>
226
          <td width="1%">&nbsp;</td>
275
               <td width="1%">&nbsp;</td>
227
        </tr>
276
            </tr>
228
        <tr>
277
            <tr>
229
          <td width="1%">&nbsp;</td>
278
               <td width="1%">&nbsp;</td>
230
          <td>
279
               <td>
231
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
280
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
232
              <tr>
281
                     <tr>
233
                <td nowrap class="form_ttl"><%=parPage_title%></td>
282
                        <td nowrap class="form_ttl"><%=parPage_title%></td>
234
                <td align="right" valign="bottom">
283
                        <td align="right" valign="bottom">
235
                  <!-- TABS -->
284
                           <!-- TABS -->
236
				  &nbsp;
285
                           &nbsp;
237
                </td>
286
                        </td>
238
              </tr>
287
                     </tr>
239
            </table>
288
                  </table>
240
          </td>
289
               </td>
241
          <td width="1%">&nbsp;</td>
290
               <td width="1%">&nbsp;</td>
242
        </tr>
291
            </tr>
243
        <tr>
292
            <tr>
244
          <td align="left" valign="top" width="1%" background="images/lbox_bg_blue.gif"><img src="images/lbox_tl_cnr_b.gif" width="13" height="13"></td>
293
               <td align="left" valign="top" width="1%" background="images/lbox_bg_blue.gif"><img src="images/lbox_tl_cnr_b.gif" width="13" height="13"></td>
245
          <td background="images/lbox_bg_blue.gif"><!-- Heading --><img src="images/h_trsp_dot.gif" width="1" height="20"><!-- END Heading --></td>
294
               <td background="images/lbox_bg_blue.gif"><!-- Heading --><img src="images/h_trsp_dot.gif" width="1" height="20"><!-- END Heading --></td>
246
          <td align="right" valign="top" width="1%" background="images/lbox_bg_blue.gif"><img src="images/lbox_tr_cnr_b.gif" width="13" height="13"></td>
295
               <td align="right" valign="top" width="1%" background="images/lbox_bg_blue.gif"><img src="images/lbox_tr_cnr_b.gif" width="13" height="13"></td>
247
        </tr>
296
            </tr>
248
        <tr>
297
            <tr>
249
          <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
298
               <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
250
          <td bgcolor="#FFFFFF" valign="top">
299
               <td bgcolor="#FFFFFF" valign="top">
251
            <!-- Body -->
300
                  <!-- Body -->
252
           <table width="100%" border="0" cellspacing="1" cellpadding="2">
301
                  <table width="100%" border="0" cellspacing="1" cellpadding="2">
253
			<form name="NEWversion" method="post" action="_new_version.asp">
302
                     <form id="NEWversion"  name="NEWversion" method="post">
254
			  <tr>
303
                        <tr>
255
			      <td width="1%"><img src="images/h_trsp_dot.gif" width="1" height="10"></td>
304
                           <td width="1%"><img src="images/h_trsp_dot.gif" width="1" height="10"></td>
256
			      <td width="1%" nowrap class="form_group" valign="bottom"></td>
305
                           <td width="1%" nowrap class="form_group" valign="bottom"></td>
257
			      <td nowrap width="100%" align="right" class="form_step"></td>
306
                           <td nowrap width="100%" align="right" class="form_step"></td>
258
              </tr>
307
                        </tr>
259
              <tr>
308
                        <tr>
260
                <td width="1%">&nbsp;</td>
309
                           <td width="1%">&nbsp;</td>
261
                <td colspan="2" width="1%" nowrap class="form_field">
310
                           <td colspan="2" width="1%" nowrap class="form_field">
262
			        <table width="100%" border="0" cellspacing="1" cellpadding="5">
311
                              <table width="100%" border="0" cellspacing="1" cellpadding="5">
263
			          <tr>
312
                                 <tr>
264
			            <td background="images/bg_form_lightbluedark.gif" nowrap width="1" class="form_field">Package Name</td>
313
                                    <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">Package Name</td>
265
			            <td background="images/bg_form_lightgray.gif" nowrap width="100%" class="form_field"><%=objPkgInfo.Item("pkg_name")%></td>
314
                                    <td background="images/bg_form_lightgray.gif" class="form_field"><%=objPkgInfo.Item("pkg_name")%></td>
266
			          </tr>
315
                                 </tr>
267
			          <tr>
316
                                 <tr>
268
			            <td background="images/bg_form_lightbluedark.gif" nowrap class="form_field">&nbsp;</td>
317
                                    <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">Version Number Assignment</td>
269
                        <td background="images/bg_form_lightgray.gif" class="form_txt">
318
                                    <td background="images/bg_form_lightgray.gif" class="form_txt">
270
							<input name="build_type" id="build_type" type="radio" value="M" checked onclick="changeVisibility(true);"> Manual Build
319
 
271
							<input name="build_type" id="build_type" type="radio" value="A"         onclick="changeVisibility(false);"> Automated Build
320
                                       <%If parAuto = "1" Then%>
272
						</td>
321
                                          <input name="build_type" id="build_type" type="radio" value="A" checked onclick="changeToAutoVersionNumberAssignment();"> Auto
273
		              </tr>
322
                                          <input name="build_type" id="build_type" type="radio" value="M"         onclick="changeToManualVersionNumberAssignment();"> Manual
274
			          <tr>
323
                                       <%Else%>
275
						<td background="images/bg_form_lightbluedark.gif" nowrap class="form_field">Version Number</td>
324
                                          <input name="build_type" id="build_type" type="radio" value="A"         onclick="changeToAutoVersionNumberAssignment();"> Auto
276
			            <td background="images/bg_form_lightgray.gif" class="form_item">
325
                                          <input name="build_type" id="build_type" type="radio" value="M" checked onclick="changeToManualVersionNumberAssignment();"> Manual
277
						  <SPAN id="spanVersionNumberManual" name="spanVersionNumberManual">
326
                                       <%End If%>
278
							<input type="text" id="inputVersionNumberManual" onmouseout="updateFullVersion();" onblur="updateFullVersion();" onclick="updateFullVersion();" onmouseup="updateFullVersion();" onchange="updateFullVersion();" onkeyup="updateFullVersion();" name="inputVersionNumberManual" class="form_item" size="12" ID="Text1">
327
                                    </td>
279
						  </SPAN>
328
                                 </tr>
280
						  <SPAN id="spanVersionNumberAuto" name="spanVersionNumberAuto">
329
                              </table>
281
						    <input type="text" value="(auto)" disabled class="form_item" size="12" ID="Text1" NAME="Text1">
330
 
282
						  </SPAN>
331
                              <table width="100%" border="0" cellspacing="0" cellpadding="5">
283
						</td>
332
                                 <tr>
284
					  </tr>
333
                                    <td background="images/bg_form_lightbluedark.gif"  width="20%" class="form_field">New Version Number</td>
285
					  <tr>
334
                                    <td background="images/bg_form_lightgray.gif" class="form_item">
286
					  	<td background="images/bg_form_lightbluedark.gif" nowrap class="form_field">Version Extension</td>
335
                                       <%If parAuto = "0" Then%>
287
			            <td background="images/bg_form_lightgray.gif" class="form_item">
336
                                          <input type="text" id="inputVersionNumber" name="inputVersionNumber" class="form_item" size="12" onmouseout="updateFullVersion();" onblur="updateFullVersion();" onclick="updateFullVersion();" onmouseup="updateFullVersion();" onchange="updateFullVersion();" onkeyup="updateFullVersion();">
288
						  <DIV id="divVersionExt" name="divVersionExt">
337
                                       <%Else%>
289
						  	<select name="v_ext" id="v_ext" onchange="updateFullVersion();">
338
                                          <input type="text" id="inputVersionNumber" name="inputVersionNumber" class="form_item" size="12" value="(auto)" disabled>
290
						  	<%
339
                                       <%End If%>
291
							Call drawExtensionSelectBox( objPkgInfo.Item("v_ext"), true )
340
                                    </td>
292
							%>
341
                                    <%If parAuto = "0" Then%>
293
							</select>
342
                                       <td background="images/bg_form_lightgray.gif" class="form_item">
294
						  </DIV>
343
                                          <select id="FRpkgver"  name="FRpkgver" class="form_item">
295
 
344
                                             <option value=""></option>
296
						</td>
345
                                             <%
297
			          </tr>
346
                                             Set rsLatest = OraDatabase.DbCreateDynaset( Get_Latest_All_Ext( objPkgInfo.Item("pkg_id"), parPv_id ), cint(0))
298
			          <tr>
347
 
299
						<td background="images/bg_form_lightbluedark.gif" nowrap width="1" class="form_field">Version</td>
348
                                             If rsLatest.RecordCount > 0 Then
300
			            <td background="images/bg_form_lightgray.gif" nowrap width="100%" class="form_field">
349
                                                aVersions = rsLatest.GetRows()
301
			            <SPAN id="spanFullVersion" name="spanFullVersion"></SPAN>
350
                                                lastRow = UBound( aVersions, 2 )
302
			            <input type="hidden" name="FRnewver" id="FRnewver" value="hello">
351
 
303
			            </td>
352
                                                Set objSortHelper = New SortHelper
304
			          </tr>
353
 
305
					  <input type="hidden" name="OLDpv_id" value="<%=parPv_id%>">
354
                                                ' Sort versions
306
					  <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
355
                                                Call objSortHelper.VersionSort( aVersions, 0, lastRow, rsLatest.FieldIndex("pkg_version") )
307
					  <input type="hidden" name="page_title" value="<%=parPage_title%>">
356
 
308
					  <input type="hidden" name="action" value="true">
357
                                                ' Descending order
309
			          <tr>
358
                                                For i = lastRow To 0 Step -1
310
			            <td nowrap><img src="images/h_trsp_dot.gif" width="120" height="1"></td>
359
                                                %>
311
			            <td></td>
360
                                                   <option value="<%=aVersions( rsLatest.FieldIndex("pkg_version"), i )%>" <%=aVersions( rsLatest.FieldIndex("selected"), i )%>>
312
			          </tr>
361
                                                      <%If aVersions( rsLatest.FieldIndex("dlocked"), i ) = "Y" Then%>
313
			        </table>
362
                                                         R&nbsp;
314
				</td>
363
                                                      <%Else%>
315
              </tr>
364
                                                         &nbsp;&nbsp;&nbsp;&nbsp;
316
              <tr>
365
                                                      <%End If%>
317
                <td width="1%">&nbsp;</td>
366
                                                      <%=aVersions( rsLatest.FieldIndex("pkg_version"), i )%>
318
      			<td width="1%" nowrap class="form_field"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
367
                                                   </option>
319
                <td nowrap width="100%" class="body_scol">
368
                                                <%
320
				  <input type="submit" name="btn" value="Submit" class="form_btn" onClick="return checkVersion();">
369
                                                Next
321
                  <input type="reset" name="btn" value="Cancel" class="form_btn" onClick="Dependency();">
370
 
322
				  <SPAN id="ProgressBar" name="ProgressBar" style="visibility:hidden;"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Processing...</SPAN>
371
                                                Set objSortHelper = nothing
323
				  <br><br>
372
 
324
                </td>
373
                                             End If
325
              </tr>
374
                                             %>
326
			</form>
375
                                          </select>&nbsp;Existing Versions (For Reference Only)
327
            </table>
376
                                       </td>
328
            <!-- END Body-->
377
                                    <%End If%>
329
          </td>
378
                                 </tr>
330
          <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
379
                              </table>
331
        </tr>
380
 
332
        <tr>
381
                              <table width="100%" border="0" cellspacing="1" cellpadding="5">
333
          <td width="1%" background="images/lbox_bg_blue.gif" valign="bottom"><img src="images/lbox_bl_cnr_b.gif" width="13" height="13"></td>
382
                                 <tr>
334
          <td background="images/lbox_bg_blue.gif"></td>
383
                                    <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">Version Extension</td>
335
          <td width="1%" background="images/lbox_bg_blue.gif" valign="bottom" align="right"><img src="images/lbox_br_cnr_b.gif" width="13" height="13"></td>
384
                                    <td background="images/bg_form_lightgray.gif" class="form_item">
336
        </tr>
385
                                       <DIV id="divVersionExt" name="divVersionExt">
337
      </table>
386
                                          <select name="v_ext" id="v_ext" onchange="updateFullVersion();">
338
    </td>
387
                                             <%
339
  </tr>
388
                                             Call drawExtensionSelectBox( objPkgInfo.Item("v_ext"), true )
-
 
389
                                             %>
-
 
390
                                          </select>
-
 
391
                                       </DIV>
-
 
392
                                    </td>
-
 
393
                                 </tr>
-
 
394
 
-
 
395
                                 <tr>
-
 
396
                                    <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">Reason For This Version</td>
-
 
397
                                    <td background="images/bg_form_lightgray.gif" nowrap width="100%" class="form_field">
-
 
398
                                       <textarea name="FRreason" class="form_item" style="width: 420px; height: 150px"></textarea>
-
 
399
                                    </td>
-
 
400
                                 </tr>
-
 
401
                              </table>
-
 
402
 
-
 
403
                              <%If parAuto = "1" Then%>
-
 
404
                                 <table width="100%" border="0" cellspacing="0" cellpadding="5">
-
 
405
                                    <tr>
-
 
406
                                       <td background="images/bg_form_lightbluedark.gif" nowrap width="20%" class="form_field">Change Type</td>
-
 
407
                                       <td background="images/bg_form_lightgray.gif" >
-
 
408
                                          <table width="100%" border="0" cellspacing="0" cellpadding="0">
-
 
409
                                             <tr>
-
 
410
                                                <td width="1%">
-
 
411
                                                   <input name="change_type" type="radio" value="M">
-
 
412
                                                </td>
-
 
413
                                                <td nowrap>
-
 
414
                                                   <span class="form_field">Major Change</span>
-
 
415
                                                </td>
-
 
416
                                                <td>&nbsp;</td>
-
 
417
                                                <td>
-
 
418
                                                   <span class="form_txt">A major number change indicates the contract of the package has changed in a non-backwardly compatible manner.</span>
-
 
419
                                                </td>
-
 
420
                                             </tr>
-
 
421
                                             <tr>
-
 
422
                                                <td colspan="4"><hr width="100%" size="1" noshade></td>
-
 
423
                                             </tr>
-
 
424
                                             <tr>
-
 
425
                                                <td width="1%">
-
 
426
                                                   <input name="change_type" type="radio" value="N">
-
 
427
                                                </td>
-
 
428
                                                <td align="center" nowrap>
-
 
429
                                                   <span class="form_field">Minor Change</span>
-
 
430
                                                </td>
-
 
431
                                                <td>&nbsp;</td>
-
 
432
                                                <td>
-
 
433
                                                   <span class="form_txt">A minor number change indicates the contract of the package has changed in a backwardly compatible manner.</span>
-
 
434
                                                </td>
-
 
435
                                             </tr>
-
 
436
                                             <tr>
-
 
437
                                                <td colspan="4"><hr width="100%" size="1" noshade></td>
-
 
438
                                             </tr>
-
 
439
                                             <tr>
-
 
440
                                                <td width="1%">
-
 
441
                                                   <input name="change_type" type="radio" value="P" checked>
-
 
442
                                                </td>
-
 
443
                                                <td nowrap>
-
 
444
                                                   <span class="form_field">Patch Change</span>
-
 
445
                                                </td>
-
 
446
                                                <td>&nbsp;</td>
-
 
447
                                                <td>
-
 
448
                                                   <span class="form_txt">A patch number change indicates the package has changed internally.</span>
-
 
449
                                                </td>
-
 
450
                                             </tr>
-
 
451
                                          </table>
-
 
452
 
-
 
453
                                       </td>
-
 
454
                                    </tr>
-
 
455
                                 </table>
-
 
456
                              <%End If%>
-
 
457
 
-
 
458
                              <table width="100%" border="0" cellspacing="1" cellpadding="0">
-
 
459
                                 <tr>
-
 
460
                                    <td nowrap><img src="images/h_trsp_dot.gif" width="120" height="1"></td>
-
 
461
                                    <td></td>
-
 
462
                                 </tr>
-
 
463
                                 <input type="hidden" name="FRnewver" id="FRnewver" value="hello">
-
 
464
                                 <input type="hidden" name="OLDpv_id" value="<%=parPv_id%>">
-
 
465
                                 <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
-
 
466
                                 <input type="hidden" name="page_title" value="<%=parPage_title%>">
-
 
467
                              </table>
-
 
468
                           </td>
-
 
469
                        </tr>
-
 
470
                        <tr>
-
 
471
                           <td width="1%">&nbsp;</td>
-
 
472
                           <td width="1%" nowrap class="form_field"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
-
 
473
                           <td nowrap width="100%" class="body_scol">
-
 
474
                              <input type="submit" name="btn" value="Submit" class="form_btn" onClick="return validateFormNEWversion();">
-
 
475
                              <input type="reset" name="btn" value="Cancel" class="form_btn" onClick="Dependency();">
-
 
476
                              <SPAN id="ProgressBar" name="ProgressBar" style="visibility:hidden;"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Processing...</SPAN>
-
 
477
                              <br><br>
-
 
478
                           </td>
-
 
479
                        </tr>
-
 
480
                     </form>
-
 
481
                  </table>
-
 
482
                  <!-- END Body-->
-
 
483
               </td>
-
 
484
               <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
-
 
485
            </tr>
-
 
486
            <tr>
-
 
487
               <td width="1%" background="images/lbox_bg_blue.gif" valign="bottom"><img src="images/lbox_bl_cnr_b.gif" width="13" height="13"></td>
-
 
488
               <td background="images/lbox_bg_blue.gif"></td>
-
 
489
               <td width="1%" background="images/lbox_bg_blue.gif" valign="bottom" align="right"><img src="images/lbox_br_cnr_b.gif" width="13" height="13"></td>
-
 
490
            </tr>
-
 
491
         </table>
-
 
492
      </td>
-
 
493
   </tr>
340
</table>
494
</table>