Subversion Repositories DevTools

Rev

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

Rev 6874 Rev 7001
Line 1... Line 1...
1
<%
1
<%
2
'=====================================================
2
'=====================================================
3
'                 NEW VERSION
3
'   _form_new_version_page.asp
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"-->
Line 50... Line 50...
50
Dim parRename
50
Dim parRename
51
Dim rFile
51
Dim rFile
52
Dim disableBuildType
52
Dim disableBuildType
53
Dim bCanRenamePackage
53
Dim bCanRenamePackage
54
Dim parPkgId
54
Dim parPkgId
-
 
55
Dim bNewerVersions
-
 
56
Dim sNewerVersionsOptions
55
 
57
 
56
'------------ Constants Declaration -----------
58
'------------ Constants Declaration -----------
57
 
59
 
58
'-----------------------------------------------------------------------------------------------------------------------------
60
'-----------------------------------------------------------------------------------------------------------------------------
59
Sub GetPackageInfo( nPvId, outPkgInfo )
61
Sub GetPackageInfo( nPvId, outPkgInfo )
60
   Dim rsTemp, Query_String
62
   Dim rsTemp, Query_String
61
   If (IsEmpty(nPvId) OR newPackage > 0) Then Exit Sub
63
   If (IsEmpty(nPvId) OR newPackage> 0) Then Exit Sub
62
 
64
 
63
   Query_String = _
65
   Query_String = _
64
   " SELECT pv.pv_id, pkg.pkg_id, pkg.pkg_name, pv.pkg_version, pv.v_ext, pv.change_type, pv.build_type, pv.is_patch"&_
66
   " SELECT pv.pv_id, pkg.pkg_id, pkg.pkg_name, pv.pkg_version, pv.v_ext, pv.change_type, pv.build_type, pv.is_patch"&_
65
   "  FROM packages pkg, package_versions pv"&_
67
   "  FROM packages pkg, package_versions pv"&_
66
   " WHERE pkg.pkg_id = pv.pkg_id  AND pv.pv_id ="& nPvId
68
   " WHERE pkg.pkg_id = pv.pkg_id  AND pv.pv_id ="& nPvId
Line 173... Line 175...
173
 
175
 
174
'-----------------------------------------------------------------------------------------------------------------------------
176
'-----------------------------------------------------------------------------------------------------------------------------
175
Sub Get_All_Licences ( NNnewlicence_id )
177
Sub Get_All_Licences ( NNnewlicence_id )
176
   Dim rsTemp, Query_String, selected
178
   Dim rsTemp, Query_String, selected
177
 
179
 
178
   Response.write "<option value='-1' >"& "100% Vix Developed" &"</option>"
180
   Response.write "<option value='-1'>"& "100% Vix Developed" &"</option>"
179
 
181
 
180
   Query_String = _
182
   Query_String = _
181
   "   SELECT licence, name"&_
183
   "   SELECT licence, name"&_
182
   "     FROM licences "&_
184
   "     FROM licences "&_
183
   "    ORDER BY name ASC"
185
   "    ORDER BY name ASC"
Line 248... Line 250...
248
 
250
 
249
   rsTemp.Close
251
   rsTemp.Close
250
   Set rsTemp = nothing
252
   Set rsTemp = nothing
251
End Sub
253
End Sub
252
'-----------------------------------------------------------------------------------------------------------------------------
254
'-----------------------------------------------------------------------------------------------------------------------------
-
 
255
Sub Get_Newer_Versions()
-
 
256
   Dim rsTemp, Query_String, el
-
 
257
   bNewerVersions = False
-
 
258
 
-
 
259
   If isNULL(parPv_id) OR parRename Then Exit Sub
-
 
260
 
-
 
261
   Query_String = _
-
 
262
        "SELECT" &_
-
 
263
        "    pv.pv_id," &_
-
 
264
        "    pv.pkg_version," &_
-
 
265
        "    pv.dlocked," &_
-
 
266
        "    TO_CHAR( pv.created_stamp,'DD-Mon-YYYY HH24:MI:SS' ) AS created_stamp" &_
-
 
267
        " FROM" &_
-
 
268
        "    package_versions pv," &_
-
 
269
        "    package_versions pvc" &_
-
 
270
        " WHERE" &_
-
 
271
        "    pv.created_stamp> pvc.created_stamp" &_
-
 
272
        "    AND pv.pkg_id = pvc.pkg_id" &_
-
 
273
        "    AND NVL(pvc.v_ext, 'isNULL') = NVL(pv.v_ext, 'isNULL')" &_
-
 
274
        "    AND pvc.build_type != 'Y'" &_
-
 
275
        "    AND pvc.pv_id = " & parPv_id &_
-
 
276
        " ORDER by pv.created_stamp desc"
-
 
277
 
-
 
278
   Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
-
 
279
   sNewerVersionsOptions = ""
-
 
280
   While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
-
 
281
       bNewerVersions = True
-
 
282
       el = IIF(rsTemp("dlocked") = "Y", "R&nbsp;", "&nbsp;&nbsp;&nbsp;&nbsp;") & rsTemp("pkg_version") & "&nbsp;&nbsp;" & rsTemp("created_stamp")
-
 
283
       sNewerVersionsOptions = sNewerVersionsOptions & "<option>" & el & "</option>"
-
 
284
      rsTemp.MoveNext
-
 
285
   WEnd
-
 
286
 
-
 
287
   rsTemp.Close
-
 
288
   Set rsTemp = nothing
-
 
289
 
-
 
290
End Sub
-
 
291
'-----------------------------------------------------------------------------------------------------------------------------
253
 
292
 
254
%>
293
%>
255
<%
294
<%
256
'===================== MAIN LINE ============================
295
'===================== MAIN LINE ============================
257
Dim bDisableAuto, bPatchOnly, bIsCots, bIsAuto
296
Dim bDisableAuto, bPatchOnly, bIsCots, bIsAuto
Line 327... Line 366...
327
        minorState = "checked"
366
        minorState = "checked"
328
    Else
367
    Else
329
        patchState = "checked"
368
        patchState = "checked"
330
    End If
369
    End If
331
 
370
 
332
ElseIf NOT (newPackage > 0 ) Then
371
ElseIf NOT (newPackage> 0 ) Then
333
    ' Package already exists
372
    ' Package already exists
334
    ' Creating a new Version of an existing Package
373
    ' Creating a new Version of an existing Package
335
    '   Set build_type to Auto - New Versions start in Auto
374
    '   Set build_type to Auto - New Versions start in Auto
336
    Call GetPackageInfo( parPv_id, objPkgInfo )
375
    Call GetPackageInfo( parPv_id, objPkgInfo )
337
    objPkgInfo.Item("build_type") = "A"
376
    objPkgInfo.Item("build_type") = "A"
Line 394... Line 433...
394
   <%If disableBuildType Then%>
433
   <%If disableBuildType Then%>
395
   changeToAutoBuild('D');
434
   changeToAutoBuild('D');
396
   <% End If %>
435
   <% End If %>
397
 
436
 
398
   var isAutobuild = document.NEWversion.version_type[0].checked;
437
   var isAutobuild = document.NEWversion.version_type[0].checked;
399
   if (!isAutobuild)
438
   if (!isAutobuild) {
400
   {
-
 
401
      changeToManualVersionNumberAssignment();
439
      changeToManualVersionNumberAssignment();
402
   }
-
 
403
   else
440
   } else {
404
   {
-
 
405
      changeToAutoVersionNumberAssignment();
441
      changeToAutoVersionNumberAssignment();
406
   }
442
   }
407
   updateCopyButton();
443
   updateCopyButton();
408
   checkPackage();
444
   checkPackage();
409
   checkBaseView();
445
   checkBaseView();
Line 431... Line 467...
431
{
467
{
432
   document.getElementById('change_type1').style.display = 'table-row';
468
   document.getElementById('change_type1').style.display = 'table-row';
433
   //document.getElementById('pkgver').style.display = 'none';
469
   //document.getElementById('pkgver').style.display = 'none';
434
   savedVersion = document.getElementById('FRvnumber').value;
470
   savedVersion = document.getElementById('FRvnumber').value;
435
   document.getElementById('FRvnumber').disabled = true;
471
   document.getElementById('FRvnumber').disabled = true;
436
   <%If NOT newPackage > 0 Then%>
472
   <%If NOT newPackage> 0 Then%>
437
   document.getElementById('FRuseVersion').style.visibility = 'hidden';
473
   document.getElementById('FRuseVersion').style.visibility = 'hidden';
438
   <%End If%>
474
   <%End If%>
439
   document.getElementById('FRvnumber').value = '(auto)';
475
   document.getElementById('FRvnumber').value = '(auto)';
440
   checkVersionNumber();
476
   checkVersionNumber();
441
   resizeFrame();
477
   resizeFrame();
Line 449... Line 485...
449
function changeToManualVersionNumberAssignment()
485
function changeToManualVersionNumberAssignment()
450
{
486
{
451
   document.getElementById('change_type1').style.display = 'none';
487
   document.getElementById('change_type1').style.display = 'none';
452
   //document.getElementById('pkgver').style.display = 'table-row';
488
   //document.getElementById('pkgver').style.display = 'table-row';
453
   document.getElementById('FRvnumber').disabled = false;
489
   document.getElementById('FRvnumber').disabled = false;
454
   <%If NOT newPackage > 0 Then%>
490
   <%If NOT newPackage> 0 Then%>
455
   document.getElementById('FRuseVersion').style.visibility = 'visible';
491
   document.getElementById('FRuseVersion').style.visibility = 'visible';
456
   <%End If%>
492
   <%End If%>
457
   if ( savedVersion.indexOf('(') != 0) {
493
   if ( savedVersion.indexOf('(') != 0) {
458
       document.getElementById('FRvnumber').value = savedVersion;
494
       document.getElementById('FRvnumber').value = savedVersion;
459
   } else {
495
   } else {
Line 526... Line 562...
526
//  Args:     data - New data value
562
//  Args:     data - New data value
527
function updateCopyButton ()
563
function updateCopyButton ()
528
{
564
{
529
    var e = document.getElementById("FRpkgver");
565
    var e = document.getElementById("FRpkgver");
530
    var el = document.getElementById('FRuseVersion');
566
    var el = document.getElementById('FRuseVersion');
531
    if (e && el)
567
    if (e && el) {
532
    {
-
 
533
        var data = e.value;
568
        var data = e.value;
534
        el.disabled = (data.indexOf('(') == 0)
569
        el.disabled = (data.indexOf('(') == 0)
535
    }
570
    }
536
}
571
}
537
 
572
 
Line 542... Line 577...
542
//          Attached to: FRuseVersion
577
//          Attached to: FRuseVersion
543
//
578
//
544
function useVersion()
579
function useVersion()
545
{
580
{
546
    var e = document.getElementById("FRpkgver");
581
    var e = document.getElementById("FRpkgver");
547
    if (e)
582
    if (e) {
548
    {
-
 
549
        var strUser = e.value;
583
        var strUser = e.value;
550
        if ( strUser.indexOf('(') != 0)
584
        if ( strUser.indexOf('(') != 0) {
551
        {
-
 
552
            var patt = /\.[a-z]{1,4}$/i;
585
            var patt = /\.[a-z]{1,4}$/i;
553
            strUser = strUser.replace(patt,'');
586
            strUser = strUser.replace(patt,'');
554
            document.getElementById('FRvnumber').value = strUser;
587
            document.getElementById('FRvnumber').value = strUser;
555
            checkVersionNumber();
588
            checkVersionNumber();
556
        }
589
        }
Line 558... Line 591...
558
}
591
}
559
 
592
 
560
//////////////////////////////////////////////////////////////////
593
//////////////////////////////////////////////////////////////////
561
// Function: checkPackage
594
// Function: checkPackage
562
//
595
//
563
// Purpose: 
596
// Purpose:
-
 
597
// Returns: A promise 
564
//
598
//
565
function checkPackage()
599
function checkPackage()
566
{
600
{
567
    var f = document.getElementById('NEWversion');
601
    var f = document.getElementById('NEWversion');
568
    if ( f.newPackage.value > 0 || f.renamePackage.value > 0 )
602
    if ( f.newPackage.value> 0 || f.renamePackage.value> 0 ) {
569
    {
-
 
570
        reseteMessage();
603
        reseteMessage();
571
        MM_validateForm("--Silent",'FRpkgName','Package Name','RisPackage');
604
        MM_validateForm("--Silent",'FRpkgName','Package Name','RisPackage');
572
        checkPackageHighlight( ! document.MM_returnValue, 'Name well formed', 'Invalid Characters in name');
605
        checkPackageHighlight( ! document.MM_returnValue, 'Name well formed', 'Invalid Characters in name');
573
        if ( ! document.MM_returnValue ) return;
606
        if ( ! document.MM_returnValue ) return;
574
 
607
 
575
        xmlHttp=GetXmlHttpObject(checkPackageDone);
-
 
576
        if (xmlHttp==null)
-
 
577
        {
-
 
578
          alert ("Your browser does not support AJAX!");
-
 
579
          return;
-
 
580
        }
-
 
581
 
-
 
582
        var url = "_json_checkPackage.asp?"
-
 
583
                + "packageName=" + document.getElementById('FRpkgName').value
-
 
584
                + "&Opr=checkName";
-
 
585
 
-
 
586
        MM_showProgressBar();
608
        MM_showProgressBar();
587
        xmlHttp.open("GET",url,false);  // `false` makes the request synchronous
-
 
588
        xmlHttp.send(null);
-
 
589
    }
-
 
590
}
-
 
591
 
-
 
592
function checkPackageDone()
609
        return jQuery.get('_json_checkPackage.asp',{
593
{
-
 
594
    //readyState of 4 or 'complete' represents that data has been returned
610
                       packageName :  document.getElementById('FRpkgName').value,
595
    if (xmlHttp.readyState == 4 || xmlHttp.readyState == 'complete'){
611
                       Opr : 'checkName'
596
 
-
 
597
        //Gather the results from the callback
612
                   }, function(){}, 'json'
598
        var str = xmlHttp.responseText;
613
            ).done(function(data, textStatus, jqXHR){
599
        try {
614
                try {
600
            var myJson = JSON.parse(str);
-
 
601
            var f = document.getElementById('NEWversion');
615
                    var f = document.getElementById('NEWversion');
602
            var pkgId = f.FRpkgId.value;
616
                    var pkgId = f.FRpkgId.value;
603
            if ( !(pkgId && myJson.result == pkgId)) {
617
                    if ( !(pkgId != 0 && data.result == pkgId)) {
604
                checkPackageHighlight(myJson.result != 0, 'Name is unused', 'Package Exists');
618
                        checkPackageHighlight(data.result != 0, 'Name is unused', 'Package Exists');
605
            } else {
619
                    } else {
606
                checkPackageHighlight(0, '', '');
620
                        checkPackageHighlight(0, '', '');
607
            }
621
                    }
608
        }
622
                }
609
        catch(e) {
623
                catch(e) {
610
            checkPackageHighlight( 1, '','Error in AJAX operation');
624
                    checkPackageHighlight( 1, '','Error in AJAX operation');
611
        }
625
                }
-
 
626
            }).fail(function(jqXHR, textStatus, errorThrown){
-
 
627
                checkPackageHighlight( 1, '','Error in AJAX operation');
-
 
628
            }).always(function(){
612
        MM_hideProgressBar();
629
                MM_hideProgressBar();
613
        resizeFrame();
630
                resizeFrame();
-
 
631
            });
614
    }
632
    }
-
 
633
    return jQuery.Deferred().resolve();
615
}
634
}
616
 
-
 
617
function checkPackageHighlight(v, msggood, msgbad)
635
function checkPackageHighlight(v, msggood, msgbad)
618
{
636
{
619
    if (v)
637
    if (v)
620
    {
638
    {
621
        setIdText('cpError',msgbad);
639
        setIdText('cpError',msgbad);
Line 631... Line 649...
631
}
649
}
632
 
650
 
633
function checkBaseView()
651
function checkBaseView()
634
{
652
{
635
    var f = document.getElementById('NEWversion');
653
    var f = document.getElementById('NEWversion');
636
    if ( f.newPackage.value > 0 )
654
    if ( f.newPackage.value> 0 )
637
    {
655
    {
638
        reseteMessage();
656
        reseteMessage();
639
        MM_validateForm("--Silent",'base_view_id','Base View','R');
657
        MM_validateForm("--Silent",'base_view_id','Base View','R');
640
        if ( ! document.MM_returnValue )
658
        if ( ! document.MM_returnValue )
641
        {
659
        {
Line 652... Line 670...
652
}
670
}
653
 
671
 
654
function checkLicence()
672
function checkLicence()
655
{
673
{
656
    var f = document.getElementById('NEWversion');
674
    var f = document.getElementById('NEWversion');
657
    if ( f.newPackage.value > 0 )
675
    if ( f.newPackage.value> 0 )
658
    {
676
    {
659
        reseteMessage();
677
        reseteMessage();
660
        MM_validateForm("--Silent",'licence_id','Licence','R');
678
        MM_validateForm("--Silent",'licence_id','Licence','R');
661
        if ( ! document.MM_returnValue )
679
        if ( ! document.MM_returnValue )
662
        {
680
        {
Line 670... Line 688...
670
            setIdText('liError','');
688
            setIdText('liError','');
671
        }
689
        }
672
    }
690
    }
673
}
691
}
674
 
692
 
-
 
693
// Returns: A promise 
675
function checkVersionNumber()
694
function checkVersionNumber()
676
{
695
{
677
   reseteMessage();
696
   reseteMessage();
-
 
697
 
-
 
698
   // Show/Hide COTS helper message
-
 
699
   var ii = document.all['v_ext'].selectedIndex;
-
 
700
   var isCots =  document.all['v_ext'].options[ii].hasAttribute('iscots');
-
 
701
   Visible('cotsHint', isCots ? 'block': 'none' );
-
 
702
 
678
   if (document.NEWversion.version_type[0].checked)
703
   if (document.NEWversion.version_type[0].checked)
679
   {
704
   {
680
        removeClass(document.getElementById('FRvnumber'), 'form_error' );
705
        removeClass(document.getElementById('FRvnumber'), 'form_error' );
681
        setIdText('vnError','');
706
        setIdText('vnError','');
682
 
707
 
683
        var versionExt = document.all['v_ext'].value;
708
        var versionExt = document.all['v_ext'].value;
684
        document.all['FRnewver'].value = versionExt;
709
        document.all['FRnewver'].value = versionExt;
-
 
710
        return jQuery.Deferred().resolve();
685
   }
711
   }
686
   else
712
   else
687
   {
713
   {
688
        // Get Full version - store into hidden field processing
714
        // Get Full version - store into hidden field processing
689
        var versionExt = document.all['v_ext'].value;
715
        var versionExt = document.all['v_ext'].value;
Line 696... Line 722...
696
        {
722
        {
697
            addClass(document.getElementById('FRvnumber'), 'form_error' );
723
            addClass(document.getElementById('FRvnumber'), 'form_error' );
698
            setIdText('vnError','Invalid form');
724
            setIdText('vnError','Invalid form');
699
            showeMessage(document.MM_error);
725
            showeMessage(document.MM_error);
700
            fieldError = true;
726
            fieldError = true;
701
            return;
727
            return jQuery.Deferred().resolve();
702
        }
728
        }
703
 
729
 
704
        xmlHttp=GetXmlHttpObject(checkVersionExistsDone);
-
 
705
        if (xmlHttp==null)
-
 
706
        {
-
 
707
            alert ("Your browser does not support AJAX!");
-
 
708
            return;
-
 
709
        }
-
 
710
 
-
 
711
        var url = "_json_checkPackage.asp?"
-
 
712
                + "packageName=" + document.getElementById('FRpkgName').value
-
 
713
                + "&Version=" + document.all['FRvnumber'].value + document.all['v_ext'].value
-
 
714
                + "&Opr=checkVer";
-
 
715
 
-
 
716
        MM_showProgressBar();
730
        MM_showProgressBar();
717
        xmlHttp.open("GET",url,false);  // `false` makes the request synchronous
-
 
718
        xmlHttp.send(null);
-
 
719
    }
-
 
720
 
-
 
721
   // Show/Hide COTS helper message
-
 
722
   var ii = document.all['v_ext'].selectedIndex;
731
        return jQuery.get('_json_checkPackage.asp',{
723
   var isCots =  document.all['v_ext'].options[ii].hasAttribute('iscots');
732
                       packageName :  document.getElementById('FRpkgName').value,
724
   Visible('cotsHint', isCots ? 'block': 'none' );
733
                       Opr : 'checkVer',
725
 
-
 
726
}
-
 
727
 
-
 
728
function checkVersionExistsDone()
-
 
729
{
-
 
730
    //readyState of 4 or 'complete' represents that data has been returned
734
                       Version : document.all['FRvnumber'].value + document.all['v_ext'].value
731
    if (xmlHttp.readyState == 4 || xmlHttp.readyState == 'complete'){
-
 
732
 
-
 
733
        //Gather the results from the callback
-
 
734
        var myJson;
-
 
735
        var str = xmlHttp.responseText;
-
 
736
        try {
-
 
737
            myJson = JSON.parse(str);
735
                   }, function(){}, 'json'
738
        }
-
 
739
        catch(e) {
-
 
740
            myJson = {};
-
 
741
            myJson.error = 2;
-
 
742
            myJson.emsgSummary = e.message;
736
            ).done(function(data, textStatus, jqXHR){
743
            myJson.SqlQry = '';
-
 
744
        }
-
 
745
 
737
 
746
        if(myJson.error)
738
                    if(data.error) {
747
        {
-
 
748
            addClass(document.getElementById('FRvnumber'), 'form_error' );
739
                        addClass(document.getElementById('FRvnumber'), 'form_error' );
749
            setIdText('vnError','Error in AJAX operation');
740
                        setIdText('vnError','Error in AJAX operation');
750
            showeMessage(myJson.emsgSummary);
741
                        showeMessage(data.emsgSummary);
751
            fieldError = true;
742
                        fieldError = true;
752
        }
743
 
753
        else if(myJson.result != 0)
744
                    } else if(data.result != 0) {
754
        {
-
 
755
            addClass(document.getElementById('FRvnumber'), 'form_error' );
745
                        addClass(document.getElementById('FRvnumber'), 'form_error' );
756
            setIdText('vnError','Exists');
746
                        setIdText('vnError','Exists');
757
            showeMessage('Version already exists');
747
                        showeMessage('Version already exists');
758
            fieldError = true;
748
                        fieldError = true;
759
        }
749
 
760
        else
750
                    } else {
761
        {
-
 
762
            removeClass(document.getElementById('FRvnumber'), 'form_error' );
751
                        removeClass(document.getElementById('FRvnumber'), 'form_error' );
763
            setIdText('vnError','');
752
                        setIdText('vnError','');
764
        }
753
                    }
-
 
754
            }).fail(function(jqXHR, textStatus, errorThrown){
-
 
755
                checkPackageHighlight( 1, '','Error in AJAX operation');
-
 
756
            }).always(function(){
765
        MM_hideProgressBar();
757
                MM_hideProgressBar();
766
        resizeFrame();
758
                resizeFrame();
-
 
759
            });
767
    }
760
    }
768
}
761
}
769
 
762
 
770
function checkReason()
763
function checkReason()
771
{
764
{
Line 798... Line 791...
798
 
791
 
799
<%If parRename <> "" Then%>
792
<%If parRename <> "" Then%>
800
function updateVersionInfo()
793
function updateVersionInfo()
801
{
794
{
802
   reseteMessage();
795
   reseteMessage();
-
 
796
   var urlArgs = {
-
 
797
       packageName : document.getElementById('FRpkgName').value,
-
 
798
       Version : document.all['FRvnumber'].value + document.all['v_ext'].value,
-
 
799
       buildType : document.all['build_type'].value,
-
 
800
       changeType : document.all['change_type'].value,
-
 
801
       rtagId : document.all['rtag_id'].value,
-
 
802
       pvId : document.all['OLDpv_id'].value,
-
 
803
       vExt : document.all['v_ext'].value,
-
 
804
       Opr : 'updateVer'
-
 
805
   };
-
 
806
 
-
 
807
   var f = document.getElementById('NEWversion');
-
 
808
   if ( f.renamePackage.value> 0 ) {
-
 
809
       urlArgs.Mode = 1;
-
 
810
   }
803
 
811
 
804
    xmlHttp=GetXmlHttpObject(updateVersionInfoDone);
812
   return jQuery.get('_json_updateVersion.asp',urlArgs, function(){}, 'json'
805
    if (xmlHttp==null)
-
 
806
    {
-
 
807
        alert ("Your browser does not support AJAX!");
813
       ).done(function(data, textStatus, jqXHR){
808
        return;
814
           if(data.error) {
809
    }
-
 
810
 
-
 
811
    var url = "_json_updateVersion.asp?"
-
 
812
            + "packageName=" + document.getElementById('FRpkgName').value
-
 
813
            + "&Version=" + document.all['FRvnumber'].value + document.all['v_ext'].value
-
 
814
            + "&buildType=" + document.all['build_type'].value
-
 
815
            + "&changeType=" + document.all['change_type'].value
-
 
816
            + "&rtagId=" + document.all['rtag_id'].value
-
 
817
            + "&pvId=" + document.all['OLDpv_id'].value
-
 
818
            + "&vExt=" + document.all['v_ext'].value
815
               showeMessage(data.emsgDetails);
819
            + "&Opr=updateVer";
816
               fieldError = true;
820
 
817
 
821
    var f = document.getElementById('NEWversion');
818
           } else if(data.result != 0) {
822
    if ( f.renamePackage.value > 0 ) {
819
               showeMessage('Error changing version number');
823
        url += "&Mode=1";
820
               fieldError = true;
824
    }
821
           }
825
 
-
 
826
 
822
 
827
    MM_showProgressBar();
-
 
828
    xmlHttp.open("GET",url,false);          // `false` makes the request synchronous
-
 
829
    xmlHttp.send(null);
-
 
830
}
-
 
831
 
-
 
832
function updateVersionInfoDone()
-
 
833
{
-
 
834
    //readyState of 4 or 'complete' represents that data has been returned
-
 
835
    if (xmlHttp.readyState == 4 || xmlHttp.readyState == 'complete'){
-
 
836
 
-
 
837
        //Gather the results from the callback
-
 
838
        var myJson;
-
 
839
        var str = xmlHttp.responseText;
-
 
840
//alert("Results:" + str);
-
 
841
        try {
-
 
842
            myJson = JSON.parse(str);
-
 
843
        }
-
 
844
        catch(e) {
-
 
845
            myJson = {};
-
 
846
            myJson.error = 2;
-
 
847
            myJson.emsgDetails = e.message;
823
       }).fail(function(jqXHR, textStatus, errorThrown){
848
            myJson.SqlQry = '';
-
 
849
        }
-
 
850
        if(myJson.error)
-
 
851
        {
-
 
852
            showeMessage(myJson.emsgDetails);
-
 
853
            fieldError = true;
-
 
854
        }
-
 
855
        else if(myJson.result != 0)
-
 
856
        {
-
 
857
            showeMessage('Error changing version number');
824
           checkPackageHighlight( 1, '','Error in AJAX operation');
858
            fieldError = true;
825
       }).always(function(){
859
        }
-
 
860
        MM_hideProgressBar();
826
           MM_hideProgressBar();
861
        resizeFrame();
827
           resizeFrame();
862
    }
828
       });
863
}
829
}
864
<%End If%>
830
<%End If%>
865
 
831
 
866
function reseteMessage()
832
function reseteMessage()
867
{
833
{
Line 876... Line 842...
876
    var omsg, elem;
842
    var omsg, elem;
877
    if (checkMode == 1 )
843
    if (checkMode == 1 )
878
    {
844
    {
879
        elem = document.getElementById("eMessage");
845
        elem = document.getElementById("eMessage");
880
        omsg = elem.textContent || elem.innerText;
846
        omsg = elem.textContent || elem.innerText;
881
        if ( (typeof osmg != 'undefined') && omsg.length > 0 )
847
        if ( (typeof osmg != 'undefined') && omsg.length> 0 )
882
            omsg += '\n';
848
            omsg += '\n';
883
    }
849
    }
884
    else
850
    else
885
    {
851
    {
886
        omsg = "";
852
        omsg = "";
Line 898... Line 864...
898
<%If NOT bInIframe Then %>
864
<%If NOT bInIframe Then %>
899
    function Dependency()
865
    function Dependency()
900
    {
866
    {
901
    <%If parRename <> "" Then%>
867
    <%If parRename <> "" Then%>
902
       parent.window.close();
868
       parent.window.close();
903
    <%ElseIf newPackage > 0 Then%>
869
    <%ElseIf newPackage> 0 Then%>
904
       parent.window.location.href="<%=rFile%>?rtag_id=<%=parRtag_id%>";
870
       parent.window.location.href="<%=rFile%>?rtag_id=<%=parRtag_id%>";
905
    <%Else%>
871
    <%Else%>
906
       parent.window.location.href="<%=rFile%>?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>";
872
       parent.window.location.href="<%=rFile%>?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>";
907
    <%End If%>
873
    <%End If%>
908
    }
874
    }
Line 925... Line 891...
925
////////////////////////////////////////////////////////////////////////////////////////////////////////
891
////////////////////////////////////////////////////////////////////////////////////////////////////////
926
// This function returns true if form validation passes, else false
892
// This function returns true if form validation passes, else false
927
// It is called when a user hits the submit button.
893
// It is called when a user hits the submit button.
928
////////////////////////////////////////////////////////////////////////////////////////////////////////
894
////////////////////////////////////////////////////////////////////////////////////////////////////////
929
 
895
 
930
function validateFormNEWversion()
896
function  validateFormNEWversion()
931
{
897
{
932
    var f = document.getElementById('NEWversion');
898
    var f = document.getElementById('NEWversion');
933
 
899
 
934
    if (f == null)
900
    if (f == null)
935
        vixAlert('Internal Error<p>Failed To Get NEWversion');   // should never happen unless a coding/rendering mistake is made?
901
        vixAlert('Internal Error<p>Failed To Get NEWversion');   // should never happen unless a coding/rendering mistake is made?
936
    else
902
    else
937
    {
903
    {
938
        setIdText('eMessage','');
904
        setIdText('eMessage','');
939
        fieldError = false;
905
        fieldError = false;
940
        checkMode = 1;
906
        checkMode = 1;
941
        checkPackage();
907
        checkPackage().always(function(){
942
        checkBaseView();
908
            checkBaseView();
943
        checkLicence();
909
            checkLicence();
944
        checkVersionNumber();
910
            checkVersionNumber().always(function(){
945
        <%If NOT parRename <> "" Then%>
911
                <%If NOT parRename <> "" Then%>
946
        checkReason();
912
                checkReason();
947
        <%End If%>
913
                <%End If%>
948
        if (!fieldError)
-
 
949
        {
-
 
950
            //  Export the change_type field in a sanitised form
-
 
951
            var ct = getCheckedRadio(document.forms.NEWversion.elements.change_type1).value;
-
 
952
            if(!document.NEWversion.version_type[0].checked) ct = 'F';
-
 
953
            document.all['change_type'].value = ct;
-
 
954
 
-
 
955
            MM_showProgressBar();
-
 
956
            <%If parRename <> "" Then%>
-
 
957
                updateVersionInfo();
-
 
958
                if (!fieldError)
914
                if (!fieldError)
959
                {
915
                {
-
 
916
                    //  Export the change_type field in a sanitised form
-
 
917
                    var ct = getCheckedRadio(document.forms.NEWversion.elements.change_type1).value;
-
 
918
                    if(!document.NEWversion.version_type[0].checked) ct = 'F';
-
 
919
                    document.all['change_type'].value = ct;
-
 
920
 
-
 
921
                    MM_showProgressBar();
-
 
922
                    <%If parRename <> "" Then%>
-
 
923
                        updateVersionInfo().always(function(){
-
 
924
                            if (!fieldError)
-
 
925
                            {
960
                    <%If NOT bInIframe Then %>
926
                                <%If NOT bInIframe Then %>
961
                        parent.window.close();
927
                                    parent.window.close();
962
                        window.opener.document.location='<%=rFile%>?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>';
928
                                    window.opener.document.location='<%=rFile%>?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>';
-
 
929
                                <%Else%>
-
 
930
                                    window.parent.location.reload(false);
-
 
931
                                <%End If%>
-
 
932
                                return true;
-
 
933
                            }
-
 
934
                        });
963
                    <%Else%>
935
                    <%Else%>
964
                        window.parent.location.reload(false);
936
                        f.action='_new_version.asp';
-
 
937
                        parent.window.location.href='<%=rFile%>?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>';
-
 
938
                        return true;
965
                    <%End If%>
939
                    <%End If%>
966
                    return true;
-
 
967
                }
940
                }
968
            <%Else%>
941
                // Hide progress bar that is exposed because the previous tests were OK
969
                f.action='_new_version.asp';
942
                MM_hideProgressBar();
970
                parent.window.location.href='<%=rFile%>?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>';
943
                resizeFrame();
971
                return true;
944
                checkMode = 0;
972
            <%End If%>
945
            });
973
        }
946
        });
974
    }
947
    }
975
 
-
 
976
    // Hide progress bar that is exposed because the previous tests were OK
-
 
977
    MM_hideProgressBar();
-
 
978
    resizeFrame();
-
 
979
    checkMode = 0;
-
 
980
    return false;
948
    return false;
981
}
949
}
982
 
950
 
983
</script>
951
</script>
984
<!-- _form_new_version_page.asp -->
952
<!-- _form_new_version_page.asp -->
985
<table width="650px" border="0" cellspacing="0" cellpadding="0">
953
<table width="650px" border="0" cellspacing="0" cellpadding="0">
986
   <tr>
954
   <tr>
987
      <td>
955
      <td>
988
<%If NOT bInIframe Then %>
956
<%If NOT bInIframe Then %>
989
         <table width="100%" border="0" cellspacing="0" cellpadding="0" class='rounded_box rounded_box_std'>
957
         <table width="100%" border="0" cellspacing="0" cellpadding="0" class='rounded_box'>
990
             <caption><%=parPage_title%></caption>
958
             <caption><%=parPage_title%></caption>
991
<%Else%>
959
<%Else%>
992
         <table width="100%" border="0" cellspacing="0" cellpadding="0">
960
         <table width="100%" border="0" cellspacing="0" cellpadding="0">
993
<%End If%>
961
<%End If%>
994
            <tr>
962
            <tr>
995
               <td bgcolor="#FFFFFF" valign="top">
963
               <td valign="top">
996
                  <!-- Body -->
964
                  <!-- Body -->
997
                  <table width="100%" border="0" cellspacing="1" cellpadding="2">
965
                  <div class='Panel <%=IIF(NOT bInIframe,"PanelFrame","tight")%>'>
998
                     <form id="NEWversion"  name="NEWversion" method="post">
966
                     <form id="NEWversion"  name="NEWversion" method="post">
999
                        <tr>
-
 
1000
                           <td colspan="2" width="1%" nowrap class="form_field">
-
 
1001
                              <table width="100%" border="0" cellspacing="1" cellpadding="5">
967
                      <table width="100%" border="0" cellspacing="1" cellpadding="5" class='lhsGrey PanelPad'>
1002
 
968
 
1003
                                 <!-- Package Name -->
969
                         <!-- Package Name -->
-
 
970
                         <tr>
-
 
971
                            <td>Package Name</td>
-
 
972
                           <% if newPackage> 0 OR bCanRenamePackage> 0 Then %>
-
 
973
                                <td>
-
 
974
                                  <input type="text" id="FRpkgName" name="FRpkgName"  size="40" value="<%=parPkgName%>" onBlur="checkPackage()">
-
 
975
                                  <span id="cpError"></span>
-
 
976
                                </td>
-
 
977
                            <% Else %>
-
 
978
                                <td class="form_field"><%=parPkgName%></td>
-
 
979
                            <% End If %>
-
 
980
                         </tr>
-
 
981
 
-
 
982
                         <!--Base View -------------->
-
 
983
                         <% if newPackage> 0 Then %>
-
 
984
                            <tr>
-
 
985
                                <td>To Base View</td>
-
 
986
                                <td width="1%" nowrap>
-
 
987
                                   <select name="base_view_id" id="base_view_id" class="form_item" onBlur="checkBaseView()">
-
 
988
                                      <option></option>
-
 
989
                                      <%Call Get_All_Base_Views(parBase_view_id)%>
-
 
990
                                   </select>
-
 
991
                                   <span id="bvError"></span>
-
 
992
                                </td>
-
 
993
                             </tr>
-
 
994
 
-
 
995
                         <!--Personal View -------------->
-
 
996
                           <%If QStrPar("Pview") <> "disable" Then%>
-
 
997
                            <tr>
-
 
998
                                <td>To Personal View</td>
-
 
999
                               <td width="1%" nowrap background="images/bg_form_lightgray.gif">
-
 
1000
                                  <select name="personal_view_id">
-
 
1001
                                     <option value="">None</option>
-
 
1002
                                     <%Call Get_All_Personal_Views(objAccessControl.UserId )%>
-
 
1003
                                  </select>
-
 
1004
                               </td>
-
 
1005
                            </tr>
-
 
1006
                            <%End If%>
-
 
1007
 
-
 
1008
                            <!-- Software Licence ----------------->
-
 
1009
                            <tr>
-
 
1010
                               <td>Software Licence<%=Quick_Help("Licence")%></td>
-
 
1011
                                <td width="1%" nowrap>
-
 
1012
                                   <select name="licence_id" id="licence_id" class="form_item" onBlur="checkLicence()">
-
 
1013
                                      <option></option>
-
 
1014
                                      <%Call Get_All_Licences(-2)%>
-
 
1015
                                   </select>
-
 
1016
                                   <span id="liError"></span>
-
 
1017
                                </td>
-
 
1018
                            </tr>
-
 
1019
 
-
 
1020
                         <!--Dummy Line to highlight New Package Data -------------->
-
 
1021
                            <tr>
-
 
1022
                                <td></td>
-
 
1023
                                <td class="form_field"></td>
-
 
1024
                            </tr>
-
 
1025
                         <% End If %>
-
 
1026
 
-
 
1027
                         <!-- Build Type Assignment ----------------->
-
 
1028
                         <tr>
-
 
1029
                            <td>Build Type<%=Quick_Help("BuildType")%></td>
-
 
1030
                            <td>
-
 
1031
                                <input name="build_type1" id="build_type_A" type="radio" value="A" checked onclick="changeToAutoBuild('A');"> Auto
-
 
1032
                                <input name="build_type1" id="build_type_M" type="radio" value="M" onclick="changeToAutoBuild('M');"> Manual
-
 
1033
                            </td>
-
 
1034
                         </tr>
-
 
1035
                         <!--Version Number Assignment -------------->
-
 
1036
                         <tr>
-
 
1037
                               <%
-
 
1038
                                    Dim flagAuto, flagMan
-
 
1039
                                    if bDisableAuto Then
-
 
1040
                                        flagAuto = "disabled"
-
 
1041
                                        flagMan = "checked"
-
 
1042
                                    Else
-
 
1043
                                        If bIsAuto Then
-
 
1044
                                            flagAuto = "checked"
-
 
1045
                                            flagMan = ""
-
 
1046
                                        Else
-
 
1047
                                            flagAuto = ""
-
 
1048
                                            flagMan = "checked"
-
 
1049
                                        End if
-
 
1050
                                    End if
-
 
1051
                               %>
-
 
1052
                            <td>Version Number Assignment<%=Quick_Help("ChangeType")%></td>
-
 
1053
                            <td>
-
 
1054
                                <input name="version_type" id="version_type_A" type="radio" value="A" <%=flagAuto%> onclick="changeToAutoVersionNumberAssignment();"> Auto
-
 
1055
                                <input name="version_type" id="version_type_M" type="radio" value="M" <%=flagMan%> onclick="changeToManualVersionNumberAssignment();"> Manual
-
 
1056
                            </td>
-
 
1057
                         </tr>
-
 
1058
 
-
 
1059
                         <!-- New Version Number -->
-
 
1060
                         <tr>
-
 
1061
                            <td>New Version Number</td>
-
 
1062
                            <td nowrap>
-
 
1063
                                <span>
-
 
1064
                                    <input type="text" id="FRvnumber"
-
 
1065
                                            name="FRvnumber"
-
 
1066
                                             size="12" onBlur="checkVersionNumber()">
-
 
1067
                                            <span id="vnError"></span>
-
 
1068
                                   <%If NOT newPackage> 0 Then%>
-
 
1069
                                      <button type="button" style="visibility:hidden" id="FRuseVersion" class="form_item" onclick="useVersion();">&#8656;&nbsp;Copy</button>
-
 
1070
                                      <select id="FRpkgver"  name="FRpkgver" class="form_item"  onchange="updateCopyButton()";>
-
 
1071
                                         <option value=""></option>
-
 
1072
                                         <%
-
 
1073
                                         Set rsLatest = OraDatabase.DbCreateDynaset( Get_Latest_All_Ext( objPkgInfo.Item("pkg_id"), parPv_id ), cint(0))
-
 
1074
 
-
 
1075
                                         If rsLatest.RecordCount> 0 Then
-
 
1076
                                            aVersions = rsLatest.GetRows()
-
 
1077
                                            lastRow = UBound( aVersions, 2 )
-
 
1078
                                            Set objSortHelper = New SortHelper
-
 
1079
 
-
 
1080
                                            ' Sort versions
-
 
1081
                                            Call objSortHelper.VersionSort( aVersions, 0, lastRow, rsLatest.FieldIndex("pkg_version") )
-
 
1082
 
-
 
1083
                                            ' Descending order
-
 
1084
                                            For i = lastRow To 0 Step -1
-
 
1085
                                            %>
-
 
1086
                                               <option value="<%=aVersions( rsLatest.FieldIndex("pkg_version"), i )%>" <%=aVersions( rsLatest.FieldIndex("selected"), i )%>>
-
 
1087
                                                  <%If aVersions( rsLatest.FieldIndex("dlocked"), i ) = "Y" Then%>
-
 
1088
                                                     R&nbsp;
-
 
1089
                                                  <%Else%>
-
 
1090
                                                     &nbsp;&nbsp;&nbsp;&nbsp;
-
 
1091
                                                  <%End If%>
-
 
1092
                                                  <%=aVersions( rsLatest.FieldIndex("pkg_version"), i )%>
-
 
1093
                                               </option>
-
 
1094
                                            <%
-
 
1095
                                            Next
-
 
1096
                                            Set objSortHelper = nothing
-
 
1097
 
-
 
1098
                                         End If
-
 
1099
                                         %>
-
 
1100
                                      </select>&nbsp;Existing Versions<%=Quick_Help("Existing")%>
-
 
1101
                                   <%End If%>
-
 
1102
                                   </span>
-
 
1103
                            </td>
-
 
1104
                         </tr>
-
 
1105
                         <tr>
-
 
1106
                            <td>Version Extension</td>
-
 
1107
                            <td>
-
 
1108
                               <DIV id="divVersionExt" name="divVersionExt">
-
 
1109
                                  <select name="v_ext" id="v_ext" class="form_item" onchange="checkVersionNumber()">
-
 
1110
                                     <%Call drawExtensionSelectBox( objPkgInfo.Item("v_ext"), true )%>
-
 
1111
                                  </select>
-
 
1112
                               </DIV>
-
 
1113
                              <div id=cotsHint style="display:none">
-
 
1114
                                  <p>The version number for a COTS package should be made up of the manufactures version number with a VIX PatchBuild number appended. 
-
 
1115
                                     ie: '1.12-beta.0000'
-
 
1116
                              </div>
-
 
1117
                            </td>
-
 
1118
                         </tr>
-
 
1119
                         <%If NOT parRename <> "" Then%>
-
 
1120
                         <!-- Reason For This Version -->
-
 
1121
                         <tr>
-
 
1122
                            <td>Reason For This Version</td>
-
 
1123
                            <td nowrap width="100%" class="form_field">
-
 
1124
                               <textarea name="FRreason" id="FRreason"  class="form_item" style="width: 420px; height: 150px" onBlur="checkReason()"></textarea>
-
 
1125
                                <span id="frError"></span>
-
 
1126
                            </td>
-
 
1127
                         </tr>
-
 
1128
                        <%End If%>
-
 
1129
                        <tr id="change_type1">
-
 
1130
                           <td nowrap>Change Type</td>
-
 
1131
                           <td>
-
 
1132
                              <table width="100%" border="0" cellspacing="0" cellpadding="0">
1004
                                 <tr>
1133
                                 <tr>
1005
                                    <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">Package Name</td>
1134
                                    <td width="1%">
1006
                                   <% if newPackage > 0 OR bCanRenamePackage > 0 Then %>
1135
                                      <%If bPatchOnly Then majorState = "disabled" %>
1007
                                        <td background="images/bg_form_lightgray.gif" class="form_item">
1136
                                      <input name="change_type1" type="radio" value="M" <%=majorState%>>
-
 
1137
                                    </td>
-
 
1138
                                    <td nowrap>
1008
                                          <input type="text" id="FRpkgName" name="FRpkgName" class="form_item" size="40" value="<%=parPkgName%>" onBlur="checkPackage()">
1139
                                       <span class="form_field">Major Change</span>
1009
                                          <span id="cpError"></span>
1140
                                    </td>
1010
                                        </td>
1141
                                    <td>&nbsp;</td>
1011
                                    <% Else %>
1142
                                    <td>
1012
                                        <td background="images/bg_form_lightgray.gif" class="form_field"><%=parPkgName%></td>
1143
                                       <span>A major number change indicates the contract of the package has changed in a non-backwardly compatible manner.</span>
1013
                                    <% End If %>
1144
                                    </td>
1014
                                 </tr>
1145
                                 </tr>
1015
 
-
 
1016
                                 <!--Base View -------------->
-
 
1017
                                 <% if newPackage > 0 Then %>
-
 
1018
                                    <tr>
-
 
1019
                                        <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">To Base View</td>
-
 
1020
                                        <td colspan="2" width="1%" nowrap background="images/bg_form_lightgray.gif" class="form_item">
-
 
1021
                                           <select name="base_view_id" id="base_view_id" class="form_item" onBlur="checkBaseView()">
-
 
1022
                                              <option></option>
-
 
1023
                                              <%Call Get_All_Base_Views(parBase_view_id)%>
-
 
1024
                                           </select>
-
 
1025
                                           <span id="bvError"></span>
-
 
1026
                                        </td>
-
 
1027
                                     </tr>
-
 
1028
 
-
 
1029
                                 <!--Personal View -------------->
-
 
1030
                                   <%If QStrPar("Pview") <> "disable" Then%>
-
 
1031
                                    <tr>
-
 
1032
                                        <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">To Personal View</td>
-
 
1033
                                       <td colspan="2" width="1%" nowrap background="images/bg_form_lightgray.gif">
-
 
1034
                                          <select name="personal_view_id" class="form_item">
-
 
1035
                                             <option value="">None</option>
-
 
1036
                                             <%Call Get_All_Personal_Views(objAccessControl.UserId )%>
-
 
1037
                                          </select>
-
 
1038
                                       </td>
-
 
1039
                                    </tr>
-
 
1040
                                    <%End If%>
-
 
1041
 
-
 
1042
                                    <!-- Software Licence ----------------->
-
 
1043
                                    <tr>
-
 
1044
                                       <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">Software Licence<%=Quick_Help("Licence")%></td>
-
 
1045
                                        <td colspan="2" width="1%" nowrap background="images/bg_form_lightgray.gif" class="form_item">
-
 
1046
                                           <select name="licence_id" id="licence_id" class="form_item" onBlur="checkLicence()">
-
 
1047
                                              <option></option>
-
 
1048
                                              <%Call Get_All_Licences(-2)%>
-
 
1049
                                           </select>
-
 
1050
                                           <span id="liError"></span>
-
 
1051
                                        </td>
-
 
1052
                                    </tr>
-
 
1053
 
-
 
1054
                                 <!--Dummy Line to highlight New Package Data -------------->
-
 
1055
                                    <tr>
-
 
1056
                                        <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field"></td>
-
 
1057
                                        <td background="images/bg_form_lightbluedark.gif" class="form_field"></td>
-
 
1058
                                    </tr>
-
 
1059
                                 <% End If %>
-
 
1060
 
-
 
1061
                                 <!-- Build Type Assignment ----------------->
-
 
1062
                                 <tr>
1146
                                 <tr>
1063
                                    <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">Build Type<%=Quick_Help("BuildType")%></td>
-
 
1064
                                    <td background="images/bg_form_lightgray.gif" class="form_txt">
1147
                                    <td colspan="4"><hr width="100%" size="1" noshade></td>
1065
                                    <table>
-
 
1066
                                        <tr>
-
 
1067
                                            <td background="images/bg_form_lightgray.gif" class="form_txt">
-
 
1068
                                            <input name="build_type1" id="build_type_A" type="radio" value="A" checked onclick="changeToAutoBuild('A');"> Auto
-
 
1069
                                            <input name="build_type1" id="build_type_M" type="radio" value="M" onclick="changeToAutoBuild('M');"> Manual
-
 
1070
                                        </td>
-
 
1071
                                        </tr>
-
 
1072
                                    </table>
-
 
1073
                                 </tr>
1148
                                 </tr>
1074
                                 <!--Version Number Assignment -------------->
-
 
1075
                                 <tr>
1149
                                 <tr>
1076
                                    <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">Version Number Assignment<%=Quick_Help("ChangeType")%></td>
-
 
1077
                                    <td background="images/bg_form_lightgray.gif" class="form_txt">
-
 
1078
                                       <%
1150
                                    <td width="1%">
1079
                                            Dim flagAuto, flagMan
-
 
1080
                                            if bDisableAuto Then
-
 
1081
                                                flagAuto = "disabled"
1151
                                      <%If bPatchOnly Then minorState = "disabled" %>
1082
                                                flagMan = "checked"
-
 
1083
                                            Else
-
 
1084
                                                If bIsAuto Then
-
 
1085
                                                    flagAuto = "checked"
-
 
1086
                                                    flagMan = ""
-
 
1087
                                                Else
-
 
1088
                                                    flagAuto = ""
-
 
1089
                                                    flagMan = "checked"
-
 
1090
                                                End if
-
 
1091
                                            End if
-
 
1092
                                       %>
-
 
1093
                                        <table>
-
 
1094
                                        <tr>
-
 
1095
                                            <td background="images/bg_form_lightgray.gif" class="form_txt">
1152
                                      <input name="change_type1" type="radio" value="N" <%=minorState%>>
1096
                                        
-
 
1097
                                            <input name="version_type" id="version_type_A" type="radio" value="A" <%=flagAuto%> onclick="changeToAutoVersionNumberAssignment();"> Auto
-
 
1098
                                            <input name="version_type" id="version_type_M" type="radio" value="M" <%=flagMan%> onclick="changeToManualVersionNumberAssignment();"> Manual
-
 
1099
                                        </td>
-
 
1100
                                        </tr>
-
 
1101
                                        </table>
-
 
1102
                                    </td>
1153
                                    </td>
1103
                                 </tr>
-
 
1104
 
-
 
1105
                                 <!-- New Version Number -->
1154
                                    <td align="center" nowrap>
1106
                                 <tr>
-
 
1107
                                    <td background="images/bg_form_lightbluedark.gif"  width="20%" class="form_field">New Version Number</td>
-
 
1108
                                    <td background="images/bg_form_lightgray.gif" >
-
 
1109
                                        <span class="form_item">
1155
                                       <span class="form_field">Minor Change</span>
1110
                                            <input type="text" id="FRvnumber"
-
 
1111
                                                    name="FRvnumber"
-
 
1112
                                                    class="form_item" size="12" onBlur="checkVersionNumber()">
-
 
1113
                                                    <span id="vnError"></span>
-
 
1114
                                           <%If NOT newPackage > 0 Then%>
-
 
1115
                                              <button type="button" style="visibility:hidden" id="FRuseVersion" class="form_item" onclick="useVersion();">&#8656;&nbsp;Copy</button>
-
 
1116
                                              <select id="FRpkgver"  name="FRpkgver" class="form_item" onchange="updateCopyButton()";>
-
 
1117
                                                 <option value=""></option>
-
 
1118
                                                 <%
-
 
1119
                                                 Set rsLatest = OraDatabase.DbCreateDynaset( Get_Latest_All_Ext( objPkgInfo.Item("pkg_id"), parPv_id ), cint(0))
-
 
1120
 
-
 
1121
                                                 If rsLatest.RecordCount > 0 Then
-
 
1122
                                                    aVersions = rsLatest.GetRows()
-
 
1123
                                                    lastRow = UBound( aVersions, 2 )
-
 
1124
                                                    Set objSortHelper = New SortHelper
-
 
1125
 
-
 
1126
                                                    ' Sort versions
-
 
1127
                                                    Call objSortHelper.VersionSort( aVersions, 0, lastRow, rsLatest.FieldIndex("pkg_version") )
-
 
1128
 
-
 
1129
                                                    ' Descending order
-
 
1130
                                                    For i = lastRow To 0 Step -1
-
 
1131
                                                    %>
-
 
1132
                                                       <option value="<%=aVersions( rsLatest.FieldIndex("pkg_version"), i )%>" <%=aVersions( rsLatest.FieldIndex("selected"), i )%>>
-
 
1133
                                                          <%If aVersions( rsLatest.FieldIndex("dlocked"), i ) = "Y" Then%>
-
 
1134
                                                             R&nbsp;
-
 
1135
                                                          <%Else%>
-
 
1136
                                                             &nbsp;&nbsp;&nbsp;&nbsp;
-
 
1137
                                                          <%End If%>
-
 
1138
                                                          <%=aVersions( rsLatest.FieldIndex("pkg_version"), i )%>
-
 
1139
                                                       </option>
-
 
1140
                                                    <%
-
 
1141
                                                    Next
-
 
1142
                                                    Set objSortHelper = nothing
-
 
1143
 
-
 
1144
                                                 End If
-
 
1145
                                                 %>
-
 
1146
                                              </select>&nbsp;Existing Versions<%=Quick_Help("Existing")%>
-
 
1147
                                           <%End If%>
-
 
1148
                                           </span>
-
 
1149
                                    </td>
1156
                                    </td>
1150
                                 </tr>
1157
                                    <td>&nbsp;</td>
1151
                                 <tr>
1158
                                    <td>
1152
                                    <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">Version Extension</td>
-
 
1153
                                    <td background="images/bg_form_lightgray.gif" class="form_item">
-
 
1154
                                       <DIV id="divVersionExt" name="divVersionExt">
-
 
1155
                                          <select name="v_ext" id="v_ext" onchange="checkVersionNumber()">
-
 
1156
                                             <%
-
 
1157
                                             Call drawExtensionSelectBox( objPkgInfo.Item("v_ext"), true )
-
 
1158
                                             %>
-
 
1159
                                          </select>
-
 
1160
                                       </DIV>
-
 
1161
									  <div id=cotsHint style="display:none">
-
 
1162
                                          <p>The version number for a COTS package should be made up of the manufactures version number with a VIX PatchBuild number appended. 
1159
                                       <span>A minor number change indicates the contract of the package has changed in a backwardly compatible manner.</span>
1163
                                             ie: '1.12-beta.0000'
-
 
1164
									  </div>
-
 
1165
                                    </td>
1160
                                    </td>
1166
                                 </tr>
1161
                                 </tr>
1167
                                 <%If NOT parRename <> "" Then%>
-
 
1168
                                 <!-- Reason For This Version -->
-
 
1169
                                 <tr>
1162
                                 <tr>
1170
                                    <td background="images/bg_form_lightbluedark.gif" width="20%" class="form_field">Reason For This Version</td>
-
 
1171
                                    <td background="images/bg_form_lightgray.gif" nowrap width="100%" class="form_field">
-
 
1172
                                       <textarea name="FRreason" id="FRreason" class="form_item" style="width: 420px; height: 150px" onBlur="checkReason()"></textarea>
-
 
1173
                                        <span id="frError"></span>
1163
                                    <td colspan="4"><hr width="100%" size="1" noshade></td>
1174
                                    </td>
-
 
1175
                                 </tr>
1164
                                 </tr>
1176
                                <%End If%>
-
 
1177
                                <tr id="change_type1">
-
 
1178
                                   <td background="images/bg_form_lightbluedark.gif" nowrap width="20%" class="form_field">Change Type</td>
-
 
1179
                                   <td background="images/bg_form_lightgray.gif" >
-
 
1180
                                      <table width="100%" border="0" cellspacing="0" cellpadding="0">
-
 
1181
                                         <tr>
-
 
1182
                                            <td width="1%">
-
 
1183
                                              <%If bPatchOnly Then majorState = "disabled" %>
-
 
1184
                                              <input name="change_type1" type="radio" value="M" <%=majorState%>>
-
 
1185
                                            </td>
-
 
1186
                                            <td nowrap>
-
 
1187
                                               <span class="form_field">Major Change</span>
-
 
1188
                                            </td>
-
 
1189
                                            <td>&nbsp;</td>
-
 
1190
                                            <td>
-
 
1191
                                               <span class="form_txt">A major number change indicates the contract of the package has changed in a non-backwardly compatible manner.</span>
-
 
1192
                                            </td>
-
 
1193
                                         </tr>
-
 
1194
                                         <tr>
-
 
1195
                                            <td colspan="4"><hr width="100%" size="1" noshade></td>
-
 
1196
                                         </tr>
-
 
1197
                                         <tr>
-
 
1198
                                            <td width="1%">
-
 
1199
                                              <%If bPatchOnly Then minorState = "disabled" %>
-
 
1200
                                              <input name="change_type1" type="radio" value="N" <%=minorState%>>
-
 
1201
                                            </td>
-
 
1202
                                            <td align="center" nowrap>
-
 
1203
                                               <span class="form_field">Minor Change</span>
-
 
1204
                                            </td>
-
 
1205
                                            <td>&nbsp;</td>
-
 
1206
                                            <td>
-
 
1207
                                               <span class="form_txt">A minor number change indicates the contract of the package has changed in a backwardly compatible manner.</span>
-
 
1208
                                            </td>
-
 
1209
                                         </tr>
-
 
1210
                                         <tr>
-
 
1211
                                            <td colspan="4"><hr width="100%" size="1" noshade></td>
-
 
1212
                                         </tr>
-
 
1213
                                         <tr>
-
 
1214
                                            <td width="1%">
-
 
1215
                                               <input name="change_type1" type="radio" value="P" <%=patchState%>>
-
 
1216
                                            </td>
-
 
1217
                                            <td nowrap>
-
 
1218
                                               <span class="form_field">Patch Change</span>
-
 
1219
                                            </td>
-
 
1220
                                            <td>&nbsp;</td>
-
 
1221
                                            <td>
-
 
1222
                                               <span class="form_txt">A patch number change indicates the package has changed internally.</span>
-
 
1223
                                            </td>
-
 
1224
                                         </tr>
-
 
1225
                                      </table>
-
 
1226
 
-
 
1227
                                   </td>
-
 
1228
                                </tr>
-
 
1229
                                 <tr>
1165
                                 <tr>
-
 
1166
                                    <td width="1%">
1230
                                    <td nowrap><img src="images/h_trsp_dot.gif" width="120" height="1"></td>
1167
                                       <input name="change_type1" type="radio" value="P" <%=patchState%>>
-
 
1168
                                    </td>
-
 
1169
                                    <td nowrap>
-
 
1170
                                       <span class="form_field">Patch Change</span>
-
 
1171
                                    </td>
-
 
1172
                                    <td>&nbsp;</td>
-
 
1173
                                    <td>
-
 
1174
                                       <span>A patch number change indicates the package has changed internally.</span>
1231
                                    <td></td>
1175
                                    </td>
1232
                                 </tr>
1176
                                 </tr>
1233
                                 <input type="hidden" name="change_type" id="change_type" value="X">
-
 
1234
                                 <input type="hidden" name="build_type" id="build_type" value="A">
-
 
1235
                                 <input type="hidden" name="FRnewver" id="FRnewver" value="hello">
-
 
1236
                                 <input type="hidden" name="OLDpv_id" value="<%=parPv_id%>">
-
 
1237
                                 <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
-
 
1238
                                 <input type="hidden" name="newPackage" value="<%=newPackage%>">
-
 
1239
                                 <input type="hidden" name="renamePackage" value="<%=bCanRenamePackage%>">
-
 
1240
                                 <input type="hidden" id="FRpkgId" name="FRpkgId" value="<%=parPkgId%>">
-
 
1241
                                 <%If NOT ((newPackage > 0) OR bCanRenamePackage > 0) Then %>
-
 
1242
                                 <input type="hidden" id="FRpkgName" name="FRpkgName" value="<%=parPkgName%>">
-
 
1243
                                 <%End If%>
-
 
1244
 
-
 
1245
                              </table>
1177
                              </table>
-
 
1178
 
1246
                           </td>
1179
                           </td>
1247
                        </tr>
1180
                        </tr>
-
 
1181
                         <input type="hidden" name="change_type" id="change_type" value="X">
-
 
1182
                         <input type="hidden" name="build_type" id="build_type" value="A">
-
 
1183
                         <input type="hidden" name="FRnewver" id="FRnewver" value="hello">
-
 
1184
                         <input type="hidden" name="OLDpv_id" value="<%=parPv_id%>">
-
 
1185
                         <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
-
 
1186
                         <input type="hidden" name="newPackage" value="<%=newPackage%>">
-
 
1187
                         <input type="hidden" name="renamePackage" value="<%=bCanRenamePackage%>">
-
 
1188
                         <input type="hidden" id="FRpkgId" name="FRpkgId" value="<%=parPkgId%>">
-
 
1189
                         <%If NOT ((newPackage> 0) OR bCanRenamePackage> 0) Then %>
-
 
1190
                         <input type="hidden" id="FRpkgName" name="FRpkgName" value="<%=parPkgName%>">
-
 
1191
                         <%End If%>
-
 
1192
 
-
 
1193
                      </table>
-
 
1194
<%If not isNull(parPv_id) Then
-
 
1195
                    Get_Newer_Versions
-
 
1196
                    If bNewerVersions Then%>
-
 
1197
                    <div class='textPanel warningPanel'>
-
 
1198
                        <img src="images/i_warning.gif" width="16" height="16">
-
 
1199
                         Newer versions of this package exist. Considerations:
-
 
1200
                        <select class=fright><%=sNewerVersionsOptions%></select>
1248
                        <tr>
1201
                         <ul>
1249
                           <td nowrap width="100%" class="body_scol">
1202
                             <li>Use the latest version instead</li>
1250
                              <input type="submit" name="btn" value="Submit" class="form_btn" onClick="return validateFormNEWversion();">
1203
                             <li>Branch the current version</li>
1251
                              <input type="reset" name="btn" value="Cancel" class="form_btn" onClick="Dependency();">
1204
                             <li>Base the 'new' version on the latest version</li>
-
 
1205
                         </ul>
-
 
1206
                    </div>
-
 
1207
                   <%End If
-
 
1208
End If%>
-
 
1209
                    <div class=buttonPanelWhite>
1252
                              <SPAN id="ProgressBar" name="ProgressBar" style="visibility:hidden;"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Processing...</SPAN>
1210
                      <span id="ProgressBar" name="ProgressBar" style="visibility:hidden;"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Processing...</span>
-
 
1211
                      <input type="submit" name="btn" value="Submit" class="form_btn" onClick="return validateFormNEWversion();">
-
 
1212
                      <input type="reset" name="btn" value="Cancel" class="form_btn" onClick="Dependency();">
1253
                           </td>
1213
                    </div>
1254
                        </tr>
1214
                    <div class='textPanel err_alert'>
1255
                        <tr><td id="eMessage" colspan=3 class="err_alert">ERROR: Page Java script did not load</td></tr>
1215
                        <span id="eMessage">ERROR: Page Java script did not load</span>
1256
                     </form>
1216
                 </form>
1257
                  </table>
1217
              </table>
1258
                  <!-- END Body-->
1218
              <!-- END Body-->
1259
               </td>
-
 
1260
            </tr>
1219
            </tr>
1261
         </table>
1220
         </div>
1262
      </td>
1221
      </td>
1263
   </tr>
1222
   </tr>
1264
</table>
1223
</table>