Subversion Repositories DevTools

Rev

Rev 3889 | Rev 3892 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3889 Rev 3891
Line 66... Line 66...
66
   End If
66
   End If
67
 
67
 
68
   rsTemp.Close
68
   rsTemp.Close
69
   Set rsTemp = nothing
69
   Set rsTemp = nothing
70
End Sub
70
End Sub
-
 
71
 
71
'-----------------------------------------------------------------------------------------------------------------------------
72
'-----------------------------------------------------------------------------------------------------------------------------
72
Function Get_Latest_All_Ext ( NNpkg_id, nPv_id )
73
Function Get_Latest_All_Ext ( NNpkg_id, nPv_id )
73
	Get_Latest_All_Ext = _
74
	Get_Latest_All_Ext = _
74
	" SELECT pv.pkg_version, pv.dlocked,"&_
75
	" SELECT pv.pkg_version, pv.dlocked,"&_
75
	"        DECODE ( pv.pv_id, "& nPv_id &", 'selected', NULL ) AS selected"&_
76
	"        DECODE ( pv.pv_id, "& nPv_id &", 'selected', NULL ) AS selected"&_
Line 195... Line 196...
195
    bDisableAuto = bIsCots and not HasPatchBuildNumber(objPkgInfo.Item("pkg_version"))
196
    bDisableAuto = bIsCots and not HasPatchBuildNumber(objPkgInfo.Item("pkg_version"))
196
    'Enable only the "Patch Change" option if the package is a COTS package and the version has a patch-build number.
197
    'Enable only the "Patch Change" option if the package is a COTS package and the version has a patch-build number.
197
    bPatchOnly = bIsCots and not HasWellFormedVersion(objPkgInfo.Item("pkg_version")) and HasPatchBuildNumber(objPkgInfo.Item("pkg_version"))
198
    bPatchOnly = bIsCots and not HasWellFormedVersion(objPkgInfo.Item("pkg_version")) and HasPatchBuildNumber(objPkgInfo.Item("pkg_version"))
198
 
199
 
199
    'if "Auto" build option is disabled then select the Manual option
200
    'if "Auto" build option is disabled then select the Manual option
200
    If bDisableAuto Then
201
    bIsAuto = NOT bDisableAuto
201
       bIsAuto = FALSE
-
 
202
    'else default to Auto
-
 
203
    Else
202
 
204
       bIsAuto = TRUE
-
 
205
    End If
-
 
206
Else
203
Else
207
    ' If New Package and First version
204
    ' If New Package and First version
208
    parPage_title = "NEW PACKAGE and FIRST VERSION"
205
    parPage_title = "NEW PACKAGE and FIRST VERSION"
209
    bIsCots = FALSE
206
    bIsCots = FALSE
210
    bDisableAuto = FALSE
207
    bDisableAuto = FALSE
Line 222... Line 219...
222
<!--
219
<!--
223
var savedVersion;
220
var savedVersion;
224
 
221
 
225
window.onload = function(e)
222
window.onload = function(e)
226
{
223
{
-
 
224
   savedVersion = "<%=verNumber%>";
227
   document.getElementById('FRvnumber').value = "<%=verNumber%>";
225
   document.getElementById('FRvnumber').value = savedVersion;
228
 
226
 
229
   var isAutobuild = document.NEWversion.build_type[0].checked;
227
   var isAutobuild = document.NEWversion.build_type[0].checked;
230
   if (!isAutobuild)
228
   if (!isAutobuild)
231
   {
229
   {
232
      changeToManualVersionNumberAssignment();
230
      changeToManualVersionNumberAssignment();
Line 403... Line 401...
403
                                           </select>
401
                                           </select>
404
                                        </td>
402
                                        </td>
405
                                     </tr>
403
                                     </tr>
406
 
404
 
407
                                 <!--Personal View -------------->
405
                                 <!--Personal View -------------->
-
 
406
                                   <%If QStrPar("Pview") <> "disable" Then%>
408
                                    <tr>
407
                                    <tr>
409
                                        <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">To Personal View</td>
408
                                        <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">To Personal View</td>
410
                                       <td colspan="2" width="1%" nowrap background="images/bg_form_lightgray.gif">
409
                                       <td colspan="2" width="1%" nowrap background="images/bg_form_lightgray.gif">
411
                                          <select name="personal_view_id" class="form_item">
410
                                          <select name="personal_view_id" class="form_item">
412
                                             <option value="">None</option>
411
                                             <option value="">None</option>
413
                                             <%Call Get_All_Personal_Views(objAccessControl.UserId )%>
412
                                             <%Call Get_All_Personal_Views(objAccessControl.UserId )%>
414
                                          </select>
413
                                          </select>
415
                                       </td>
414
                                       </td>
416
                                    </tr>
415
                                    </tr>
-
 
416
                                    <%End If%>
417
 
417
 
418
                                 <!--Dummy Line to highlight New Package Data -------------->
418
                                 <!--Dummy Line to highlight New Package Data -------------->
419
                                    <tr>
419
                                    <tr>
420
                                        <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field"></td>
420
                                        <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field"></td>
421
                                        <td background="images/bg_form_lightbluedark.gif" class="form_field"></td>
421
                                        <td background="images/bg_form_lightbluedark.gif" class="form_field"></td>