Subversion Repositories DevTools

Rev

Rev 6786 | Rev 6790 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
119 ghuddy 1 
<%
2 
'=====================================================
127 ghuddy 3 
'               Action Buttons
119 ghuddy 4 
'=====================================================
5983 dpurdie 5 
Sub Action_Buttons ( SSwithTab )
6 
    Call Action_Buttons_State(SSwithTab, TRUE)
7 
End Sub
8 
 
9 
Sub Action_Buttons_State ( SSwithTab, bState )
6786 dpurdie 10 
   Dim isClosed, isSDK, isActive
5178 dpurdie 11 
   isClosed = (releaseIsClosed(ReleaseMode))
6786 dpurdie 12 
   isActive = TRUE
6788 dpurdie 13 
 
4084 dpurdie 14 
   Select Case SSwithTab%>
127 ghuddy 15 
   <%Case "Build Dependencies"%>
16 
      <table width="10" border="0" cellspacing="10">
17 
         <tr>
6786 dpurdie 18 
            <%  isActive = NOT isClosed AND NOT pkgInfoHash.Item ("is_sdkpkg") AND ( (pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R") OR criticalSectionIsEditable )
6788 dpurdie 19 
                BuildActionButtonLink isActive, "Add", "Add dependency to the list.", _
6786 dpurdie 20 
                                         "src='images/i_add_deps.gif' width='22' height='25' align='absmiddle' border='0' hspace='3'", _
21 
                                         "form_search_pkgs.asp?pv_id=" & parPv_id & "&rtag_id=" & parRtag_id & "&add_type=" & enum_ADD_DEPENDENCIES
127 ghuddy 22 
 
6788 dpurdie 23 
                BuildActionButtonLink isActive, "Edit", "Edit dependency list.", _
6786 dpurdie 24 
                                         "src='images/i_edit_deps.gif' width='23' height='24' align='absmiddle' border='0' hspace='3'", _
25 
                                         "form_edit_deps.asp?pv_id=" & parPv_id & "&rtag_id=" & parRtag_id
127 ghuddy 26 
 
6788 dpurdie 27 
                BuildActionButtonLink isActive, "Import", "Import dependency list from your build file.", _
6786 dpurdie 28 
                                         "src='images/i_import_on.gif' width='22' height='22' align='absmiddle' border='0' hspace='3'", _
29 
                                         "form_update_"&Get_Devl_Environment&"_dependencies.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id
30 
 
6788 dpurdie 31 
                BuildActionButtonLink TRUE, "Export", "Export this dependency list to be used in your build file.", _
6786 dpurdie 32 
                                         "src='images/i_export_on.gif' width='22' height='22' align='absmiddle' border='0' hspace='3'", _
33 
                                         "form_export_"&Get_Devl_Environment&"_dependencies.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id%>
127 ghuddy 34 
         </tr>
35 
      </table>
36 
 
119 ghuddy 37 
   <%Case "Runtime Dependencies"%>
127 ghuddy 38 
         <table width="10" border="0" cellspacing="10">
39 
            <tr>
6786 dpurdie 40 
                <%isActive = IsNull(pkgInfoHash.Item ("is_patch")) AND NOT isClosed AND ((pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R") OR criticalSectionIsEditable)
41 
                  BuildActionButton isActive, "Add", "Add runtime dependency to the list.", _
42 
                                         "src='images/i_add_deps.gif' width='22' height='25' align='absmiddle' border='0' hspace='3'", _
43 
                                         "form_search_pkgs.asp?pv_id=" & parPv_id & "&rtag_id=" & parRtag_id & "&add_type=" & enum_ADD_RUNTIME_DEPENDENCIES%>
127 ghuddy 44 
            </tr>
45 
         </table>
6788 dpurdie 46 
<!-- Not currently used -->
47 
<!-- <%Case "Used By"%> -->
48 
<!--     <table width="10" border="0" cellspacing="10">                                                                                        -->
49 
<!--        <tr>                                                                                                                               -->
50 
<!--            isActive = IsNull(pkgInfoHash.Item ("is_patch"))                                                                             -->
51 
<!--              BuildActionButton isActive, "Show All", "Show the complete list packages that use this package", _                           -->
52 
<!--                                     "src='images/i_used_by_large.gif' width='22' height='25' align='absmiddle' border='0' hspace='3'", _  -->
53 
<!--                                     "used_by_all.asp?pv_id=" & parPv_id & "&rtag_id=" & parRtag_id                                      -->
54 
<!--                                                                                                                                           -->
55 
<!--              BuildActionButton isActive, "Show All Depends", "Show the complete list packages that are requred to build this package", _-->
56 
<!--                                     "src='images/i_used_by_large.gif' width='22' height='25' align='absmiddle' border='0' hspace='3'", _  -->
57 
<!--                                     "dependencies_all.asp?pv_id=" & parPv_id & "&rtag_id=" & parRtag_id                                 -->
58 
<!--        </tr>                                                                                                                              -->
59 
<!--     </table>                                                                                                                              -->
127 ghuddy 60 
 
119 ghuddy 61 
   <%Case "Patches"%>
127 ghuddy 62 
      <table width="10" border="0" cellspacing="10">
63 
         <tr>
6788 dpurdie 64 
            <%If NOT isClosed AND NOT pkgInfoHash.Item ("is_sdkpkg") AND (pkgInfoHash.Item ("dlocked") = "Y") Then
127 ghuddy 65 
 
6788 dpurdie 66 
                BuildActionButtonClick TRUE, "Add", "Add a patch to this package.", FALSE, _
67 
                                             "src='images/i_add_patch.gif' width='23' height='25' align='absmiddle' border='0' hspace='3'", _
68 
                                             "MM_openVixIFrame('_wform_new_patch.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"','New Patch')"
127 ghuddy 69 
 
6788 dpurdie 70 
                BuildActionButtonClick TRUE, "Roll-up Obsolete Patches", "Obsolete patches in one go.", FALSE, _
71 
                                             "src='images/abtn_obsolete_patch.gif' width='23' height='25' align='absmiddle' border='0' hspace='3'", _
72 
                                             "MM_openVixIFrame('_wform_obsolete_all_patches.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"','Obsolete Patches')"
73 
 
74 
               If canShowControlInProject("ReleasePatch") Then
75 
                    BuildActionButtonClick isActive, "Make Release Bulk Patches", "Make Release patches in one go.", FALSE, _
76 
                                             "src='images/abtn_make_release_bulk_patches.gif' width='23' height='25' align='absmiddle' border='0' hspace='3'", _
77 
                                             "MM_openVixIFrame('_wform_make_release_bulk_patches.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"','Bulk Patch Release')"
78 
               End If
79 
            End If%>
127 ghuddy 80 
         </tr>
81 
      </table>
82 
 
119 ghuddy 83 
   <%Case "Release Notes"%>
127 ghuddy 84 
      <table width="10" border="0" cellspacing="10">
85 
         <tr>
6786 dpurdie 86 
            <%
87 
                IsActive = (pkgInfoHash.Item ("dlocked") = "Y") AND (InStr(pkgInfoHash.Item ("release_notes_info"),"MSG:") < 1) AND NOT IsNull(pkgInfoHash.Item ("release_notes_info"))
6788 dpurdie 88 
                BuildActionButtonLink isActive, "Download", "Download full release notes.", _
6786 dpurdie 89 
                                             "src='images/btn_download.gif' width='22' height='22' align='absmiddle' border='0' hspace='3'", _
90 
                                             HTTP_PKG_ARCHIVE & pkgInfoHash.Item ("release_notes_info")
91 
 
92 
                IsActive = canActionControlInProject("EditCriticalInfoForLockedPackage") AND NOT isClosed AND ((pkgInfoHash.Item ("dlocked") = "Y") AND (pkgInfoHash.Item ("release_notes_info") <> enum_RELEASE_NOTES_NOT_FOUND_IN_ARCHIVE))
6788 dpurdie 93 
                BuildActionButton isActive, "Regenerate Notes", "Regenerate Release Notes.", _
6786 dpurdie 94 
                                             "src='images/i_sync_on.gif' width='22' height='22' align='absmiddle' border='0' hspace='3'", _
95 
                                             "fixed_issues.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"&resetNotes=1"%>
127 ghuddy 96 
         </tr>
97 
      </table>
98 
 
119 ghuddy 99 
   <%Case "Documentation"%>
127 ghuddy 100 
      <table width="10" border="0" cellspacing="10">
101 
         <tr>
6786 dpurdie 102 
          <%
103 
            IsActive = (NOT isClosed AND NOT isSDK) OR canActionControlInProject("EditCriticalInfoForLockedPackage")
104 
            BuildActionButtonClick isActive, "Import From Document Repository", "Import document details from ERG document repository.",FALSE, _
105 
                                        "src='images/i_import_on.gif' width='22' height='22' align='absmiddle' border='0' hspace='3'", _
106 
                                        "MM_openVixIFrame('_wform_import_docs.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"','Import Documents')"%>
127 ghuddy 107 
         </tr>
108 
      </table>
109 
 
119 ghuddy 110 
   <%Case "Add Process"%>
127 ghuddy 111 
      <table width="10" border="0" cellspacing="10">
112 
         <tr>
6786 dpurdie 113 
            <%  isActive = NOT isClosed AND ((pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R"))
114 
                BuildActionButtonClick isActive, "Add Process", "Insert processes associated with the package.",FALSE, _
115 
                                        "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
116 
                                        "MM_openVixIFrame('wAddProc.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"','Add Process')"%>
127 ghuddy 117 
         </tr>
118 
      </table>
119 ghuddy 119 
 
127 ghuddy 120 
   <%Case "Add GBE_MACHTYPE"%>
4029 dpurdie 121 
      <table width="10" border="0" cellspacing="0">
127 ghuddy 122 
         <tr>
6786 dpurdie 123 
            <%BuildActionButtonClick bState, "Add", "Insert New GBE_MACHTYPE.",TRUE, _
124 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
125 
                                     "MM_openVixIFrame('wAddMachtype.asp','Add Machine Type')"%>
127 ghuddy 126 
         </tr>
127 
      </table>
119 ghuddy 128 
 
5122 dpurdie 129 
   <%Case "Add GBE_BUILDSTANDARD"%>
130 
      <table width="10" border="0" cellspacing="0">
131 
         <tr>
6786 dpurdie 132 
            <%BuildActionButtonClick bState, "Add", "Insert New Build Standard.",TRUE, _
133 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
134 
                                     "MM_openVixIFrame('wAddBuildStandard.asp','Add Build Standard')"%>
5122 dpurdie 135 
         </tr>
136 
      </table>
137 
 
138 
 
4029 dpurdie 139 
   <%Case "Add BM_NAME"%>
140 
      <table width="10" border="0" cellspacing="0">
141 
         <tr>
6786 dpurdie 142 
            <%BuildActionButtonClick isActive, "Add", "Insert New BM_NAME.",TRUE, _
143 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
144 
                                     "MM_openVixIFrame('wAddMachclass.asp','Add New Class of Build Machine')"%>
4029 dpurdie 145 
         </tr>
146 
      </table>
147 
 
3959 dpurdie 148 
   <%Case "Add Project Extension"%>
5983 dpurdie 149 
      <table width="100%" border="0" cellspacing="0" ID="Table1">
3959 dpurdie 150 
         <tr>
6786 dpurdie 151 
            <%BuildActionButtonClick bState, "Add Project Extension", "Insert New Project Extension",TRUE, _
152 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
153 
                                     "MM_openVixIFrame('wAddProjectExtension.asp','Add Project Extension')"%>
3959 dpurdie 154 
         </tr>
155 
      </table>
156 
 
161 iaugusti 157 
   <%Case "Add Build Machine"%>
4029 dpurdie 158 
      <table width="10" border="0" cellspacing="0" ID="Table1">
161 iaugusti 159 
         <tr>
6786 dpurdie 160 
            <%BuildActionButtonClick bState, "Add Build Machine", "Insert New Build Machine",TRUE, _
161 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
162 
                                     "MM_openVixIFrame('wAddBuildMachine.asp','Add Build Machine')"%>
161 iaugusti 163 
         </tr>
164 
      </table>
165 
 
6770 dpurdie 166 
   <%Case "Add Package Replica"%>
167 
      <table width="10" border="0" cellspacing="0" ID="Table1">
168 
         <tr>
6786 dpurdie 169 
            <%BuildActionButtonClick bState, "Add Package Replica", "Insert New Package Replica.", TRUE, _
170 
                                        "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
171 
                                        "MM_openVixIFrame('wAddPkgReplica.asp','Add Package Replica')"%>
6770 dpurdie 172 
         </tr>
173 
      </table>
174 
 
127 ghuddy 175 
   <%Case "Add Licence"%>
5983 dpurdie 176 
      <table width="100%" border="0" cellspacing="0">
127 ghuddy 177 
         <tr>
6786 dpurdie 178 
            <%BuildActionButtonClick bState, "Add Licence", "Insert New Licence",TRUE, _
179 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
180 
                                     "MM_openVixIFrame('wAddLicence.asp','Add Licence')"%>
127 ghuddy 181 
         </tr>
182 
      </table>
183 
 
5983 dpurdie 184 
   <%Case "Add VCS"%>
185 
      <table width="100%" border="0" cellspacing="0">
186 
         <tr>
6786 dpurdie 187 
            <%BuildActionButtonClick bState, "Add VCS", "Insert New VCS",TRUE, _
188 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
189 
                                     "MM_openVixIFrame('wAddVCS.asp','Add New VCS')"%>
5983 dpurdie 190 
         </tr>
191 
      </table>
192 
 
127 ghuddy 193 
   <%Case "Add Daemon"%>
194 
      <table width="10" border="0" cellspacing="10">
195 
         <tr>
6786 dpurdie 196 
            <%BuildActionButtonClick bState, "Add Daemon", "Insert New Daemon",TRUE, _
197 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
198 
                                     "MM_openVixIFrame('wAddDaemon.asp?rtag_id="&parRtag_id&"','Add Build Daemon')"%>
127 ghuddy 199 
         </tr>
200 
      </table>
201 
 
202 
   <%Case "Add Schedule"%>
5123 dpurdie 203 
      <table width="10" border="0" cellspacing="0">
127 ghuddy 204 
         <tr>
6786 dpurdie 205 
            <%BuildActionButtonClick bState, "Add Schedule", "Insert New Schedule",TRUE, _
206 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
207 
                                     "MM_openVixIFrame('wAddSchedule.asp','Add a new Schedule')" %>
127 ghuddy 208 
         </tr>
209 
      </table>
210 
 
211 
   <%Case "Indefinite Pause"%>
5123 dpurdie 212 
      <table width="10" border="0" cellspacing="0">
127 ghuddy 213 
         <tr>
6786 dpurdie 214 
            <%BuildActionButtonClick bState, "Set Indefinite Pause", "Indefinite Pause",TRUE, _
215 
                                     "src='icons/tpause.gif' width='16' height='16' align='absmiddle' border='0' hspace='3'", _
216 
                                     "location.href='_setInfinitePause.asp';" %>
127 ghuddy 217 
         </tr>
218 
      </table>
219 
 
220 
   <%Case "Resume"%>
5157 dpurdie 221 
      <table width="10" border="0" cellspacing="0">
127 ghuddy 222 
         <tr>
6786 dpurdie 223 
            <%BuildActionButtonClick bState, "Set Resume", "Resume Processing",TRUE, _
224 
                                     "src='icons/tplay.gif' width='16' height='16' align='absmiddle' border='0' hspace='3'", _
225 
                                     "location.href='_setResume.asp';" %>
171 brianf 226 
         </tr>
227 
      </table>
5982 dpurdie 228 
 
6788 dpurdie 229 
   <%Case "Add Daemon Instruction"%>
230 
      <table width="10" border="0" cellspacing="10">
231 
         <tr>
232 
            <%BuildActionButtonClick bState, "Add Daemon Instruction", "Insert New Daemon Instruction.", TRUE, _
233 
                                        "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
234 
                                        "MM_openVixIFrame('wAddDaemonInstruction.asp','Insert New Daemon Instruction')"%>
235 
         </tr>
236 
      </table>
237 
 
171 brianf 238 
   <%Case "Daemon Start"%>
173 brianf 239 
      <table border="0" cellspacing="0" cellpadding="0">
6786 dpurdie 240 
         <!-- Daemon Start -->
171 brianf 241 
         <tr>
173 brianf 242 
            <td valign=top>
5623 dpurdie 243 
               <img src="icons/tstopped.gif" width="16" height="16" border="0" vspace=2 hspace="5" title="Disabled">
173 brianf 244 
            </td>
6788 dpurdie 245 
            <%BuildActionButtonClick bState, "", "Enable Daemon", FALSE, _
6786 dpurdie 246 
                                     "src='icons/tplay.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 247 
                                     "location.href='_setDaemonResume.asp?rcon_id="&rcon_id&"&rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
127 ghuddy 248 
 
6786 dpurdie 249 
            <%BuildActionButton FALSE, "", "Pause Daemon", "src='icons/tpause.gif' width='16' height='16' border='0' vspace='2' hspace='0'",""%>
250 
 
251 
            <%BuildActionButton FALSE, "", "Disable Daemon", "src='icons/tstop.gif' width='16' height='16' border='0' vspace='2' hspace='0'",""%>
171 brianf 252 
         </tr>
253 
      </table>
254 
 
127 ghuddy 255 
   <%Case "Daemon Pause"%>
173 brianf 256 
      <table border="0" cellspacing="0" cellpadding="0">
6786 dpurdie 257 
         <!-- Daemon Pause -->
127 ghuddy 258 
         <tr>
173 brianf 259 
            <td valign=top>
5623 dpurdie 260 
               <img src="icons/tplayed.gif" width="16" height="16" border="0" vspace=2 hspace="5" title="Enabled">
173 brianf 261 
            </td>
6786 dpurdie 262 
            <%BuildActionButton FALSE, "", "Enable Daemon", "src='icons/tplay.gif' width='16' height='16' border='0' vspace='2' hspace='0'", ""%>
127 ghuddy 263 
 
6788 dpurdie 264 
            <%BuildActionButtonClick bState, "", "Pause Daemon", FALSE, _
6786 dpurdie 265 
                                     "src='icons/tpause.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 266 
                                     "location.href='_setDaemonPause.asp?rcon_id="&rcon_id&"&rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
6786 dpurdie 267 
 
6788 dpurdie 268 
            <%BuildActionButtonClick bState, "", "Disable Daemon", FALSE, _
6786 dpurdie 269 
                                     "src='icons/tstop.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 270 
                                     "location.href='_setDaemonDisable.asp?rcon_id="&rcon_id&"&rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
127 ghuddy 271 
         </tr>
272 
      </table>
273 
 
274 
   <%Case "Daemon Resume"%>
173 brianf 275 
      <table border="0" cellspacing="0" cellpadding="0">
6786 dpurdie 276 
         <!-- Daemon Resume -->
127 ghuddy 277 
         <tr>
173 brianf 278 
            <td valign=top>
5623 dpurdie 279 
               <img src="icons/tpaused.gif" width="16" height="16" border="0" vspace=2 hspace="5" title="Paused">
173 brianf 280 
            </td>
6788 dpurdie 281 
            <%BuildActionButtonClick bState, "", "Enable Daemon", FALSE, _
6786 dpurdie 282 
                                     "src='icons/tplay.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 283 
                                     "location.href='_setDaemonResume.asp?rcon_id="&rcon_id&"&rtag_id="&parRtagId&"&rfile="&scriptName &"'"%>
127 ghuddy 284 
 
6786 dpurdie 285 
            <%BuildActionButton FALSE, "", "Pause Daemon", "src='icons/tpause.gif' width='16' height='16' border='0' vspace='2' hspace='0'",""%>
286 
 
6788 dpurdie 287 
            <%BuildActionButtonClick bState, "", "Disable Daemon", FALSE, _
6786 dpurdie 288 
                                     "src='icons/tstop.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 289 
                                     "location.href='_setDaemonDisable.asp?rcon_id="&rcon_id&"&rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
127 ghuddy 290 
         </tr>
291 
      </table>
292 
 
171 brianf 293 
   <%Case "Daemon Control All"%>
173 brianf 294 
      <table border="0" cellspacing="0" cellpadding="0">
6788 dpurdie 295 
         <!-- Daemon Control All -->
171 brianf 296 
         <tr>
173 brianf 297 
            <td valign=top>
5623 dpurdie 298 
               <img src=icons/tpaused.gif width="16" height="16" border="0" vspace=2 hspace="5" style="visibility:hidden">
173 brianf 299 
            </td>
6788 dpurdie 300 
            <%BuildActionButtonClick bState, "", "Enable Daemons", FALSE, _
6786 dpurdie 301 
                                     "src='icons/tplay.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 302 
                                     "location.href='_setDaemonResume.asp?rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
5983 dpurdie 303 
 
6788 dpurdie 304 
            <%BuildActionButtonClick bState, "", "Pause Daemons", FALSE, _
6786 dpurdie 305 
                                     "src='icons/tpause.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 306 
                                     "location.href='_setDaemonPause.asp?rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
6786 dpurdie 307 
 
6788 dpurdie 308 
            <%BuildActionButtonClick bState, "", "Disable Daemons", FALSE, _
6786 dpurdie 309 
                                     "src='icons/tstop.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 310 
                                     "location.href='_setDaemonDisable.asp?rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
171 brianf 311 
         </tr>
312 
      </table>
313 
 
6267 dpurdie 314 
   <%Case "Daemon Unavailable"%>
315 
      <table border="0" cellspacing="0" cellpadding="0">
6786 dpurdie 316 
         <!-- Daemon StartUnavailable -->
6267 dpurdie 317 
         <tr>
318 
            <td valign=top>
319 
               <img src=icons/tpaused_notfound.gif width="16" height="16" border="0" vspace=2 hspace="5">
320 
            </td>
6786 dpurdie 321 
            <%BuildActionButton FALSE, "", "Enable Daemons",  "src='icons/tplay.gif' width='16' height='16' border='0' vspace='2' hspace='0'", ""%>
322 
            <%BuildActionButton FALSE, "", "Pause Daemons",   "src='icons/tpause.gif' width='16' height='16' border='0' vspace='2' hspace='0'",""%>
323 
            <%BuildActionButton FALSE, "", "Disable Daemons", "src='icons/tstop.gif' width='16' height='16' border='0' vspace='2' hspace='0'","" %>
6267 dpurdie 324 
         </tr>
325 
      </table>
326 
 
119 ghuddy 327 
   <%End Select%>
328 
<%End Sub%>
6786 dpurdie 329 
<%
330 
'------------------------------------------------------------------------------
331 
'   Helper routine to create buttons and disabled buttons
6788 dpurdie 332 
'   Treat the action an href - link the user can see and potentiall open in another tab
6786 dpurdie 333 
'
6788 dpurdie 334 
Sub BuildActionButtonLink(bState, sText, sTitle, sImage, sRef)
6786 dpurdie 335 
 %>
336 
<td align="center" nowrap valign="bottom" title="<%=sTitle%>">
337 
    <%If bState Then%>
338 
    <a href="<%=sRef%>" class="abtnItem"><img <%=sImage%> ><%=sText%></a>
339 
    <%Else%>
340 
    <span class="abtnItemDis"><img <%=sImage%> class="lessOpacity"><%=sText%></span>
341 
    <%End If%>
342 
</td>
343 
<%End Sub
344 
'------------------------------------------------------------------------------
345 
'   Helper routine to create buttons and disabled buttons
6788 dpurdie 346 
'   Treat te ref as a page to goto, but don't use href
347 
'
348 
Sub BuildActionButton(bState, sText, sTitle, sImage, sRef)
349 
 %>
350 
<td align="center" nowrap valign="bottom" title="<%=sTitle%>">
351 
    <%If bState Then%>
352 
    <span onClick="location.href='<%=sRef%>'" class="pointer abtnItem"><img <%=sImage%> ><%=sText%></span>
353 
    <%Else%>
354 
    <span class="abtnItemDis"><img <%=sImage%> class="lessOpacity"><%=sText%></span>
355 
    <%End If%>
356 
</td>
357 
<%End Sub
358 
'------------------------------------------------------------------------------
359 
'   Helper routine to create buttons and disabled buttons
6786 dpurdie 360 
'   Tack a onClick operation
361 
'
362 
Sub BuildActionButtonClick(bState, sText, sTitle, isBlue, sImage, sClick)
363 
 Dim sStyle : sStyle = ""
364 
 %>
365 
<td align="right" nowrap valign="bottom" title="<%=sTitle%>">
366 
    <%If bState Then%>
367 
    <%If isBlue Then sStyle = "color:#0000ee; text-decoration:underline"%>
368 
    <span onClick="<%=sClick%>" class="pointer abtnItem"  style="<%=sStyle%>"><img <%=sImage%> ><%=sText%></span>
369 
    <%Else%>
370 
    <%If isBlue Then sStyle = "color:#0000ee66; text-decoration:none"%>
371 
    <span class="abtnItemDis" style="<%=sStyle%>"><img <%=sImage%> class="lessOpacity"><%=sText%></span>
372 
    <%End If%>
373 
</td>
374 
<%End Sub%>
375 
 
376