Subversion Repositories DevTools

Rev

Rev 5067 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5067 Rev 5071
Line 191... Line 191...
191 
 
 191 
 
192 
<%Else%>
 192 
<%Else%>
193 
   linkset[2]+='<div class="menuitemDisable">Import&nbsp;Daemon&nbsp;Config</div>'
 193 
   linkset[2]+='<div class="menuitemDisable">Import&nbsp;Daemon&nbsp;Config</div>'
194 
<%End If%>
 194 
<%End If%>
195 
 
 195 
 
196 
//linkset[2]+='<hr>'
 196 
linkset[2]+='<hr>'
197 
//linkset[2]+='<div class="menuitems"><a href="sdk_main_page.asp?rtag_id=<%=parRtag_id%>">Create SDK</a></div>'
 197 
linkset[2]+='<div class="menuitems"><a href="sdk_main_page.asp?rtag_id=<%=parRtag_id%>">Create SDK</a></div>'
198 
 
 198 
 
199 
linkset[2]+='<hr>'
 199 
linkset[2]+='<hr>'
200 
linkset[2]+='<div class="menuitems"><a href="form_edit_release.asp?rtag_id=<%=parRtag_id%>">Release&nbsp;Properties</a></div>'
 200 
linkset[2]+='<div class="menuitems"><a href="form_edit_release.asp?rtag_id=<%=parRtag_id%>">Release&nbsp;Properties</a></div>'
201 
linkset[2]+='<div class="menuitems"><a href="diff.asp?rtagB=<%=parRtag_id%>" >Merge&nbsp;Manager</a></div>'
 201 
linkset[2]+='<div class="menuitems"><a href="diff.asp?rtagB=<%=parRtag_id%>" >Merge&nbsp;Manager</a></div>'
202 
linkset[2]+='<div class="menuitems"><a href="build_order.asp?rtag_id=<%=parRtag_id%>">Build&nbsp;Order</a></div>'
 202 
linkset[2]+='<div class="menuitems"><a href="build_order.asp?rtag_id=<%=parRtag_id%>">Build&nbsp;Order</a></div>'
Line 222... Line 222...
222 
   linkset[6]+='<hr>'
 222 
   linkset[6]+='<hr>'
223 
   linkset[6]+='<div class="menuitems"><a href="javascript:;" onClick="MM_openBrWindow(\'_wform_new_project.asp\',\'ReleaseManager\',\'resizable=yes,width=400,height=200\')">New&nbsp;Project</a></div>'
 223 
   linkset[6]+='<div class="menuitems"><a href="javascript:;" onClick="MM_openBrWindow(\'_wform_new_project.asp\',\'ReleaseManager\',\'resizable=yes,width=400,height=200\')">New&nbsp;Project</a></div>'
224 
   linkset[6]+='<div class="menuitems"><a href="admin_projects.asp">Project&nbsp;Info</a></div>'
 224 
   linkset[6]+='<div class="menuitems"><a href="admin_projects.asp">Project&nbsp;Info</a></div>'
225 
   linkset[6]+='<div class="menuitems"><a href="admin_project_suffix.asp">Project&nbsp;Suffix</a></div>'
 225 
   linkset[6]+='<div class="menuitems"><a href="admin_project_suffix.asp">Project&nbsp;Suffix</a></div>'
226 
<%End If%>
 226 
<%End If%>
227 
//   linkset[6]+='<hr>'
 227 
   linkset[6]+='<hr>'
228 
//   linkset[6]+='<div class="menuitems"><a href="sdk_main_page.asp#url=sdk_names_body.asp">Sdk&nbsp;Names</a></div>'
 228 
   linkset[6]+='<div class="menuitems"><a href="sdk_main_page.asp#url=sdk_names_body.asp">Sdk&nbsp;Names</a></div>'
229 
<%If objAccessControl.UserLogedIn Then%>
 229 
<%If objAccessControl.UserLogedIn Then%>
230 
   linkset[6]+='<hr>'
 230 
   linkset[6]+='<hr>'
231 
   linkset[6]+='<div class="menuitems"><a href="admin_package_properties.asp">Package&nbsp;Properties</a></div>'
 231 
   linkset[6]+='<div class="menuitems"><a href="admin_package_properties.asp">Package&nbsp;Properties</a></div>'
232 
<%End If%>
 232 
<%End If%>
233 
 
 233 
 
Line 271... Line 271...
271 
</script>
 271 
</script>
272 
<%
 272 
<%
273 
Sub Print_TopRight_Menu_ROW1
 273 
Sub Print_TopRight_Menu_ROW1
274 
   Response.write "<table bgcolor='#ffffff' border='0' cellpadding='0' cellspacing='0' height='35'>"
 274 
   Response.write "<table bgcolor='#ffffff' border='0' cellpadding='0' cellspacing='0' height='35'>"
275 
   Response.write "  <tr>"
 275 
   Response.write "  <tr>"
276 
   If objAccessControl.UserLogedIn Then
 - 
 
277 
      Response.write "    <td align=middle noWrap valign=center><img src='images/h_trsp_dot.gif' width='70' height='1'></td>"
 - 
 
278 
      Response.write "    <td></td>"
 - 
 
279 
   End If
 - 
 
280 
   Response.write "    <td align=middle noWrap valign=center><img src='images/h_trsp_dot.gif' width='80' height='1'></td>"
 276 
   Response.write "    <td align=middle noWrap valign=center><img src='images/h_trsp_dot.gif' width='80' height='1'></td>"
281 
   Response.write "    <td></td>"
 277 
   Response.write "    <td></td>"
282 
   Response.write "    <td align=middle noWrap valign=center><img src='images/h_trsp_dot.gif' width='70' height='1'></td>"
 278 
   Response.write "    <td align=middle noWrap valign=center><img src='images/h_trsp_dot.gif' width='70' height='1'></td>"
283 
   Response.write "    <td></td>"
 279 
   Response.write "    <td></td>"
284 
   Response.write "    <td align=middle noWrap valign=center><img src='images/h_trsp_dot.gif' width='70' height='1'></td>"
 280 
   Response.write "    <td align=middle noWrap valign=center><img src='images/h_trsp_dot.gif' width='70' height='1'></td>"
Line 287... Line 283...
287 
   Response.write "    <td></td>"
 283 
   Response.write "    <td></td>"
288 
   Response.write "    <td align=middle noWrap valign=center><img src='images/h_trsp_dot.gif' width='70' height='1'></td>"
 284 
   Response.write "    <td align=middle noWrap valign=center><img src='images/h_trsp_dot.gif' width='70' height='1'></td>"
289 
   Response.write "    <td></td>"
 285 
   Response.write "    <td></td>"
290 
   Response.write "    <td align=middle noWrap valign=center><img src='images/h_trsp_dot.gif' width='70' height='1'></td>"
 286 
   Response.write "    <td align=middle noWrap valign=center><img src='images/h_trsp_dot.gif' width='70' height='1'></td>"
291 
   Response.write "  </tr>"
 287 
   Response.write "  </tr>"
- 
 
 288 
 
292 
   Response.write "  <tr> "
 289 
   Response.write "  <tr> "
293 
   If objAccessControl.UserLogedIn Then
 290 
   If objAccessControl.UserLogedIn Then
294 
      Response.write "    <td align=middle noWrap valign=center><a class=mmItem href='members_index.asp'><img src='images/i_user.gif' border='0' hspace='3'>"&  objAccessControl.FullName &"</a>&nbsp;&nbsp;</td>"
 291 
      Response.write "    <td align=middle noWrap valign=center><a class=mmItem href='members_index.asp' onMouseover=""showmenu(event,linkset[5])"" onMouseout=""delayhidemenu()""><img src='images/i_user.gif' border='0' hspace='3'>"&  objAccessControl.FullName &"</a>&nbsp;&nbsp;</td>"
- 
 
 292 
   Else
295 
      Response.write "   <td align=middle>|</td>"
 293 
      Response.write "    <td align=middle noWrap valign=center><a class=mmItem href='members_index.asp' onMouseover=""showmenu(event,linkset[5])"" onMouseout=""delayhidemenu()"">My Account</a></td>"
296 
   End If
 294 
   End If
297 
   Response.write "    <td align=middle noWrap valign=center><a class=mmItem href='members_index.asp' onMouseover=""showmenu(event,linkset[5])"" onMouseout=""delayhidemenu()"">My Account</a></td>"
 - 
 
298 
   Response.write "   <td align=middle>|</td>"
 295 
   Response.write "   <td align=middle>|</td>"
299 
   Response.write "    <td align=middle noWrap valign=center><a class=mmItem href='' onMouseover=""showmenu(event,linkset[1])"" onMouseout=""delayhidemenu()"">Suite</a></td>"
 296 
   Response.write "    <td align=middle noWrap valign=center><a class=mmItem href='' onMouseover=""showmenu(event,linkset[1])"" onMouseout=""delayhidemenu()"">Suite</a></td>"
300 
   Response.write "   <td align=middle>|</td>"
 297 
   Response.write "   <td align=middle>|</td>"
301 
   Response.write "    <td align=middle noWrap valign=center><a class=mmItem href='reports.asp'>Reports</a></td>"
 298 
   Response.write "    <td align=middle noWrap valign=center><a class=mmItem href='reports.asp'>Reports</a></td>"
302 
   Response.write "   <td align=middle>|</td>"
 299 
   Response.write "   <td align=middle>|</td>"
Line 337... Line 334...
337 
 
 334 
 
338 
 
 335 
 
339 
Sub Print_TopLeft_Menu
 336 
Sub Print_TopLeft_Menu
340 
   Dim rsTemp, Query_String
 337 
   Dim rsTemp, Query_String
341 
   Dim myProj, myRtag
 338 
   Dim myProj, myRtag
342 
   Dim HomeSTR, ProjSTR, RtagSTR
 339 
   Dim HomeSTR, ProjSTR, RtagSTR,ModeSTR
- 
 
 340 
   Dim ActionSTR
343 
   myProj = QStrPar("proj_id")
 341 
   myProj = QStrPar("proj_id")
344 
   myRtag = QStrPar("rtag_id")
 342 
   myRtag = QStrPar("rtag_id")
345 
 
 343 
 
346 
   HomeSTR = "<a class=mmItem href='index.asp'>HOME</a>"
 344 
   HomeSTR = "<a class=mmItem href='index.asp'>HOME</a>"
347 
 
 345 
 
Line 378... Line 376...
378 
 
 376 
 
379 
      OraDatabase.Parameters.Remove "PROJ_ID"
 377 
      OraDatabase.Parameters.Remove "PROJ_ID"
380 
 
 378 
 
381 
   End If
 379 
   End If
382 
 
 380 
 
- 
 
 381 
   '-- Calculate authorisation state
- 
 
 382 
   ActionSTR = ""
- 
 
 383 
   If NOT canActionInProject Then
- 
 
 384 
    ActionSTR = "&nbsp;[Not Authorised]"
- 
 
 385 
    ActionSTR = "<img src='images/i_not_authorised.png' width='10' height='10' border='0' hspace='2' title='Not Authorised to make changes in this project'>"
- 
 
 386 
   End If
383 
 
 387 
 
384 
   '-- Render Menu --
 388 
   '-- Append Mode indication
385 
   Response.write "<table width='100%' border='0' cellspacing='0' cellpadding='0'>"
 - 
 
386 
   Response.write "  <tr>"
 389 
   ModeSTR = ""
387 
   Response.write "    <td width='1%'><img src='images/h_trsp_dot.gif' width='30' height='35'></td>"
 - 
 
388 
 
 - 
 
389 
   If ReleaseMode = enumDB_RELEASE_IN_RESTRICTIVE_MODE Then
 390 
   If ReleaseMode = enumDB_RELEASE_IN_RESTRICTIVE_MODE Then
390 
      Response.write "    <td nowrap width='100%' class=mmItem>"& HomeSTR & ProjSTR &  RtagSTR &"&nbsp;[Restrictive Mode]</td>"
 391 
      ModeSTR = "&nbsp;[Restrictive Mode]"
391 
 
 392 
 
392 
   ElseIf ReleaseMode = enumDB_RELEASE_IN_CCB_MODE Then
 393 
   ElseIf ReleaseMode = enumDB_RELEASE_IN_CCB_MODE Then
393 
      Response.write "    <td nowrap width='100%' class=mmItem>"& HomeSTR & ProjSTR &  RtagSTR &"&nbsp;[CCB Mode!]</td>"
 394 
      ModeSTR = "&nbsp;[CCB Mode!]"
394 
 
 395 
 
395 
   ElseIf ReleaseMode = enumDB_RELEASE_IN_CLOSED_MODE Then
 396 
   ElseIf ReleaseMode = enumDB_RELEASE_IN_CLOSED_MODE Then
396 
       Response.write "    <td nowrap width='100%' class=mmItem>"& HomeSTR & ProjSTR &  RtagSTR &"<img src='images/i_locked.gif' width='7' height='10' border='0' hspace='2' >&nbsp;[Closed Mode]</td>"
 397 
      ModeSTR = "<img src='images/i_locked.gif' width='7' height='10' border='0' hspace='2' >&nbsp;[Closed Mode]"
397 
 
 398 
 
398 
   ElseIf ReleaseMode = enumDB_RELEASE_IN_ARCHIVE_MODE Then
 399 
   ElseIf ReleaseMode = enumDB_RELEASE_IN_ARCHIVE_MODE Then
399 
       Response.write "    <td nowrap width='100%' class=mmItem>"& HomeSTR & ProjSTR &  RtagSTR &"<img src='images/i_archived.gif' width='7' height='10' border='0' hspace='2' >&nbsp;[Archived Mode]</td>"
 400 
       ModeSTR = "<img src='images/i_archived.gif' width='7' height='10' border='0' hspace='2' >&nbsp;[Archived Mode]"
400
401
401 
   Else
 - 
 
402 
      Response.write "    <td nowrap width='100%' class=mmItem>"& HomeSTR & ProjSTR &  RtagSTR &"</td>"
 - 
 
403 
 
 - 
 
404 
   End If
 402 
   End If
405 
 
 403 
 
- 
 
 404 
   '-- Render Menu --
- 
 
 405 
   Response.write "<table width='100%' border='0' cellspacing='0' cellpadding='0'>"
- 
 
 406 
   Response.write "  <tr>"
- 
 
 407 
   Response.write "    <td width='1%'><img src='images/h_trsp_dot.gif' width='30' height='35'></td>"
- 
 
 408 
   Response.write "    <td nowrap width='100%' class=mmItem>"& HomeSTR & ProjSTR & ActionSTR &  RtagSTR & ModeSTR & "</td>"
406 
    Response.write "  </tr>"
 409 
   Response.write "  </tr>"
407 
    Response.write "</table>"
 410 
   Response.write "</table>"
408 
 
 411 
 
409 
   rsTemp.Close()
 412 
   rsTemp.Close()
410 
   Set rsTemp = nothing
 413 
   Set rsTemp = nothing
411 
End Sub
 414 
End Sub
412 
 
 415