Rev 5950 | Rev 6070 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
<%@LANGUAGE="VBSCRIPT"%><%'=====================================================' DanglingVersions.asp'=====================================================%><%Option explicit' Good idea to set when using redirectResponse.Expires = 0 ' always load the page, dont store%><!--#include file="common/conf.asp"--><!--#include file="common/globals.asp"--><!--#include file="common/formating.asp"--><!--#include file="common/qstr.asp"--><!--#include file="common/common_subs.asp"--><%'------------ ACCESS CONTROL ------------------%><!--#include file="_access_control_general.asp"--><%'------------ Variable Definition -------------Dim userIdDim pkgCountDim rsQryDim Query_StringDim divId'------------ Constants Declaration -----------'------------ Variable Init -------------------'----------------------------------------------%><html><head><title>Release Manager</title><link rel="shortcut icon" href="<%=FavIcon%>"/><meta http-equiv="Pragma" content="no-cache"><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><link rel="stylesheet" href="images/release_manager_style.css" type="text/css"><link rel="stylesheet" href="images/navigation.css" type="text/css"><script language="JavaScript" src="images/common.js"></script><script language="JavaScript" src="scripts/remote_scripting.js"></script><!--#include file="_jquery_includes.asp"--><!-- TIPS --><script language="JavaScript" src="images/tipster.js"></script><script language="JavaScript" src="images/_help_tips.js"></script><!-- DROPDOWN MENUS --><!--#include file="_menu_def.asp"--><script language="JavaScript1.2" src="images/popup_menu.js"></script><script language="JavaScript" type="text/javascript"><!--formTips.tips.h_dangling = stdTip(300, 'Dangling Versions', 'Dangling package versions are versions of a package that have not been released and are not associated with any Release.' +'<p>These are commonly caused by "Removing" a WIP instead of "Destroying" it.' +'<p>Please consider destroying these versions.');//// Load/Hide/Show an Ajax expander// BaseId - Base for two IDs.// IMG_BaseId - image to to toggle// BaseId - Div to load data into// url - Url used to load subcontrolfunction ToggleUsedByControl(baseId, url){var img, dmode;var imgel = MM_findObj("IMG_" + baseId);var divel = MM_findObj(baseId);var showing = divel.getAttribute("data-show");if(showing == 1){img = "images/bt_minus.gif";dmode = 'block';showing = 2}else if(showing == 2){img = "images/bt_plus.gif";dmode = 'none';showing = 1;}else{img = "images/bt_minus.gif";dmode = 'block';showing = 2;// Set div name for ajax loadingajaxdivname = baseId;//Create the xmlHttp object to use in the request//stateChangeHandler will fire when the state has changed, i.e. data is received back// This is non-blocking (asynchronous)xmlHttp = GetXmlHttpObject(stateChangeHandler);//Send the xmlHttp get to the specified urlxmlHttp_Get(xmlHttp, url);}// Update image and attributesimgel.src = img;divel.style.display = dmode;divel.setAttribute("data-show", showing);}//--></script><style type="text/css"><!--.style1 {font-family: Arial, Helvetica, sans-serif;font-size: 12px;}.style3 {font-size: 11px;font-family: tahoma, sans-serif;}--></style></head><body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" ><!-- MENU LAYERS --------------------------------------><div id="popmenu" class="menuskin" onmouseover="clearhidemenu();highlightmenu(event,'on')"onmouseout="highlightmenu(event,'off');dynamichide(event)"></div><!-- HEADER --><!--#include file="_header.asp"--><!-- BODY ----><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td width="1%" background="images/bg_home_orange.gif" valign="top"><!--#include file="_front_explorer.asp"--></td><td rowspan="2" width="1%" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td width="1%"><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td colspan="3"><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td background="images/bg_comp_gear.gif"><img src="images/img_comp_gear_left.jpg" width="436" height="88"></td><td align="right" background="images/bg_comp_gear.gif"><img src="images/img_comp_gear_right.jpg" width="70" height="88"></td></tr></table></td><td background="images/bg_action_norm.gif"></td></tr><tr><td width="1%"><img src="images/h_trsp_dot.gif" width="15" height="518"></td><td width="100%" valign="top" class="body_txt"><br><!-- DANGLING PACKAGES ----------------------------------------------><%pkgCount = 0Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("WorkNotInProgressSummary.sql"), cint(0))%><table width="100%" border="0" cellspacing="1" cellpadding="1"><tr><td colspan="4" class="body_sect">Dangling Package Versions by User<%=Quick_Help("h_dangling")%></td></tr><tr><td width="40%" nowrap class="body_txt" background="images/bg_form_lightbluedark.gif"> User</td><td width="50%" nowrap class="body_txt" background="images/bg_form_lightbluedark.gif"> Package Count</td><td width="1%" background="images/bg_form_lightbluedark.gif"><img src="images/h_trsp_dot.gif" width="1" height="17"></td></tr><%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))userId = rsTemp("user_id")divId = "userId_" & userIdpkgCount = rsTemp("counter")%><tr><td nowrap class="form_item"><a href="javascript:;" class="txt_linked" onClick="ToggleUsedByControl('<%=divId%>','RequestUserDangle.asp?user_id=<%=userId%>');"><img id=IMG_<%=divId%> src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_user.gif" border="0" align="absmiddle" hspace="3"><%=rsTemp("full_name")%></a></td><td nowrap class="body_txt"><%=pkgCount%></td><td nowrap class="body_txt"><a href="mailto:<%=rsTemp("user_email")%>"><img src="images/bt_send_email.gif" width="36" height="13" border="0" alt="<%=rsTemp("user_email")%>"></a></tr><tr><td nowrap class="body_txt" colspan="3"><div id=<%=divId%> style="display:none;"><%=enumLOADING%></div></td></tr><%rsTemp.MoveNextWEndrsTemp.CloseSet rsTemp = nothing%></table><!-- DANGLING PACKAGES END ------------------------------------------></td><td width="1%"><img src="images/h_trsp_dot.gif" width="15" height="10"></td></tr></table></td></tr></table></td><td width="100%"> </td></tr><tr><td valign="bottom" align="center" background="images/bg_home_orange.gif"><img src="images/img_gear.gif" width="107" height="107" vspace="20" hspace="30"></td><td> </td></tr></table><!-- FOOTER --><!--#include file="_footer.asp"--></body></html>