WebSVN – DevTools – Diff – /ManagerSuite/Release_Manager/trunk/_wform_ripple_properties.asp

 %>
 <%
 '------------------------------------------------------------------------------------------------------------------------------------
 Sub UpdateRippleType ( )
    Dim rsTemp, Query_String
+   Dim storedRippleType
+   Dim storedMajorLimit
+   Dim storedMinorLimit
+   Dim storedPatchLimit
+   Dim storedBuildNumberLimit
+   Dim selectedRippleType
+   selectedRippleType = Request("ripple_type_combo")
+   Dim enteredMajorLimit
+   ' enteredMajorLimit is a string of digits
+   ' it will be compared with a string representing a NUMBER in the db
+   ' use CInt to at least strip leading zeros
+   enteredMajorLimit = CInt(Request("Major"))
+   Dim enteredMinorLimit
+   enteredMinorLimit = CInt(Request("Minor"))
+   Dim enteredPatchLimit
+   enteredPatchLimit = CInt(Request("Patch"))
+   Dim enteredBuildLimit
+   enteredBuildLimit = CInt(Request("Build"))
    Query_String = _
-   " SELECT ripple_field"&_
+    " SELECT ripple_field, major_limit, minor_limit, patch_limit, build_number_limit"&_
-   " FROM package_versions"&_
+    " FROM package_versions"&_
-   " WHERE pv_id = "& Request("pv_id")
+    " WHERE pv_id = "& Request("pv_id")
    Set rsTemp = OraDatabase.CreateDynaset( Query_String, cint(0))
+   storedRippleType = rsTemp("ripple_field").Value
+   storedMajorLimit = rsTemp("major_limit").Value
+   If ( IsNull(storedMajorLimit) ) Then
+     storedMajorLimit = "0"
+   End If
+   storedMinorLimit = rsTemp("minor_limit").Value
+   If ( IsNull(storedMinorLimit) ) Then
+     storedMinorLimit = "0"
+   End If
+   storedPatchLimit = rsTemp("patch_limit").Value
+   If ( IsNull(storedPatchLimit) ) Then
+     storedPatchLimit = "0"
+   End If
+   storedBuildNumberLimit = rsTemp("build_number_limit").Value
+   If ( IsNull(storedBuildNumberLimit) ) Then
+     storedBuildNumberLimit = "0"
+   End If
+   'normalise for comparison purposes
+   storedMajorLimit = CInt( storedMajorLimit )
+   storedMinorLimit = CInt( storedMinorLimit )
+   storedPatchlimit = CInt( storedPatchLimit )
+   storedBuildNumberLimit = CInt( storedBuildNumberLimit )
-   If (rsTemp("ripple_field").Value <> Request("ripple_type_combo")) OR IsNull(rsTemp("ripple_field").Value) Then
+   If (storedRippleType <> selectedRippleType) OR IsNull(storedRippleType) Then
       'update fields
       rsTemp.Edit()
-      rsTemp.Fields("ripple_field").Value = Request("ripple_type_combo")
+      rsTemp.Fields("ripple_field").Value = selectedRippleType
       rsTemp.Update()
+      Dim anotherQry
+      Set anotherQry = OraDatabase.DbCreateDynaset( "SELECT state_name from ripple_field_states WHERE state_acronym ='"& selectedRippleType &"'", cint(0))
+      '/* Log Action */
+      Call Log_Action ( Request("pv_id"), "ripple_type_update", anotherQry.Fields("state_name").Value )
+      anotherQry.Close()
+      Set anotherQry = nothing
+   End If
+   If ( storedMajorLimit <> enteredMajorLimit ) Then
+      'update fields
+      rsTemp.Edit()
+      If ( enteredMajorLimit <> "0" ) Then
+        rsTemp.Fields("major_limit").Value = enteredMajorLimit
+      Else
+        rsTemp.Fields("major_limit").Value = NULL
+      End If
+      rsTemp.Update()
       '/* Log Action */
-      If Request("ripple_type_combo") = "M" Then
-         Call Log_Action ( Request("pv_id"), "ripple_type_update", "Major Number" )
+      Call Log_Action ( Request("pv_id"), "major_limit_update", enteredMajorLimit )
+   End If
-      ElseIf Request("ripple_type_combo") = "m" Then
+   If ( storedMinorLimit <> enteredMinorLimit ) Then
-         Call Log_Action ( Request("pv_id"), "ripple_type_update", "Minor Number" )
+      'update fields
+      rsTemp.Edit()
-      ElseIf Request("ripple_type_combo") = "p" Then
+      If ( enteredMinorLimit <> "0" ) Then
-         Call Log_Action ( Request("pv_id"), "ripple_type_update", "Patch Number" )
+        rsTemp.Fields("minor_limit").Value = enteredMinorLimit
+      Else
+        rsTemp.Fields("minor_limit").Value = NULL
+      End If
+      rsTemp.Update()
-      ElseIf Request("ripple_type_combo") = "z" Then
+      '/* Log Action */
-         Call Log_Action ( Request("pv_id"), "ripple_type_update", "Do not ripple build" )
+      Call Log_Action ( Request("pv_id"), "minor_limit_update", enteredMinorLimit )
+   End If
+   If ( storedPatchLimit <> enteredPatchLimit ) Then
+      'update fields
+      rsTemp.Edit()
+      If ( enteredPatchLimit <> "0" ) Then
+        rsTemp.Fields("patch_limit").Value = enteredPatchLimit
       Else
-         Call Log_Action ( Request("pv_id"), "ripple_type_update", "Build Number" )
+        rsTemp.Fields("patch_limit").Value = NULL
+      End If
+      rsTemp.Update()
+      '/* Log Action */
+      Call Log_Action ( Request("pv_id"), "patch_limit_update", enteredPatchLimit )
+   End If
+   If ( storedBuildNumberLimit <> enteredBuildLimit ) Then
+      'update fields
+      rsTemp.Edit()
+      If ( enteredBuildLimit <> "0" ) Then
+        rsTemp.Fields("build_number_limit").Value = enteredBuildLimit
+      Else
+        rsTemp.Fields("build_number_limit").Value = NULL
       End If
+      rsTemp.Update()
+      '/* Log Action */
+      Call Log_Action ( Request("pv_id"), "build_number_limit_update", enteredBuildLimit )
    End If
    rsTemp.Close()
    Set rsTemp = nothing
 End Sub
       objDetails.Item("is_deployable")         = rsTemp("is_deployable")
       objDetails.Item("is_build_env_required") = rsTemp("is_build_env_required")
       objDetails.Item("build_type")            = rsTemp("build_type")
       objDetails.Item("bs_id")                 = rsTemp("bs_id")
       objDetails.Item("ripple_field")          = rsTemp("ripple_field")
+      If isNull(rsTemp("major_limit")) Then
+        objDetails.Item("major_limit")         = "0"
+      Else
+        objDetails.Item("major_limit")         = rsTemp("major_limit")
+      End If
+      If isNull(rsTemp("minor_limit")) Then
+        objDetails.Item("minor_limit")         = "0"
+      Else
+        objDetails.Item("minor_limit")         = rsTemp("minor_limit")
+      End If
+      If isNull(rsTemp("patch_limit")) Then
+        objDetails.Item("patch_limit")         = "0"
+      Else
+        objDetails.Item("patch_limit")         = rsTemp("patch_limit")
+      End If
+      If isNull(rsTemp("build_number_limit")) Then
+        objDetails.Item("build_number_limit")  = "0"
+      Else
+        objDetails.Item("build_number_limit")  = rsTemp("build_number_limit")
+      End If
    End If
    rsTemp.Close()
    Set rsTemp = Nothing
 End Sub
    isEditable = Is_Page_Editable ( isDLocked )
    Query_String = "select * from ripple_field_states"
    If (isEditable) Then
-      Response.Write "<select name='ripple_type_combo' class='form_item'>"
+      Response.Write "<select name='ripple_type_combo' id='rtc' class='form_item' onChange='changeToRippleType(this.options[this.selectedIndex].value)'>"
    Else
-      Response.Write "<select name='ripple_type_combo' class='form_item' disabled>"
+      Response.Write "<select name='ripple_type_combo' id='rtc' class='form_item' disabled>"
    End If
    Set rsTemp = OraDatabase.CreateDynaset( Query_String, cint(0))
    While (NOT rsTemp.BOF) AND (NOT rsTemp.EOF)
    if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
       document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
    else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
+}
 MM_reloadPage(true);
+function isNum(passedVal)
+{
+  if (passedVal == "")
+  {
+    return false
+  }
+  for(i=0; i<passedVal.length; i++)
+  {
+    if (passedVal.charAt(i) < "0")
+    {
+      return false
+    }
+    if (passedVal.charAt(i) > "9")
+    {
+      return false
+    }
+  }
+  return true
+}
+function valid(form)
+{
+  if (!isNum(rippleproperties.Major.value))
+  {
+    alert("Invalid major number")
+    return false
+  }
+  return true
+}
+function changeToRippleType(val)
+{
+  if ( val.match("L") )
+  {
+    document.getElementById("limits_row").style.visibility="visible"
+  }
+  else
+  {
+    document.getElementById("limits_row").style.visibility="hidden"
+    document.getElementById("Major").value  = "0"
+    document.getElementById("Minor").value  = "0"
+    document.getElementById("Patch").value  = "0"
+    document.getElementById("Build").value  = "0"
+  }
+}
+function loader()
+{
+  changeToRippleType(document.getElementById("rtc").options[document.getElementById("rtc").selectedIndex].value)
+}
+if (window.addEventListener)
+{
+  window.addEventListener("load", loader, false)
+}
+else if (window.attachEvent)
+{
+  window.attachEvent("onload", loader)
+}
+else if (document.getElementById)
+{
+  window.onload=loader
+}
 //-->
 </script>
 </head>
-<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();">
+<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
 <!-- TIPS LAYERS -------------------------------------->
 <div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
 <!----------------------------------------------------->
-<form name="rippleproperties" method="post" action="<%=scriptName%>">
+<form onSubmit="return valid(this)" name="rippleproperties" id="rp" method="post" action="<%=scriptName%>">
    <table width="100%" border="0" cellspacing="0" cellpadding="2" height="100%">
       <tr>
          <td background="images/lbox_bg_orange.gif" width="1%" height="1%"><img src="icons/i_pkg_ripple_type.gif" width="21" height="21" hspace="5" border="0"></td>
          <td background="images/lbox_bg_blue.gif" nowrap width="50%" class="wform_ttl">&nbsp;Ripple Properties </td>
          <td background="images/lbox_bg_blue.gif" align="right" width="50%">
                   rsQryRipple.Close()
                   Set rsQryRipple = nothing
                   %>
-                  <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">Yes
+                  <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt" align="right">
-                     <input name="FRripplebuild" type="radio" value="1" <%=FRripplebuildYES%>  <%=disabled%>>
+                     Yes<input name="FRripplebuild" type="radio" value="1" <%=FRripplebuildYES%>  <%=disabled%>>&nbsp;&nbsp;
-                     &nbsp;&nbsp;No<input name="FRripplebuild" type="radio" value="0" <%=FRripplebuildNO%>>
+                     No<input name="FRripplebuild" type="radio" value="0" <%=FRripplebuildNO%>>&nbsp;&nbsp;
                   </td>
                   <td background="images/bg_form_lightbluedark.gif">
                      <span class='err_alert'><b>WARNING!</span>
                      <font size='1'>
+                        <br>
-                        When set to No, this package and <u>all</u> packages which depend on this package, either directly or indirectly,
+                        When set to No, this package and <u>all</u> packages which depend on this package, either directly or indirectly,<br>
                         will be excluded from the build. When the Yes option is disabled, indicates this package has been excluded indirectly.
                      </font></b>
                   </td>
                </tr>
                <tr>
                   <td>&nbsp;</td>
-                  <td valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Ripple Type?<%=Quick_Help ( "ripple_type" )%></td>
+                  <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Ripple Type?<%=Quick_Help ( "ripple_type" )%></td>
                   <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
-                     <table width="100%" border="0" cellspacing="0" cellpadding="0">
-                        <tr>
-                           <td bgcolor="#FFFFFF">
-                              <table width="100" border="0" cellpadding="3" cellspacing="0" background="images/bg_form_lightbluedark.gif">
-                                 <tr>
-                                    <td nowrap background="images/bg_form_lightbluedark.gif" bgcolor="#F5F5F5" class="form_txt">
-                                       <% Call RenderRippleTypeCombo( objFormCollector.Item("ripple_field"), isDLocked )%>
+                    &nbsp;&nbsp;<% Call RenderRippleTypeCombo( objFormCollector.Item("ripple_field"), isDLocked )%>&nbsp;&nbsp;
-                                    </td>
-                                 </tr>
-                                 <tr>
-                                    <td width="1" background="images/bg_form_lightbluedark.gif"></td>
-                                    <td width="1"></td>
-                                    <td width="100%"></td>
-                                 </tr>
-                              </table>
-                           </td>
-                        </tr>
-                     </table>
                   </td>
                   <td background="images/bg_form_lightbluedark.gif">
                      <span class='err_alert'><b>WARNING!</span>
+                     <font size='1'>
+                        <br>
-                     <font size='1'> This enables a package to advertise how it will be numbered when rippled.
+                        This enables a package to advertise how it will be numbered when rippled.<br>
-                        THIS IS PRIMARILY INTENDED TO CATER FOR PACKAGES WHICH DO NOT SUPPORT A NON ZERO PATCH/BUILD NUMBER,
+                        THIS IS PRIMARILY INTENDED TO CATER FOR PACKAGES WHICH DO NOT SUPPORT A NON ZERO PATCH/BUILD NUMBER,<br>
                         AND FOR PRODUCTS WHERE CONSTANTLY RIPPLING A PATCH/BUILD NUMBER IS DISLIKED BY A CUSTOMER.
                      </font></b>
                   </td>
                </tr>
+               <tr id="limits_row" style="visibility:hidden; position:static">
+                  <td>&nbsp;</td>
+                  <td nowrap class="form_field" background="images/bg_form_lightbluedark.gif">Version Field Limits</td>
+                  <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt" align="right">
+                     Major&nbsp;&nbsp;<input name="Major" id="Major" type="text" class="form_item" size="8" value="<%=objFormCollector.Item("major_limit")%>">&nbsp;&nbsp;<br>
+                     Minor&nbsp;&nbsp;<input name="Minor" id="Minor" type="text" class="form_item" size="8" value="<%=objFormCollector.Item("minor_limit")%>">&nbsp;&nbsp;<br>
+                     Patch&nbsp;&nbsp;<input name="Patch" id="Patch" type="text" class="form_item" size="8" value="<%=objFormCollector.Item("patch_limit")%>">&nbsp;&nbsp;<br>
+                     Build&nbsp;&nbsp;<input name="Build" id="Build" type="text" class="form_item" size="8" value="<%=objFormCollector.Item("build_number_limit")%>">&nbsp;&nbsp;
+                  </td>
+                  <td background="images/bg_form_lightbluedark.gif">
+                     <span class='err_alert'><b>WARNING!</span>
+                     <font size='1'>
+                        <br>
+                        A field (major/minor/patch/build number) may be assigned non zero limits to determine how it will be numbered when rippled.<br>
+                        Prior to reaching a limit, the rightmost field able to be incremented will be when rippled.<br>
+                        Upon reaching a limit, that rightmost field will be set to zero and the field next left with a non zero limit (if one exists) will be incremented when rippled.<br>
+                        A field may be assigned to zero to fix the field (to 0 or 000 for the build number field) when rippled.
+                     </font></b>
+                  </td>
+               </tr>
                <tr>
                   <td>&nbsp;</td>
                   <td nowrap class="form_field"><img src="images/h_trsp_dot.gif" width="100" height="10"></td>
                   <td nowrap> <p>&nbsp;</p></td>
                   <td nowrap>&nbsp;</td>

Subversion Repositories DevTools

(root)/ManagerSuite/Release_Manager/trunk/_wform_ripple_properties.asp @ 127 – Rev 121 → 127