Subversion Repositories DevTools

Rev

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

Rev 5506 Rev 5590
Line 77... Line 77...
77 
      OraDatabase.Parameters.Add "MACHINE_HOSTNAME",      Request("machine_hostname"),      ORAPARM_INPUT, ORATYPE_VARCHAR2
 77 
      OraDatabase.Parameters.Add "MACHINE_HOSTNAME",      Request("machine_hostname"),      ORAPARM_INPUT, ORATYPE_VARCHAR2
78 
      OraDatabase.Parameters.Add "GBE_ID",                Request("gbe_id"),                ORAPARM_INPUT, ORATYPE_NUMBER
 78 
      OraDatabase.Parameters.Add "GBE_ID",                Request("gbe_id"),                ORAPARM_INPUT, ORATYPE_NUMBER
79 
      OraDatabase.Parameters.Add "DESCRIPTION",           Request("description"),           ORAPARM_INPUT, ORATYPE_VARCHAR2
 79 
      OraDatabase.Parameters.Add "DESCRIPTION",           Request("description"),           ORAPARM_INPUT, ORATYPE_VARCHAR2
80 
      OraDatabase.Parameters.Add "ACTIVE",                Request("active"),                ORAPARM_INPUT, ORATYPE_CHAR
 80 
      OraDatabase.Parameters.Add "ACTIVE",                Request("active"),                ORAPARM_INPUT, ORATYPE_CHAR
81 
 
 81 
 
- 
 
 82 
      objEH.ErrorRedirect = FALSE
82 
      objEH.TryORA ( OraSession )
 83 
      objEH.TryORA ( OraSession )
83 
      On Error Resume Next
 84 
      On Error Resume Next
84 
 
 85 
 
85 
      OraDatabase.ExecuteSQL _
 86 
      OraDatabase.ExecuteSQL _
86 
      "BEGIN  PK_BUILDAPI.UPDATE_BUILD_MACHINE(:BMCON_ID, :DISPLAY_NAME, :MACHINE_HOSTNAME, :GBE_ID, :DESCRIPTION, :ACTIVE);  END;"
 87 
      "BEGIN  PK_BUILDAPI.UPDATE_BUILD_MACHINE(:BMCON_ID, :DISPLAY_NAME, :MACHINE_HOSTNAME, :GBE_ID, :DESCRIPTION, :ACTIVE);  END;"
Line 107... Line 108...
107 
      OraDatabase.Parameters.Add "MACHINE_HOSTNAME",      Request("machine_hostname"),      ORAPARM_INPUT, ORATYPE_VARCHAR2
 108 
      OraDatabase.Parameters.Add "MACHINE_HOSTNAME",      Request("machine_hostname"),      ORAPARM_INPUT, ORATYPE_VARCHAR2
108 
      OraDatabase.Parameters.Add "GBE_ID",                Request("gbe_id"),                ORAPARM_INPUT, ORATYPE_NUMBER
 109 
      OraDatabase.Parameters.Add "GBE_ID",                Request("gbe_id"),                ORAPARM_INPUT, ORATYPE_NUMBER
109 
      OraDatabase.Parameters.Add "DESCRIPTION",           Request("description"),           ORAPARM_INPUT, ORATYPE_VARCHAR2
 110 
      OraDatabase.Parameters.Add "DESCRIPTION",           Request("description"),           ORAPARM_INPUT, ORATYPE_VARCHAR2
110 
      OraDatabase.Parameters.Add "ACTIVE",                Request("active"),                ORAPARM_INPUT, ORATYPE_CHAR
 111 
      OraDatabase.Parameters.Add "ACTIVE",                Request("active"),                ORAPARM_INPUT, ORATYPE_CHAR
111 
 
 112 
 
- 
 
 113 
      objEH.ErrorRedirect = FALSE
112 
      objEH.TryORA ( OraSession )
 114 
      objEH.TryORA ( OraSession )
113 
      On Error Resume Next
 115 
      On Error Resume Next
114 
 
 116 
 
115 
      OraDatabase.ExecuteSQL _
 117 
      OraDatabase.ExecuteSQL _
116 
      "BEGIN  PK_BUILDAPI.ADD_BUILD_MACHINE(:DISPLAY_NAME, :MACHINE_HOSTNAME, :GBE_ID, :DESCRIPTION, :ACTIVE);  END;"
 118 
      "BEGIN  PK_BUILDAPI.ADD_BUILD_MACHINE(:DISPLAY_NAME, :MACHINE_HOSTNAME, :GBE_ID, :DESCRIPTION, :ACTIVE);  END;"
Line 145... Line 147...
145 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
 147 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
146 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 148 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
147 
<link href="images/release_manager_style.css" rel="stylesheet" type="text/css">
 149 
<link href="images/release_manager_style.css" rel="stylesheet" type="text/css">
148 
<script language="JavaScript" src="scripts/common.js"></script>
 150 
<script language="JavaScript" src="scripts/common.js"></script>
149 
</head>
 151 
</head>
150 
 
 - 
 
151 
<body background="images/bg_bage_0.gif" leftmargin="0" topmargin="0" onLoad="self.focus();FormName.display_name.focus();">
 152 
<body leftmargin="0" topmargin="0" onLoad="self.focus();FormName.display_name.focus();">
152 
<table width="100%"  border="0" cellspacing="0" cellpadding="10">
 153 
<table width="100%"  border="0" cellspacing="0" cellpadding="10">
153 
   <tr>
 154 
   <tr>
154 
      <td bgcolor="#FFFFFF" class="body_txt"><span class="body_h1"><img src="icons/i_linkarrow_black.gif" width="11" height="11" align="absmiddle">&nbsp;Add/Update Build Machine</span> <br>
 155 
      <td class="body_txt">
155 
         Add a new Build Machine or edit an existing Build Machine.
 156 
         Add a new Build Machine or edit an existing Build Machine.
156 
      </td>
 157 
      </td>
157 
   </tr>
 158 
   </tr>
158 
 
 - 
 
159 
   <%
 159 
   <%
160 
   '-- FROM START --------------------------------------------------------------------------------------------------------------
 160 
   '-- FROM START --------------------------------------------------------------------------------------------------------------
161 
   objFormComponent.FormName = "FormName"
 161 
   objFormComponent.FormName = "FormName"
- 
 
 162 
   objFormComponent.FormClass = "form_tight"
162 
   objFormComponent.Action = ScriptName
 163 
   objFormComponent.Action = ScriptName
163 
   objFormComponent.OnSubmit = "ShowProgress();"
 164 
   objFormComponent.OnSubmit = "ShowProgress();"
164 
   Call objFormComponent.FormStart()
 165 
   Call objFormComponent.FormStart()
165 
 
 - 
 
166 
   %>
 166 
   %>
167 
   <tr>
 167 
   <tr>
168 
      <td background="images/bg_login.gif">
 168 
      <td class="form_field_bg" >
169 
         <table width="50%"  border="0" cellspacing="0" cellpadding="0">
 - 
 
170 
            <tr>
 - 
 
171 
               <td><%=ProgressBar()%></td>
 - 
 
172 
               <td align="right"><input name="btn" type="submit" class="form_btn" value="Add/Update">
 - 
 
173 
                  <input name="btn" type="reset" class="form_btn" value="Cancel" onClick="self.close();">
 - 
 
174 
               </td>
 - 
 
175 
            </tr>
 - 
 
176 
         </table>
 - 
 
177 
      </td>
 - 
 
178 
   </tr>
 - 
 
179 
   <tr>
 - 
 
180 
      <td>
 - 
 
181 
         <!-- NEW PRODUCT ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 169 
         <!-- NEW PRODUCT ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
182 
         <%Call Messenger ( sMessage , 3, "100%" )%>
 170 
         <%Call Messenger ( sMessage , 3, "100%" )%>
183 
         <!-- MESSAGE +++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 171 
         <!-- MESSAGE +++++++++++++++++++++++++++++++++++++++++++++++++++ -->
184 
         <!--#include file="messages/_msg_inline.asp"-->
 172 
         <!--#include file="messages/_msg_inline.asp"-->
185 
         <br>
 173 
         <br>
Line 212... Line 200...
212 
            activeChecked = "checked"
 200 
            activeChecked = "checked"
213 
          End If%>
 201 
          End If%>
214
202
215 
         <table width="50%" border="0">
 203 
         <table width="50%" border="0">
216 
            <tr>
 204 
            <tr>
217 
               <td><span class="body_txt">Display Name</span></td>
 205 
               <td><span class="body_txt nowrap">Display Name</span></td>
218 
               <td>
 206 
               <td>
219 
                  <input name="display_name" type="text" class="body_txt" value="<%=display_name%>" size=24 maxlength=20>
 207 
                  <input name="display_name" type="text" class="body_txt" value="<%=display_name%>" size=24 maxlength=20>
220 
               </td>
 208 
               </td>
221 
            </tr>
 209 
            </tr>
222 
            <tr>
 210 
            <tr>
Line 224... Line 212...
224 
               <td>
 212 
               <td>
225 
                  <input name="machine_hostname" type="text" class="body_txt" value="<%=machine_hostname%>" size=60 maxlength=50>
 213 
                  <input name="machine_hostname" type="text" class="body_txt" value="<%=machine_hostname%>" size=60 maxlength=50>
226 
               </td>
 214 
               </td>
227 
            </tr>
 215 
            </tr>
228 
            <tr>
 216 
            <tr>
229 
               <td><span class="body_txt">GBE_MACHTYPE</span></td>
 217 
               <td><span class="body_txt nowrap">GBE_MACHTYPE</span></td>
230 
               <td><%=objFormComponent.Combo ( "gbe_id", GetMachtype( gbe_id ), FALSE, "size=1 class='body_txt'" )%></td>
 218 
               <td><%=objFormComponent.Combo ( "gbe_id", GetMachtype( gbe_id ), FALSE, "size=1 class='body_txt'" )%></td>
231 
            </tr>
 219 
            </tr>
232 
            <tr>
 220 
            <tr>
233 
               <td><span class="body_txt">Allow Use</span></td>
 221 
               <td><span class="body_txt nowrap">Allow Use</span></td>
234 
               <td>
 222 
               <td>
235 
                  <input type="checkbox" name="active" value="Y" <%=activeChecked%>>
 223 
                  <input type="checkbox" name="active" value="Y" <%=activeChecked%>>
236 
                  <span class="body_txt">Allow users to add this machine to a build set</span>
 224 
                  <span class="body_txt">Allow users to add this machine to a build set</span>
237 
               </td>
 225 
               </td>
238 
            </tr>
 226 
            </tr>
239 
            <tr>
 227 
            <tr>
240 
               <td><span class="body_txt">Description</span></td>
 228 
               <td><span class="body_txt nowrap">Description</span></td>
241 
               <td>
 229 
               <td>
242 
                  <textarea name="Description" cols=50 rows=5 class='body_txt'><%=Description%></textarea>
 230 
                  <textarea name="Description" cols=50 rows=5 class='body_txt'><%=Description%></textarea>
243 
               </td>
 231 
               </td>
244 
            </tr>
 232 
            </tr>
- 
 
 233 
         </table>
- 
 
 234 
      </td>
- 
 
 235 
   </tr>
- 
 
 236 
   <tr>
- 
 
 237 
      <td>
- 
 
 238 
         <table class="full_table">
245 
            <tr>
 239 
            <tr>
- 
 
 240 
               <td><%=ProgressBar()%></td>
246 
               <td>&nbsp;</td>
 241 
               <td align="right">
- 
 
 242 
                  <input name="btn" type="submit" class="form_btn" value="Add/Update">
- 
 
 243 
                  <input name="btn" type="reset" class="form_btn" value="Cancel" onclick="parent.closeIFrame();">
- 
 
 244 
               </td>
247 
            </tr>
 245 
            </tr>
248 
         </table>
 246 
         </table>
249 
      </td>
 247 
      </td>
250 
   </tr>
 248 
   </tr>
251 
   <%=objPMod.ComposeHiddenTags()%>
 249 
   <%=objPMod.ComposeHiddenTags()%>
252 
   <input type="hidden" name="action" value="true">
 250 
   <input type="hidden" name="action" value="true">
253 
 
 - 
 
254 
   <%
 251 
   <%
255 
   Call objFormComponent.FormEnd()
 252 
   Call objFormComponent.FormEnd()
256 
   '-- FROM END ----------------------------------------------------------------------------------------------------------------
 253 
   '-- FROM END ----------------------------------------------------------------------------------------------------------------
257 
   %>
 254 
   %>
258 
</table>
 255 
</table>