Subversion Repositories DevTools

Rev

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

Rev 123 Rev 127
Line 494... Line 494...
494
         </td>
494
         </td>
495
      </tr>
495
      </tr>
496
      <tr>
496
      <tr>
497
         <td nowrap background="images/bg_form_lightbluedark.gif" class="sublbox_txt" valign="top">
497
         <td nowrap background="images/bg_form_lightbluedark.gif" class="sublbox_txt" valign="top">
498
            <b>Build Standard:</b>
498
            <b>Build Standard:</b>
499
            <%If pkgInfoHash.Item ("dlocked") <> "A" AND pkgInfoHash.Item ("dlocked") <> "Y" AND criticalSectionIsEditable Then%>
499
            <%If pageIsEditable Then%>
500
               <a href='javascript:;' onClick="MM_openBrWindow('_wform_build_standard.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','BuildStandard','resizable=yes,width=400,height=300')" class="txt_linked">
500
               <a href='javascript:;' onClick="MM_openBrWindow('_wform_build_standard.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','BuildStandard','resizable=yes,width=400,height=300')" class="txt_linked">
501
                  <img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align="absmiddle">
501
                  <img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align="absmiddle">
502
               </a>
502
               </a>
503
            <%Else%>
503
            <%Else%>
504
               <img src="images/i_edit_disable.gif" width="12" height="12" hspace="2" border="0" align="absmiddle">
504
               <img src="images/i_edit_disable.gif" width="12" height="12" hspace="2" border="0" align="absmiddle">
Line 878... Line 878...
878
         <table width="100%" border="0" cellspacing="1" cellpadding="2">
878
         <table width="100%" border="0" cellspacing="1" cellpadding="2">
879
            <tr>
879
            <tr>
880
               <td class="body_colb"></td>
880
               <td class="body_colb"></td>
881
               <td align="right" valign="bottom">
881
               <td align="right" valign="bottom">
882
                  <%If (objAccessControl.IsVisible( "RipplePackage" ) AND pageIsEditable) OR criticalSectionIsEditable Then%>
882
                  <%If (objAccessControl.IsVisible( "RipplePackage" ) AND pageIsEditable) OR criticalSectionIsEditable Then%>
883
                     <a href='javascript:;' onClick="MM_openBrWindow('_wform_ripple_properties.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','RippleType','resizable=yes,width=1000,height=230')" class="txt_linked">Edit<img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align="absmiddle"></a>
883
                     <a href='javascript:;' onClick="MM_openBrWindow('_wform_ripple_properties.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','RippleType','resizable=yes,width=800,height=400')" class="txt_linked">Edit<img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align="absmiddle"></a>
884
                  <%End If%>
884
                  <%End If%>
885
               </td>
885
               </td>
886
            </tr>
886
            </tr>
887
         </table>
887
         </table>
888
         <table width="100%" border="0" cellspacing="1" cellpadding="2">
888
         <table width="100%" border="0" cellspacing="1" cellpadding="2">
Line 912... Line 912...
912
                  <p>
912
                  <p>
913
                     <%
913
                     <%
914
                     Response.write "<table border='0' cellspacing='0' cellpadding='0'>"
914
                     Response.write "<table border='0' cellspacing='0' cellpadding='0'>"
915
                     Response.write "<tr>"
915
                     Response.write "<tr>"
916
                     Response.write "<td class='sublbox_txt'>"
916
                     Response.write "<td class='sublbox_txt'>"
917
                     If pkgInfoHash.Item ("ripple_field") = "M" Then
-
 
918
                        Response.write "Major Number."
-
 
919
                     ElseIf pkgInfoHash.Item ("ripple_field") = "m" Then
-
 
920
                        Response.write "Minor Number."
-
 
921
                     ElseIf pkgInfoHash.Item ("ripple_field") = "p" Then
-
 
922
                        Response.write "Patch Number."
917
                     Dim anotherQry, selectedRippleType
923
                     ElseIf pkgInfoHash.Item ("ripple_field") = "b" Then
918
                     selectedRippleType = pkgInfoHash.Item ("ripple_field")
924
                        Response.write "Build Number."
-
 
925
                     ElseIf pkgInfoHash.Item ("ripple_field") = "z" Then
919
                     Set anotherQry = OraDatabase.DbCreateDynaset( "SELECT state_name from ripple_field_states WHERE state_acronym ='"& selectedRippleType &"'", cint(0))
926
                        Response.write "Do not ripple build"
920
                     If anotherQry.RecordCount = 0  Then
927
                     Else
-
 
928
                        Response.write "<span class='err_alert'>Required!</span>"
921
                        Response.write "<span class='err_alert'>Required!</span>"
-
 
922
                     Else
-
 
923
                       Response.write( anotherQry.Fields("state_name").Value )
-
 
924
                     End If
-
 
925
                     anotherQry.Close()
-
 
926
                     Set anotherQry = nothing
-
 
927
                     If ( selectedRippleType = "L" ) Then
-
 
928
                       Dim qry
-
 
929
                       Set qry = OraDatabase.DbCreateDynaset( "SELECT major_limit, minor_limit, patch_limit, build_number_limit from package_versions where pv_id="& Request("pv_id"), cint(0))
-
 
930
                       Response.write " "
-
 
931
                       If isNull(qry("major_limit")) Then
-
 
932
                         Response.write("0")
-
 
933
                       Else
-
 
934
                         Response.write( qry.Fields( "major_limit" ).Value )
-
 
935
                       End If
-
 
936
                       Response.write ", "
-
 
937
                       If isNull(qry("minor_limit")) Then
-
 
938
                         Response.write("0")
-
 
939
                       Else
-
 
940
                         Response.write( qry.Fields( "minor_limit" ).Value )
-
 
941
                       End If
-
 
942
                       Response.write ", "
-
 
943
                       If isNull(qry("patch_limit")) Then
-
 
944
                         Response.write("0")
-
 
945
                       Else
-
 
946
                         Response.write( qry.Fields( "patch_limit" ).Value )
-
 
947
                       End If
-
 
948
                       Response.write ", "
-
 
949
                       If isNull(qry("build_number_limit")) Then
-
 
950
                         Response.write("0")
-
 
951
                       Else
-
 
952
                         Response.write( qry.Fields( "build_number_limit" ).Value )
-
 
953
                       End If
-
 
954
                       qry.Close()
-
 
955
                       Set qry = nothing
929
                     End If
956
                     End If
930
                     Response.Write "<br></td>"
957
                     Response.Write "<br></td>"
931
                     Response.write "</tr>"
958
                     Response.write "</tr>"
932
                     Response.write "</table>"
959
                     Response.write "</table>"
933
                     %>
960
                     %>