<%@LANGUAGE="VBSCRIPT"%> <% '===================================================== ' DanglingVersions.asp '===================================================== %> <% Option explicit ' Good idea to set when using redirect Response.Expires = 0 ' always load the page, dont store %> <% '------------ ACCESS CONTROL ------------------ %> <% '------------ Variable Definition ------------- Dim userId Dim pkgCount Dim rsQry Dim Query_String Dim divId '------------ Constants Declaration ----------- '------------ Variable Init ------------------- '---------------------------------------------- %> Release Manager

<% pkgCount = 0 Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("WorkNotInProgressSummary.sql"), cint(0)) %> <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF)) userId = rsTemp("user_id") divId = "userId_" & userId pkgCount = rsTemp("counter") %> <%rsTemp.MoveNext WEnd rsTemp.Close Set rsTemp = nothing%>
Dangling Package Versions by User <%=Quick_Help("h_dangling")%>
 User  Package Count
src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"> <%=emailField(enum_imgUserLg & rsTemp("full_name"), rsTemp("user_email"))%> <%=pkgCount%>
style="display:none;"><%=enumLOADING%>