Rev 119 | Blame | Compare with Previous | Last modification | View Log | RSS feed
<%@LANGUAGE="VBSCRIPT"%><%Option explicitResponse.Expires = 0 ' always load the page, dont store%><%'=====================================================' VERSIONS HISTORY - RUNTIME'=====================================================%><!--#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"--><!--#include file="_tabs.asp"--><!--#include file="_wform_versions_history_main.asp"--><!--#include file="common/_popup_window_common.asp"--><%'------------ ACCESS CONTROL ------------------%><!--#include file="_access_control_general.asp"--><%'------------ Variable Definition -------------Dim rsTempDim projId'------------ Constants Declaration -----------Const IMG_SVTREE = "<img src='images/i_vtree_small.gif' hspace='3' align='absmiddle' border='0'>"Const IMG_WORLD = "<img src='images/i_foldero_small.gif' hspace='3' align='absmiddle' border='0'>"Const IMG_GAP = "<img src='images/spacer.gif' width='20' height='1' border='0'>"Const IMG_POINTER = "<img src='images/i_pointer.gif' border='0'>"'------------ Variable Init -------------------'----------------------------------------------%><!--#include file="_menu_def.asp"--><html><head><title>Release Manager</title><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><script language="JavaScript" src="images/common.js"></script><script language="JavaScript" type="text/JavaScript"><!--function setLayerHeight () {var h = screen.height;MM_findObj("LayerDetails").style.height = (h-300)/2 +"px";MM_findObj("LayerVersions").style.height = (h-300)/2 +"px";}//--></script><script language="JavaScript1.2" src="images/popup_menu.js"></script><script language="JavaScript" type="text/javascript"><!--function RequestUsedByThisProject( paramString, rowId ){var requestURL = 'RequestUsedByThisProject.asp';// Show divToggleDisplay( 'PROJECT_'+ rowId, 'IMG_EXPAND_USED_BY_' + rowId, 'IMG_COLLAPSE_USED_BY_' + rowId );// Set ajax divnameajaxdivname = 'PROJECT_'+ rowId;if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>'){//Append the name to search for to the requestURLvar url = requestURL + paramString;//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);}}//--></script></head><body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();setLayerHeight();"><table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0"><tr><td width="1%" background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td><td width="100%" valign="top" background="images/bg_lght_gray.gif"><!--#include file="_version_browser.asp"--></td></tr><tr><td background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="300"></td><td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td align="right" background="images/bg_lght_gray.gif"><br><!-- TABS -------------------------------------------><%If IsEmpty( Request("pv_id") ) ThenCall Generate_Tab_Menu ( TABarray5D, Empty, "blue" )ElseCall Generate_Tab_Menu ( TABarray5, "Used by", "blue" )End If%><!-------------------------------------------------------------></td></tr><tr><td background="images/lbox_bg_blue.gif"> </td></tr></table><!---------------------------------------------- DETAILS ---------------------------------------------------><%If NOT IsEmpty( Request("pv_id") ) Then%><table width="100%" border="0" cellspacing="0" cellpadding="10"><tr><td><!-- USED BY ------------------------------------------------><div id="LayerDetails" style="height: 350px; overflow: auto;" name="LayerDetails"><table width="100%" border="0" cellspacing="1" cellpadding="2"><tr><td background="images/bg_form_lightbluedark.gif" nowrap width="1"></td><td background="images/bg_form_lightbluedark.gif" nowrap width="1" class="form_field">Name</td><td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Version</td><td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Location</td><td background="images/bg_form_lightbluedark.gif" nowrap width="1" class="form_field"></td><td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Version Used</td><td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Last Modified</td></tr><%OraDatabase.Parameters.Add "RTAG_ID", parRtag_id, ORAPARM_INPUT, ORATYPE_NUMBEROraDatabase.Parameters.Add "PKG_ID", pkgInfoHash.Item ("pkg_id"), ORAPARM_INPUT, ORATYPE_NUMBERIf pkgInfoHash.Item ("v_ext") <> "" ThenOraDatabase.Parameters.Add "V_EXT", pkgInfoHash.Item ("v_ext"), ORAPARM_INPUT, ORATYPE_VARCHAR2ElseOraDatabase.Parameters.Add "V_EXT", NULL, ORAPARM_INPUT, ORATYPE_VARCHAR2End IfSet rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedByPackagesInThisRelease.sql"), cint(0))OraDatabase.Parameters.Remove "RTAG_ID"OraDatabase.Parameters.Remove "PKG_ID"OraDatabase.Parameters.Remove "V_EXT"%><%If rsTemp.RecordCount < 1 Then%><tr><td background="images/bg_form_lightgray.gif" nowrap> </td><td background="images/bg_form_lightgray.gif" nowrap> </td><td background="images/bg_form_lightgray.gif" nowrap> </td><td background="images/bg_form_lightgray.gif" nowrap> </td><br><td background="images/bg_form_lightgray.gif" nowrap> </td><td background="images/bg_form_lightgray.gif" class="form_item"> </td><td background="images/bg_form_lightgray.gif" class="form_item"> </td></tr><%End If%><%While (NOT rsTemp.BOF) AND (NOT rsTemp.EOF)%><tr><td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( rsTemp("pkg_state"), rsTemp("dlocked"), NULL, NULL, pkgInfoHash.Item("build_type"), TRUE )%></td><td background="images/bg_form_lightgray.gif" nowrap><a href="dependencies.asp?pv_id=<%=rsTemp("pv_id")%>&rtag_id=<%=parRtag_id%>" class="txt_linked"><%=rsTemp("pkg_name")%></a></td><td background="images/bg_form_lightgray.gif" class="form_item"><%=rsTemp("pkg_version")%></td><td background="images/bg_form_lightgray.gif" class="body_txt_gray" nowrap><%=GetEnvName(rsTemp("env_area"))%></td><td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( 0, "Y", rsTemp("ignore_warn"), rsTemp("is_patch_ignore"), pkgInfoHash.Item("build_type"), TRUE )%></td><td background="images/bg_form_lightgray.gif" <%If rsTemp("dpv_id") <> parPv_id Then%>class="err_alert"<%Else%>class="form_item"<%End If%>><%=pkgInfoHash.Item ("pkg_name") &" "& rsTemp("dpkg_version")%></td><td background="images/bg_form_lightgray.gif" class="form_item"><a href="mailto:<%=rsTemp("user_email")%>" class="txt_linked"><%=enum_imgUser%><%=rsTemp("full_name")%></a> <%=EuroDate ( rsTemp("modified_stamp") )%></td></tr><%rsTemp.MoveNextWEndrsTemp.CloseSet rsTemp = nothing%></table><SPAN class="rep_small">NOTE: Versions in <SPAN class="err_alert">RED</SPAN> are different from <%=pkgInfoHash.Item("pkg_name") &" "& pkgInfoHash.Item("pkg_version")%></span><br><br><!------------------------------------------------------------><br><span class="body_sect">Used by Projects</span><table width="100%" border="0" cellspacing="1" cellpadding="4"><tr><td width="1%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col"></td><td width="100%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">Project</td></tr><%Dim currWorld, bgColor, linkSynccurrWorld = -1OraDatabase.Parameters.Add "RTAG_ID", parRtag_id, ORAPARM_INPUT, ORATYPE_NUMBEROraDatabase.Parameters.Add "PKG_ID", pkgInfoHash.Item ("pkg_id"), ORAPARM_INPUT, ORATYPE_NUMBERIf pkgInfoHash.Item ("v_ext") <> "" ThenOraDatabase.Parameters.Add "V_EXT", pkgInfoHash.Item ("v_ext"), ORAPARM_INPUT, ORATYPE_VARCHAR2ElseOraDatabase.Parameters.Add "V_EXT", NULL, ORAPARM_INPUT, ORATYPE_VARCHAR2End IfSet rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedByProjects.sql"), cint(0) )OraDatabase.Parameters.Remove "RTAG_ID"OraDatabase.Parameters.Remove "PKG_ID"OraDatabase.Parameters.Remove "V_EXT"%><%If rsTemp.RecordCount < 1 Then%><tr><td background="images/bg_form_lightgray.gif" nowrap class="form_item"> </td><td background="images/bg_form_lightgray.gif" nowrap class="form_item"> </td></tr><%End If%><%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))projId = rsTemp("proj_id")%><tr><td background="images/bg_form_lightgray.gif" class="form_item"></td><td nowrap background="images/bg_form_lightgray.gif" class="form_item"><SPAN id="IMG_EXPAND_USED_BY_<%=projId%>" name="IMG_EXPAND_USED_BY_<%=projId%>" style="display:block;"><a href="javascript:;" class="txt_linked" onClick="RequestUsedByThisProject('?pv_id=<%=pkgInfoHash.Item("pv_id")%>&proj_id=<%=projId%>', '<%=projId%>');"><img src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><%= rsTemp("proj_name") &" ("& rsTemp("used_count") &")"%></a></SPAN><SPAN id="IMG_COLLAPSE_USED_BY_<%=projId%>" name="IMG_COLLAPSE_USED_BY_<%=projId%>" style="display:none;"><a href="javascript:;" class="txt_linked" onClick="ToggleDisplay( 'PROJECT_<%=projId%>', 'IMG_EXPAND_USED_BY_<%=projId%>', 'IMG_COLLAPSE_USED_BY_<%=projId%>');"><img src="images/bt_minus.gif" border="0" align="absmiddle" hspace="3"><%= rsTemp("proj_name") &" ("& rsTemp("used_count") &")"%></a></SPAN><DIV id="PROJECT_<%=projId%>" name="PROJECT_<%=projId%>" style="display:none;"><%=enumLOADING%></DIV></td></tr><%rsTemp.MoveNextWEndrsTemp.CloseSet rsTemp = nothing%></table><br><SPAN class="rep_small">NOTE: Versions in <SPAN class="err_alert">RED</SPAN> are different from <%=pkgInfoHash.Item("pkg_name") &" "& pkgInfoHash.Item("pkg_version")%></span><br></div></td></tr></table><%End If%><!---------------------------------------------- END DETAILS ---------------------------------------------------></td></tr><tr><td background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td><td background="images/lbox_bg_blue.gif"><img src="images/h_trsp_dot.gif" width="1" height="10"></td></tr></table></body></html><!-- DESTRUCTOR -------><!--#include file="common/destructor.asp"-->