Subversion Repositories DevTools

<%
'=====================================================
'               Action Buttons
'=====================================================
%>
<%Sub Action_Buttons ( SSwithTab )%>
   <%Select Case SSwithTab%>
   <%Case "Build Dependencies"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <%If ( (pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R") OR criticalSectionIsEditable )   Then%>
               <td align="center" nowrap valign="bottom">
                  <a href="form_search_pkgs.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>&add_type=<%=enum_ADD_DEPENDENCIES%>" class="abtnItem">
                     <img src="images/i_add_deps.gif" width="22" height="25" align="absmiddle" border="0" hspace="3" alt="Add dependency to the list.">
                     Add
                  </a>
               </td>

               <td align="center" nowrap valign="bottom">
                  <a href="form_edit_deps.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>" class="abtnItem">
                     <img src="images/i_edit_deps.gif" width="23" height="24" align="absmiddle" border="0" hspace="3" alt="Edit dependency list.">
                     Edit
                  </a>
               </td>

               <td align="center" nowrap valign="bottom">
                  <a href="form_update_<%=Get_Devl_Envorinment%>_dependencies.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>" class="abtnItem">
                     <img src="images/i_import_on.gif" width="22" height="22" align="absmiddle" border="0" hspace="3" alt="Import dependency list from your build file.">
                     Import
                  </a>
               </td>
            <%End If%>
            <td align="center" nowrap valign="bottom">
               <a href="form_export_<%=Get_Devl_Envorinment%>_dependencies.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>" class="abtnItem">
                  <img src="images/i_export_on.gif" width="22" height="22" align="absmiddle" border="0" hspace="3" alt="Export this dependency list to be used in your build file.">
                  Export
               </a>
            </td>
         </tr>
      </table>

   <%Case "Runtime Dependencies"%>
      <%If IsNull(pkgInfoHash.Item ("is_patch"))Then%>
         <table width="10" border="0" cellspacing="10">
            <tr>
               <%If (pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R") OR criticalSectionIsEditable Then%>
                  <td align="center" nowrap valign="bottom">
                     <a href="form_search_pkgs.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>&add_type=<%=enum_ADD_RUNTIME_DEPENDENCIES%>" class="abtnItem">
                        <img src="images/i_add_deps.gif" width="22" height="25" align="absmiddle" border="0" hspace="3" alt="Add runtime dependency to the list.">
                        Add
                     </a>
                  </td>
               <%End If%>
            </tr>
         </table>
      <%End If%>

   <%Case "Patches"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <%If pkgInfoHash.Item ("dlocked") = "Y" AND NOT (ReleaseMode = enumDB_RELEASE_IN_CLOSED_MODE) Then%>
               <td align="center" nowrap valign="bottom">
                  <a href="javascript:;" onClick="MM_openBrWindow('_wform_new_patch.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','NewPatch','resizable=yes,scrollbars=yes,width=600,height=400')" class="abtnItem">
                     <img src="images/i_add_patch.gif" width="23" height="25" align="absmiddle" border="0" hspace="3" alt="Add a patch to this package.">
                     Add
                  </a>
               </td>

               <td align="center" nowrap valign="bottom">
                  <a href="javascript:;" onClick="MM_openBrWindow('_wform_obsolete_all_patches.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','ObsoletePatches','resizable=yes,scrollbars=yes,width=500,height=800')" class="abtnItem">
                     <img src="images/abtn_obsolete_patch.gif" width="23" height="25" align="absmiddle" border="0" hspace="3" alt="Obsolete patches in one go.">
                     Roll-up Obsolete Patches
                  </a>
               </td>

               <%If objAccessControl.IsVisible("ReleasePatch") Then%>
                  <td align="center" nowrap valign="bottom">
                     <a href="javascript:;" onClick="MM_openBrWindow('_wform_make_release_bulk_patches.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','BulkReleasePatches','resizable=yes,scrollbars=yes,width=355,height=600')" class="abtnItem">
                        <img src="images/abtn_make_release_bulk_patches.gif" width="25" height="25" align="absmiddle" border="0" hspace="3" alt="Make Release patches in one go.">
                        Make Release Bulk Patches
                     </a>
                  </td>
               <%End If%>
            <%End If%>
         </tr>
      </table>

   <%Case "Release Notes"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <%If (pkgInfoHash.Item ("dlocked") = "Y") AND (InStr(pkgInfoHash.Item ("release_notes_info"),"MSG:") < 1) AND NOT IsNull(pkgInfoHash.Item ("release_notes_info")) Then%>
               <td align="center" nowrap valign="bottom">
                  <a href="<%=HTTP_PKG_ARCHIVE & pkgInfoHash.Item ("release_notes_info")%>" class="abtnItem">
                     <img src="images/btn_download.gif" width="22" height="22" align="absmiddle" border="0" hspace="3" alt="Download full release notes.">
                     Download
                  </a>
               </td>
            <%Else%>
               <td align="center" nowrap valign="bottom" class="abtnItem">
                  <img src="images/btn_download_off.gif" width="22" height="22" align="absmiddle" border="0" hspace="3">
                  <label disabled>
                     Download
                  </label>
               </td>
            <%End If%>
         </tr>
      </table>

   <%Case "Documentation"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom">
               <a href="javascript:;" onClick="MM_openBrWindow('_wform_import_docs.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','ImportDocs','resizable=yes,width=600,height=220')" class="abtnItem">
                  <img src="images/i_import_on.gif" width="22" height="22" align="absmiddle" border="0" hspace="3" title="Import document details from ERG document repository">
                  Import From Document Repository
               </a>
            </td>
         </tr>
      </table>

   <%Case "Add Process"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <%If (pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R")  Then%>
               <td align="center" nowrap valign="bottom">
                  <a href="javascript:;" onClick="MM_openBrWindow('wAddProc.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','ImportDocs','resizable=yes,width=800,height=500')" class="abtnItem">
                     <img src="icons/btn_add.gif" width="13" height="13" align="absmiddle" border="0" hspace="3" title="Insert processes associated with the package.">
                     Add Process
                  </a>
               </td>
            <%End If%>
         </tr>
      </table>

   <%Case "Add GBE_MACHTYPE"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom">
               <a href="javascript:;" onClick="MM_openBrWindow('wAddMachtype.asp','AddGBETYPE','resizable=yes,width=600,height=220')" class="abtnItem">
                  <img src="icons/btn_add.gif" width="13" height="13" align="absmiddle" border="0" hspace="3" title="Insert New GBE_MACHTYPE">
                  Add GBE_MACHTYPE
               </a>
            </td>
         </tr>
      </table>

   <%Case "Add Project Extension"%>
      <table width="10" border="0" cellspacing="0" ID="Table1">
         <tr>
            <td align="center" nowrap valign="bottom">
               <a href="javascript:;" onClick="MM_openBrWindow('wAddProjectExtension.asp','AddProjectExtension','resizable=yes,width=600,height=330')" class="abtnItem">
                  <img src="icons/btn_add.gif" width="13" height="13" align="absmiddle" border="0" hspace="3" title="Insert New Project Extension">
                  Add Project Extension
               </a>
            </td>
         </tr>
      </table>

   <%Case "Add Build Machine"%>
      <table width="10" border="0" cellspacing="10" ID="Table1">
         <tr>
            <td align="center" nowrap valign="bottom">
               <a href="javascript:;" onClick="MM_openBrWindow('wAddBuildMachine.asp','AddBuildMachine','resizable=yes,width=600,height=330')" class="abtnItem">
                  <img src="icons/btn_add.gif" width="13" height="13" align="absmiddle" border="0" hspace="3" title="Insert New Build Machine">
                  Add Build Machine
               </a>
            </td>
         </tr>
      </table>
      

   <%Case "Add Licence"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom">
               <!-- NOTE, width and height of this wAddLicence.asp window set such that RaiseMsg() window content fits ok -->
               <a href="javascript:;" onClick="MM_openBrWindow('wAddLicence.asp','AddLicence','resizable=yes,width=800,height=400')" class="abtnItem">
                  <img src="icons/btn_add.gif" width="13" height="13" align="absmiddle" border="0" hspace="3" title="Insert New Licence">
                  Add Licence
               </a>
            </td>
         </tr>
      </table>

   <%Case "Add Daemon"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom">
               <a href="javascript:;" onClick="MM_openBrWindow('wAddDaemon.asp?rtag_id=<%=parRtag_id%>','AddDaemon','resizable=yes,width=860,height=240')" class="abtnItem">
                  <img src="icons/btn_add.gif" width="13" height="13" align="absmiddle" border="0" hspace="3" title="Insert New Daemon">
                  Add Daemon
               </a>
            </td>
         </tr>
      </table>

   <%Case "Add Schedule"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom">
               <a href="javascript:;" onClick="MM_openBrWindow('wAddSchedule.asp','AddSchedule','resizable=yes,width=450,height=270')" class="abtnItem">
                  <img src="icons/btn_add.gif" width="13" height="13" align="absmiddle" border="0" hspace="3" title="Insert New Schedule">
                  Add Schedule
               </a>
            </td>
         </tr>
      </table>
   <%Case "Add Schedule Disable"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom" class="abtnItem">
              <img src="icons/btn_add_dis.gif" width="13" height="13" align="absmiddle" border="0" hspace="3">
              Add Schedule
            </td>
         </tr>
      </table>

   <%Case "Indefinite Pause"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom">
               <a href="_setInfinitePause.asp" class="abtnItem">
                  <img src="icons/tpause.gif" width="16" height="16" align="absmiddle" border="0" hspace="3" title="Indefinite Pause">
                  Set Indefinite Pause
               </a>
            </td>
         </tr>
      </table>
   <%Case "Indefinite Pause Disable"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom"  class="abtnItem">
              <img src="icons/tpause_dis.gif" width="16" height="16" align="absmiddle" border="0" hspace="3">
              Set Indefinite Pause
            </td>
         </tr>
      </table>

   <%Case "Resume"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom">
               <a href="_setResume.asp" class="abtnItem">
                  <img src="icons/tplay.gif" width="16" height="16" align="absmiddle" border="0" hspace="3" title="Resume">
                  Set Resume
            </td>
         </tr>
      </table>
   <%Case "Resume Disable"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom" class="abtnItem">
              <img src="icons/tplay_dis.gif" width="16" height="16" align="absmiddle" border="0" hspace="3">
              Set Resume
            </td>
         </tr>
      </table>

   <%Case "Daemon Start"%>
      <table border="0" cellspacing="0" cellpadding="0">
         <tr>
            <td valign=top>
               <img src="icons/tstopped.gif" width="16" height="16" border="0" vspace=10 hspace="5" title="Disabled">
            </td>
            <td valign=top>
               <a href="_setDaemonResume.asp?rcon_id=<%=rcon_id%>&rtag_id=<%=parRtagId%>" class="abtnItem">
                 <img src="icons/tplay.gif" width="16" height="16" border="0" vspace=10 hspace="0" title="Enable Daemon">
               </a>
            </td>
            <td valign=top>
               <img src="icons/tpause_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            </td>
            <td valign=top>
               <img src="icons/tstop_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            </td>
         </tr>
      </table>

   <%Case "Daemon Start Disabled"%>
      <table border="0" cellspacing="0" cellpadding="0">
         <tr>
            <td valign=top>
               <img src="icons/tstopped.gif" width="16" height="16" border="0" vspace=10 hspace="5" title="Disabled">
            <td valign=top>
               <img src="icons/tplay_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            <td valign=top>
               <img src="icons/tpause_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            <td valign=top>
               <img src="icons/tstop_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            </td>
         </tr>
      </table>

   <%Case "Daemon Pause"%>
      <table border="0" cellspacing="0" cellpadding="0">
         <tr>
            <td valign=top>
               <img src="icons/tplayed.gif" width="16" height="16" border="0" vspace=10 hspace="5" title="Enabled">
            </td>
            <td valign=top>
               <img src="icons/tplay_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            </td>
            <td valign=top>
               <a href="_setDaemonPause.asp?rcon_id=<%=rcon_id%>&rtag_id=<%=parRtagId%>" class="abtnItem">
               <img src="icons/tpause.gif" width="16" height="16" border="0" vspace=10 hspace="0" title="Pause Daemon">
               </a>
            </td>
            <td valign=top>
               <a href="_setDaemonDisable.asp?rcon_id=<%=rcon_id%>&rtag_id=<%=parRtagId%>" class="abtnItem">
               <img src="icons/tstop.gif" width="16" height="16" border="0" vspace=10 hspace="0" title="Disable Daemon">
               </a>
            </td>
         </tr>
      </table>

   <%Case "Daemon Pause Disabled"%>
      <table border="0" cellspacing="0" cellpadding="0">
         <tr>
            <td valign=top>
               <img src="icons/tplayed.gif" width="16" height="16" border="0" vspace=10 hspace="5" title="Enabled">
            </td>
            <td valign=top>
               <img src="icons/tplay_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            </td>
            <td valign=top>
               <img src="icons/tpause_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            </td>
            <td valign=top>
               <img src="icons/tstop_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            </td>
         </tr>
      </table>

   <%Case "Daemon Resume"%>
      <table border="0" cellspacing="0" cellpadding="0">
         <tr>
            <td valign=top>
               <img src="icons/tpaused.gif" width="16" height="16" border="0" vspace=10 hspace="5" title="Paused">
            </td>
            <td valign=top>
               <a href="_setDaemonResume.asp?rcon_id=<%=rcon_id%>&rtag_id=<%=parRtagId%>" class="abtnItem">
               <img src="icons/tplay.gif" width="16" height="16" border="0" vspace=10 hspace="0" title="Resume Daemon">
               </a>
            </td>
            <td valign=top>
               <img src="icons/tpause_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            </td>
            <td valign=top>
               <a href="_setDaemonDisable.asp?rcon_id=<%=rcon_id%>&rtag_id=<%=parRtagId%>" class="abtnItem">
               <img src="icons/tstop.gif" width="16" height="16" border="0" vspace=10 hspace="0" title="Disable Daemon">
               </a>
            </td>
         </tr>
      </table>

   <%Case "Daemon Resume Disabled"%>
      <table border="0" cellspacing="0" cellpadding="0">
         <tr>
            <td valign=top>
               <img src="icons/tpaused.gif" width="16" height="16" border="0" vspace=10 hspace="5" title="Paused">
            </td>
            <td valign=top>
               <img src="icons/tplay_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            </td>
            <td valign=top>
               <img src="icons/tpause_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            </td>
            <td valign=top>
               <img src="icons/tstop_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0">
            </td>
         </tr>
      </table>

   <%Case "Daemon Control All"%>
      <table border="0" cellspacing="0" cellpadding="0">
         <tr>
            <td valign=top>
               <img src=icons/tpaused.gif width="16" height="16" border="0" vspace=10 hspace="5" style="visibility:hidden">
            </td>
            <td valign=top>
               <a href="_setDaemonResume.asp?rtag_id=<%=parRtagId%>">
                 <img src="icons/tplay.gif" width="16" height="16" border="0" vspace=10 hspace="0" title="Enable Daemons">
               </a>
            </td>
            <td valign=top>
               <a href="_setDaemonPause.asp?rtag_id=<%=parRtagId%>">
                 <img src="icons/tpause.gif" width="16" height="16" border="0" vspace=10 hspace="0" title="Pause Daemons">
               </a>
            </td>
            <td valign=top>
               <a href="_setDaemonDisable.asp?rtag_id=<%=parRtagId%>">
                 <img src="icons/tstop.gif" width="16" height="16" border="0" vspace=10 hspace="0" title="Disable Daemons">
               </a>
            </td>
         </tr>
      </table>
   <%Case "Daemon Control All Disabled"%>
      <table border="0" cellspacing="0" cellpadding="0">
         <tr>
            <td valign=top>
               <img src=icons/tpaused.gif width="16" height="16" border="0" vspace=10 hspace="5" style="visibility:hidden">
            </td>
            <td valign=top>
               <img src="icons/tplay_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0" title="Enable Daemons">
            </td>
            <td valign=top>
               <img src="icons/tpause_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0" title="Pause Daemons">
            </td>
            <td valign=top>
               <img src="icons/tstop_dis.gif" width="16" height="16" border="0" vspace=10 hspace="0" title="Disable Daemons">
            </td>
         </tr>
      </table>

   <%Case "Add VCS"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom">
               <!-- NOTE, width and height of this wAddVCS.asp window set such that RaiseMsg() window content fits ok -->
               <a href="javascript:;" onClick="MM_openBrWindow('wAddVCS.asp','AddVCS','resizable=yes,width=800,height=400')" class="abtnItem">
                  <img src="icons/btn_add.gif" width="13" height="13" align="absmiddle" border="0" hspace="3" title="Insert New VCS">
                  Add VCS
               </a>
            </td>
         </tr>
      </table>

   <%Case "Add Daemon Instruction"%>
      <table width="10" border="0" cellspacing="10">
         <tr>
            <td align="center" nowrap valign="bottom">
               <a href="javascript:;" onClick="MM_openBrWindow('wAddDaemonInstruction.asp','AddDaemonInstruction','resizable=yes,width=800,height=350')" class="abtnItem">
                  <img src="icons/btn_add.gif" width="13" height="13" align="absmiddle" border="0" hspace="3" title="Insert New Daemon Instruction">
                  Add Daemon Instruction
               </a>
            </td>
         </tr>
      </table>

   <%End Select%>
<%End Sub%>