Subversion Repositories DevTools

Rev

Rev 6827 | Rev 7245 | 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"%>
6790 dpurdie 38 
         <!-- Runtime Dependencies -->
127 ghuddy 39 
         <table width="10" border="0" cellspacing="10">
40 
            <tr>
6786 dpurdie 41 
                <%isActive = IsNull(pkgInfoHash.Item ("is_patch")) AND NOT isClosed AND ((pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R") OR criticalSectionIsEditable)
42 
                  BuildActionButton isActive, "Add", "Add runtime dependency to the list.", _
43 
                                         "src='images/i_add_deps.gif' width='22' height='25' align='absmiddle' border='0' hspace='3'", _
44 
                                         "form_search_pkgs.asp?pv_id=" & parPv_id & "&rtag_id=" & parRtag_id & "&add_type=" & enum_ADD_RUNTIME_DEPENDENCIES%>
127 ghuddy 45 
            </tr>
46 
         </table>
6790 dpurdie 47 
         <!-- END Runtime Dependencies -->
127 ghuddy 48 
 
6790 dpurdie 49 
     <%' Not currently used %>
50 
     <%Case "Used By"%>
51 
         <table width="10" border="0" cellspacing="10">
52 
            <tr>
53 
                <%isActive = IsNull(pkgInfoHash.Item ("is_patch"))
54 
                  BuildActionButton isActive, "Show All", "Show the complete list packages that use this package", _
55 
                                         "src='images/i_used_by_large.gif' width='22' height='25' align='absmiddle' border='0' hspace='3'", _
56 
                                         "used_by_all.asp?pv_id=" & parPv_id & "&rtag_id=" & parRtag_id
57 
 
58 
                  BuildActionButton isActive, "Show All Depends", "Show the complete list packages that are requred to build this package", _
59 
                                         "src='images/i_used_by_large.gif' width='22' height='25' align='absmiddle' border='0' hspace='3'", _
60 
                                         "dependencies_all.asp?pv_id=" & parPv_id & "&rtag_id=" & parRtag_id%>
61 
            </tr>
62 
         </table>
63 
 
119 ghuddy 64 
   <%Case "Patches"%>
127 ghuddy 65 
      <table width="10" border="0" cellspacing="10">
66 
         <tr>
6788 dpurdie 67 
            <%If NOT isClosed AND NOT pkgInfoHash.Item ("is_sdkpkg") AND (pkgInfoHash.Item ("dlocked") = "Y") Then
127 ghuddy 68 
 
6788 dpurdie 69 
                BuildActionButtonClick TRUE, "Add", "Add a patch to this package.", FALSE, _
70 
                                             "src='images/i_add_patch.gif' width='23' height='25' align='absmiddle' border='0' hspace='3'", _
71 
                                             "MM_openVixIFrame('_wform_new_patch.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"','New Patch')"
127 ghuddy 72 
 
6788 dpurdie 73 
                BuildActionButtonClick TRUE, "Roll-up Obsolete Patches", "Obsolete patches in one go.", FALSE, _
74 
                                             "src='images/abtn_obsolete_patch.gif' width='23' height='25' align='absmiddle' border='0' hspace='3'", _
75 
                                             "MM_openVixIFrame('_wform_obsolete_all_patches.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"','Obsolete Patches')"
76 
 
77 
               If canShowControlInProject("ReleasePatch") Then
78 
                    BuildActionButtonClick isActive, "Make Release Bulk Patches", "Make Release patches in one go.", FALSE, _
79 
                                             "src='images/abtn_make_release_bulk_patches.gif' width='23' height='25' align='absmiddle' border='0' hspace='3'", _
80 
                                             "MM_openVixIFrame('_wform_make_release_bulk_patches.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"','Bulk Patch Release')"
81 
               End If
82 
            End If%>
127 ghuddy 83 
         </tr>
84 
      </table>
85 
 
119 ghuddy 86 
   <%Case "Release Notes"%>
127 ghuddy 87 
      <table width="10" border="0" cellspacing="10">
88 
         <tr>
6786 dpurdie 89 
            <%
90 
                IsActive = (pkgInfoHash.Item ("dlocked") = "Y") AND (InStr(pkgInfoHash.Item ("release_notes_info"),"MSG:") < 1) AND NOT IsNull(pkgInfoHash.Item ("release_notes_info"))
6788 dpurdie 91 
                BuildActionButtonLink isActive, "Download", "Download full release notes.", _
6786 dpurdie 92 
                                             "src='images/btn_download.gif' width='22' height='22' align='absmiddle' border='0' hspace='3'", _
93 
                                             HTTP_PKG_ARCHIVE & pkgInfoHash.Item ("release_notes_info")
94 
 
95 
                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 96 
                BuildActionButton isActive, "Regenerate Notes", "Regenerate Release Notes.", _
6786 dpurdie 97 
                                             "src='images/i_sync_on.gif' width='22' height='22' align='absmiddle' border='0' hspace='3'", _
98 
                                             "fixed_issues.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"&resetNotes=1"%>
127 ghuddy 99 
         </tr>
100 
      </table>
101 
 
119 ghuddy 102 
   <%Case "Documentation"%>
127 ghuddy 103 
      <table width="10" border="0" cellspacing="10">
104 
         <tr>
6786 dpurdie 105 
          <%
106 
            IsActive = (NOT isClosed AND NOT isSDK) OR canActionControlInProject("EditCriticalInfoForLockedPackage")
107 
            BuildActionButtonClick isActive, "Import From Document Repository", "Import document details from ERG document repository.",FALSE, _
108 
                                        "src='images/i_import_on.gif' width='22' height='22' align='absmiddle' border='0' hspace='3'", _
109 
                                        "MM_openVixIFrame('_wform_import_docs.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"','Import Documents')"%>
127 ghuddy 110 
         </tr>
111 
      </table>
112 
 
119 ghuddy 113 
   <%Case "Add Process"%>
127 ghuddy 114 
      <table width="10" border="0" cellspacing="10">
115 
         <tr>
6786 dpurdie 116 
            <%  isActive = NOT isClosed AND ((pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R"))
117 
                BuildActionButtonClick isActive, "Add Process", "Insert processes associated with the package.",FALSE, _
118 
                                        "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
119 
                                        "MM_openVixIFrame('wAddProc.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id&"','Add Process')"%>
127 ghuddy 120 
         </tr>
121 
      </table>
119 ghuddy 122 
 
127 ghuddy 123 
   <%Case "Add GBE_MACHTYPE"%>
4029 dpurdie 124 
      <table width="10" border="0" cellspacing="0">
127 ghuddy 125 
         <tr>
6786 dpurdie 126 
            <%BuildActionButtonClick bState, "Add", "Insert New GBE_MACHTYPE.",TRUE, _
127 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
128 
                                     "MM_openVixIFrame('wAddMachtype.asp','Add Machine Type')"%>
127 ghuddy 129 
         </tr>
130 
      </table>
119 ghuddy 131 
 
5122 dpurdie 132 
   <%Case "Add GBE_BUILDSTANDARD"%>
133 
      <table width="10" border="0" cellspacing="0">
134 
         <tr>
6786 dpurdie 135 
            <%BuildActionButtonClick bState, "Add", "Insert New Build Standard.",TRUE, _
136 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
137 
                                     "MM_openVixIFrame('wAddBuildStandard.asp','Add Build Standard')"%>
5122 dpurdie 138 
         </tr>
139 
      </table>
140 
 
141 
 
4029 dpurdie 142 
   <%Case "Add BM_NAME"%>
143 
      <table width="10" border="0" cellspacing="0">
144 
         <tr>
6786 dpurdie 145 
            <%BuildActionButtonClick isActive, "Add", "Insert New BM_NAME.",TRUE, _
146 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
147 
                                     "MM_openVixIFrame('wAddMachclass.asp','Add New Class of Build Machine')"%>
4029 dpurdie 148 
         </tr>
149 
      </table>
150 
 
3959 dpurdie 151 
   <%Case "Add Project Extension"%>
5983 dpurdie 152 
      <table width="100%" border="0" cellspacing="0" ID="Table1">
3959 dpurdie 153 
         <tr>
6786 dpurdie 154 
            <%BuildActionButtonClick bState, "Add Project Extension", "Insert New Project Extension",TRUE, _
155 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
156 
                                     "MM_openVixIFrame('wAddProjectExtension.asp','Add Project Extension')"%>
3959 dpurdie 157 
         </tr>
158 
      </table>
159 
 
6770 dpurdie 160 
   <%Case "Add Package Replica"%>
161 
      <table width="10" border="0" cellspacing="0" ID="Table1">
162 
         <tr>
6786 dpurdie 163 
            <%BuildActionButtonClick bState, "Add Package Replica", "Insert New Package Replica.", TRUE, _
164 
                                        "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
165 
                                        "MM_openVixIFrame('wAddPkgReplica.asp','Add Package Replica')"%>
6770 dpurdie 166 
         </tr>
167 
      </table>
168 
 
127 ghuddy 169 
   <%Case "Add Licence"%>
5983 dpurdie 170 
      <table width="100%" border="0" cellspacing="0">
127 ghuddy 171 
         <tr>
6786 dpurdie 172 
            <%BuildActionButtonClick bState, "Add Licence", "Insert New Licence",TRUE, _
173 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
174 
                                     "MM_openVixIFrame('wAddLicence.asp','Add Licence')"%>
127 ghuddy 175 
         </tr>
176 
      </table>
177 
 
5983 dpurdie 178 
   <%Case "Add VCS"%>
179 
      <table width="100%" border="0" cellspacing="0">
180 
         <tr>
6786 dpurdie 181 
            <%BuildActionButtonClick bState, "Add VCS", "Insert New VCS",TRUE, _
182 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
183 
                                     "MM_openVixIFrame('wAddVCS.asp','Add New VCS')"%>
5983 dpurdie 184 
         </tr>
185 
      </table>
186 
 
127 ghuddy 187 
   <%Case "Add Daemon"%>
188 
      <table width="10" border="0" cellspacing="10">
189 
         <tr>
6786 dpurdie 190 
            <%BuildActionButtonClick bState, "Add Daemon", "Insert New Daemon",TRUE, _
191 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
192 
                                     "MM_openVixIFrame('wAddDaemon.asp?rtag_id="&parRtag_id&"','Add Build Daemon')"%>
127 ghuddy 193 
         </tr>
194 
      </table>
195 
 
196 
   <%Case "Add Schedule"%>
5123 dpurdie 197 
      <table width="10" border="0" cellspacing="0">
127 ghuddy 198 
         <tr>
6786 dpurdie 199 
            <%BuildActionButtonClick bState, "Add Schedule", "Insert New Schedule",TRUE, _
200 
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
201 
                                     "MM_openVixIFrame('wAddSchedule.asp','Add a new Schedule')" %>
127 ghuddy 202 
         </tr>
203 
      </table>
204 
 
205 
   <%Case "Indefinite Pause"%>
5123 dpurdie 206 
      <table width="10" border="0" cellspacing="0">
127 ghuddy 207 
         <tr>
6786 dpurdie 208 
            <%BuildActionButtonClick bState, "Set Indefinite Pause", "Indefinite Pause",TRUE, _
209 
                                     "src='icons/tpause.gif' width='16' height='16' align='absmiddle' border='0' hspace='3'", _
210 
                                     "location.href='_setInfinitePause.asp';" %>
127 ghuddy 211 
         </tr>
212 
      </table>
213 
 
214 
   <%Case "Resume"%>
5157 dpurdie 215 
      <table width="10" border="0" cellspacing="0">
127 ghuddy 216 
         <tr>
6786 dpurdie 217 
            <%BuildActionButtonClick bState, "Set Resume", "Resume Processing",TRUE, _
218 
                                     "src='icons/tplay.gif' width='16' height='16' align='absmiddle' border='0' hspace='3'", _
219 
                                     "location.href='_setResume.asp';" %>
171 brianf 220 
         </tr>
221 
      </table>
5982 dpurdie 222 
 
6788 dpurdie 223 
   <%Case "Add Daemon Instruction"%>
224 
      <table width="10" border="0" cellspacing="10">
225 
         <tr>
226 
            <%BuildActionButtonClick bState, "Add Daemon Instruction", "Insert New Daemon Instruction.", TRUE, _
227 
                                        "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
228 
                                        "MM_openVixIFrame('wAddDaemonInstruction.asp','Insert New Daemon Instruction')"%>
229 
         </tr>
230 
      </table>
231 
 
171 brianf 232 
   <%Case "Daemon Start"%>
173 brianf 233 
      <table border="0" cellspacing="0" cellpadding="0">
6786 dpurdie 234 
         <!-- Daemon Start -->
171 brianf 235 
         <tr>
173 brianf 236 
            <td valign=top>
5623 dpurdie 237 
               <img src="icons/tstopped.gif" width="16" height="16" border="0" vspace=2 hspace="5" title="Disabled">
173 brianf 238 
            </td>
6788 dpurdie 239 
            <%BuildActionButtonClick bState, "", "Enable Daemon", FALSE, _
6786 dpurdie 240 
                                     "src='icons/tplay.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 241 
                                     "location.href='_setDaemonResume.asp?rcon_id="&rcon_id&"&rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
127 ghuddy 242 
 
6786 dpurdie 243 
            <%BuildActionButton FALSE, "", "Pause Daemon", "src='icons/tpause.gif' width='16' height='16' border='0' vspace='2' hspace='0'",""%>
244 
 
245 
            <%BuildActionButton FALSE, "", "Disable Daemon", "src='icons/tstop.gif' width='16' height='16' border='0' vspace='2' hspace='0'",""%>
171 brianf 246 
         </tr>
247 
      </table>
248 
 
127 ghuddy 249 
   <%Case "Daemon Pause"%>
173 brianf 250 
      <table border="0" cellspacing="0" cellpadding="0">
6786 dpurdie 251 
         <!-- Daemon Pause -->
127 ghuddy 252 
         <tr>
173 brianf 253 
            <td valign=top>
5623 dpurdie 254 
               <img src="icons/tplayed.gif" width="16" height="16" border="0" vspace=2 hspace="5" title="Enabled">
173 brianf 255 
            </td>
6786 dpurdie 256 
            <%BuildActionButton FALSE, "", "Enable Daemon", "src='icons/tplay.gif' width='16' height='16' border='0' vspace='2' hspace='0'", ""%>
127 ghuddy 257 
 
6788 dpurdie 258 
            <%BuildActionButtonClick bState, "", "Pause Daemon", FALSE, _
6786 dpurdie 259 
                                     "src='icons/tpause.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 260 
                                     "location.href='_setDaemonPause.asp?rcon_id="&rcon_id&"&rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
6786 dpurdie 261 
 
6788 dpurdie 262 
            <%BuildActionButtonClick bState, "", "Disable Daemon", FALSE, _
6786 dpurdie 263 
                                     "src='icons/tstop.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 264 
                                     "location.href='_setDaemonDisable.asp?rcon_id="&rcon_id&"&rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
127 ghuddy 265 
         </tr>
266 
      </table>
267 
 
268 
   <%Case "Daemon Resume"%>
173 brianf 269 
      <table border="0" cellspacing="0" cellpadding="0">
6786 dpurdie 270 
         <!-- Daemon Resume -->
127 ghuddy 271 
         <tr>
173 brianf 272 
            <td valign=top>
5623 dpurdie 273 
               <img src="icons/tpaused.gif" width="16" height="16" border="0" vspace=2 hspace="5" title="Paused">
173 brianf 274 
            </td>
6788 dpurdie 275 
            <%BuildActionButtonClick bState, "", "Enable Daemon", FALSE, _
6786 dpurdie 276 
                                     "src='icons/tplay.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 277 
                                     "location.href='_setDaemonResume.asp?rcon_id="&rcon_id&"&rtag_id="&parRtagId&"&rfile="&scriptName &"'"%>
127 ghuddy 278 
 
6786 dpurdie 279 
            <%BuildActionButton FALSE, "", "Pause Daemon", "src='icons/tpause.gif' width='16' height='16' border='0' vspace='2' hspace='0'",""%>
280 
 
6788 dpurdie 281 
            <%BuildActionButtonClick bState, "", "Disable Daemon", FALSE, _
6786 dpurdie 282 
                                     "src='icons/tstop.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 283 
                                     "location.href='_setDaemonDisable.asp?rcon_id="&rcon_id&"&rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
127 ghuddy 284 
         </tr>
285 
      </table>
286 
 
171 brianf 287 
   <%Case "Daemon Control All"%>
173 brianf 288 
      <table border="0" cellspacing="0" cellpadding="0">
6788 dpurdie 289 
         <!-- Daemon Control All -->
171 brianf 290 
         <tr>
173 brianf 291 
            <td valign=top>
5623 dpurdie 292 
               <img src=icons/tpaused.gif width="16" height="16" border="0" vspace=2 hspace="5" style="visibility:hidden">
173 brianf 293 
            </td>
6788 dpurdie 294 
            <%BuildActionButtonClick bState, "", "Enable Daemons", FALSE, _
6786 dpurdie 295 
                                     "src='icons/tplay.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 296 
                                     "location.href='_setDaemonResume.asp?rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
5983 dpurdie 297 
 
6788 dpurdie 298 
            <%BuildActionButtonClick bState, "", "Pause Daemons", FALSE, _
6786 dpurdie 299 
                                     "src='icons/tpause.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 300 
                                     "location.href='_setDaemonPause.asp?rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
6786 dpurdie 301 
 
6788 dpurdie 302 
            <%BuildActionButtonClick bState, "", "Disable Daemons", FALSE, _
6786 dpurdie 303 
                                     "src='icons/tstop.gif' width='16' height='16' border='0' vspace='2' hspace='0'", _
6788 dpurdie 304 
                                     "location.href='_setDaemonDisable.asp?rtag_id="&parRtagId&"&rfile="&scriptName&"'"%>
171 brianf 305 
         </tr>
306 
      </table>
307 
 
6267 dpurdie 308 
   <%Case "Daemon Unavailable"%>
309 
      <table border="0" cellspacing="0" cellpadding="0">
6786 dpurdie 310 
         <!-- Daemon StartUnavailable -->
6267 dpurdie 311 
         <tr>
312 
            <td valign=top>
313 
               <img src=icons/tpaused_notfound.gif width="16" height="16" border="0" vspace=2 hspace="5">
314 
            </td>
6786 dpurdie 315 
            <%BuildActionButton FALSE, "", "Enable Daemons",  "src='icons/tplay.gif' width='16' height='16' border='0' vspace='2' hspace='0'", ""%>
316 
            <%BuildActionButton FALSE, "", "Pause Daemons",   "src='icons/tpause.gif' width='16' height='16' border='0' vspace='2' hspace='0'",""%>
317 
            <%BuildActionButton FALSE, "", "Disable Daemons", "src='icons/tstop.gif' width='16' height='16' border='0' vspace='2' hspace='0'","" %>
6267 dpurdie 318 
         </tr>
319 
      </table>
320 
 
119 ghuddy 321 
   <%End Select%>
322 
<%End Sub%>
6786 dpurdie 323 
 
324