Subversion Repositories DevTools

Rev

Rev 6877 | Rev 7022 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6877 Rev 6879
Line 187... Line 187...
187
 
187
 
188
End If
188
End If
189
Call CheckMasterConfig()
189
Call CheckMasterConfig()
190
'----------------------------------------------
190
'----------------------------------------------
191
Sub ShowBuildConfig
191
Sub ShowBuildConfig
-
 
192
    ' Load some action buttons
-
 
193
    Call objBtnControl.LoadActionButtons ( Array("btnEditDaemon", "btnRemoveDaemon", "btnDeleteDaemon"), OraDatabase )
-
 
194
    objBtnControl.ButtonSpacer = 1
-
 
195
 
192
    '-- FROM START ---------------------------------------------------------------------------------------------------------
196
    '-- FORM START ---------------------------------------------------------------------------------------------------------
193
    objFormComponent.FormName = "FormName"
197
    objFormComponent.FormName = "FormName"
194
    objFormComponent.Action = ScriptName
198
    objFormComponent.Action = ScriptName
195
    Call objFormComponent.FormStart()
199
    Call objFormComponent.FormStart()
196
%>
200
%>
197
    <div class=panel>
201
    <div class=panel style='max-width:90%'>
198
        <div class=rounded_box_caption>
202
        <div class=rounded_box_caption>
199
            <%=IIf( canActionControlInProject("BuildConfiguration"),"ADMINISTER","VIEW")%> BUILD CONFIGURATION
203
            <%=IIf( canActionControlInProject("BuildConfiguration"),"ADMINISTER","VIEW")%> BUILD CONFIGURATION
200
        </div>
204
        </div>
201
        <div class="rounded_box" >
205
        <div class="rounded_box" >
202
            <div class='controlPanel'>
206
            <div class='controlPanel'>
203
                <!-- MESSAGE +++++++++++++++++++++++++++++++++++++++++++++++++++ -->
207
                <!-- MESSAGE +++++++++++++++++++++++++++++++++++++++++++++++++++ -->
204
                <!--#include file="messages/_msg_inline.asp"-->
208
                <!--#include file="messages/_msg_inline.asp"-->
205
                <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
209
                <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
206
                <!-- BUTTONS CONTROL +++++++++++++++++++ -->
210
                <!-- BUTTONS CONTROL +++++++++++++++++++ -->
207
                <%
-
 
208
                If canActionControlInProject("BuildConfiguration") Then
-
 
209
                   Call Action_Buttons ( "Add Daemon" )
-
 
210
                End If
-
 
211
 
-
 
212
                ' Load some action buttons
-
 
213
                Call objBtnControl.LoadActionButtons ( Array("btnEditDaemon", "btnRemoveDaemon", "btnDeleteDaemon"), OraDatabase )
-
 
214
                objBtnControl.ButtonSpacer = 1
-
 
215
                %>
-
 
216
            </div>
211
            </div>
217
            <div class=listPanel>
212
            <div class=listPanel>
218
                <!-- +++++++++++++++++++++++++++++++++++ -->
213
                <!-- +++++++++++++++++++++++++++++++++++ -->
219
                <table class=embedded_table style='width:640px'>
214
                <table class='full_table'>
220
                    <thead>
215
                    <thead>
221
                         <th></th>
216
                         <th class='shrink'></th>
222
                         <th>DAEMON HOST</th>
217
                         <th class='shrink'>DAEMON HOST</th>
223
                         <th>GBE_MACHTYPE</th>
218
                         <th class='shrink'>GBE_MACHTYPE</th>
224
                         <th>DAEMON MODE</th>
219
                         <th class='shrink'>DAEMON MODE</th>
225
                         <th>GBE_BUILDFILTER</th>
220
                         <th>GBE_BUILDFILTER</th>
226
                         <%If canActionControlInProject("BuildConfiguration") Then%>
221
                         <%If canActionControlInProject("BuildConfiguration") Then%>
227
                            <th>ACTION</th>
222
                            <th class='shrink'>ACTION</th>
228
                         <%End If%>
223
                         <%End If%>
229
                    </thead>
224
                    </thead>
230
                  <%
225
                  <%
231
                  query_string = "select rcon_id, display_name, rc.bmcon_id, daemon_mode, gbe_value, gbe_buildfilter, NVL(active, 'U') as ACTIVE " &_
226
                  query_string = "select rcon_id, display_name, rc.bmcon_id, daemon_mode, gbe_value, gbe_buildfilter, NVL(active, 'U') as ACTIVE " &_
232
                                 " from release_manager.release_config rc," &_
227
                                 " from release_manager.release_config rc," &_
Line 267... Line 262...
267
                     End If
262
                     End If
268
 
263
 
269
                     %>
264
                     %>
270
                     <tr class=border>
265
                     <tr class=border>
271
                        <td class=center><input type=<%=cbtype%> name="rcon_id_list" value="<%=rsQry("rcon_id")%>"></td>
266
                        <td class=center><input type=<%=cbtype%> name="rcon_id_list" value="<%=rsQry("rcon_id")%>"></td>
272
                        <td <%=dClass%>"><%=daemon%></td>
267
                        <td class='<%=dClass%>'><%=daemon%></td>
273
                        <td><%=rsQry("gbe_value")%></td>
268
                        <td><%=rsQry("gbe_value")%></td>
274
                        <td><%=daemon_mode%></td>
269
                        <td><%=daemon_mode%></td>
275
                        <td class=wrap><%=rsQry("gbe_buildfilter")%></td>
270
                        <td class=wrap><%=rsQry("gbe_buildfilter")%></td>
276
                        <%If canActionControlInProject("BuildConfiguration") Then%>
271
                        <%If canActionControlInProject("BuildConfiguration") Then%>
277
                           <td>
272
                           <td>
Line 311... Line 306...
311
                <%End If%>
306
                <%End If%>
312
                </table>
307
                </table>
313
             </div>
308
             </div>
314
            <%End If%>
309
            <%End If%>
315
            <div class='buttonPanel'>
310
            <div class='buttonPanel'>
-
 
311
                <span style='float:left'>
-
 
312
               <% BuildActionButtonClickRaw canActionControlInProject("BuildConfiguration"), "Add Daemon", "Insert New Daemon",TRUE, _
-
 
313
                                     "src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
-
 
314
                                     "MM_openVixIFrame('wAddDaemon.asp?rtag_id="&parRtag_id&"','Add Build Daemon')" %>
-
 
315
               </span>
316
                <!-- ACTION BUTTONS ---------------------------------------------->
316
                <!-- ACTION BUTTONS ---------------------------------------------->
317
               <%=objFormComponent.CancelButton ( "OK", "", "build_status.asp?rtag_id="& parRtagId )%>
317
               <%=objFormComponent.CancelButton ( "OK", "", "build_status.asp?rtag_id="& parRtagId )%>
318
               <%=objPMod.ComposeHiddenTags()%>
318
               <%=objPMod.ComposeHiddenTags()%>
319
               <%If canActionControlInProject("BuildConfiguration") Then%>
319
               <%If canActionControlInProject("BuildConfiguration") Then%>
320
                  <input name="btn" type="submit" value="Unlink">
320
                  <input name="btn" type="submit" value="Unlink">