<%@LANGUAGE="VBSCRIPT"%> <% '===================================================== '| | '| Downloads | '| | '===================================================== %> <% Option explicit Response.Expires = 0 %> <% '------------ ACCESS CONTROL ------------------ %> <% '------------ VARIABLE DEFINITION ------------- Dim rsQry, NodeId, NodeName '------------ CONSTANTS DECLARATION ----------- '------------ VARIABLE INIT ------------------- '------------ CONDITIONS ---------------------- '---------------------------------------------- %> <% '------------ RUN BEFORE PAGE RENDER ---------- '---------------------------------------------- %>

		<%Call RenderTitle( objBomCollector )%> <% '-- Define Action buttons on this tab 'aTabBtnsDef = Array("btnAddNode", "btnRemoveNodeBulk", "height=30", "btnCopyNode", "btnPasteNode") 'Call LoadTabActionButtons ( aTabBtnsDef, objBtnControl ) ' -- Tell control if buttons need to be readonly actions 'objBtnControl.IsReadonlyAction = objBomCollector.Item("is_readonly") ' -- Conditions 'If Session( enumSESSION_COPY_TYPE ) <> "node_id_list" Then ' Call objBtnControl.Active ( "btnPasteNode", "N" ) 'End If ' -- Render Buttons 'Call objBtnControl.Render ( aTabBtnsDef ) %>     <%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) = "hide" Then%><%End If%> Downloads <% ' Load some action buttons Call objBtnControl.LoadActionButtons ( Array("btnEditNode", "btnRemoveNode"), OraDatabase ) objBtnControl.ButtonSpacer = 1 OraDatabase.Parameters.Add "BOM_ID", dbPARbom_id, ORAPARM_INPUT, ORATYPE_NUMBER Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("NodeList.sql"), ORADYN_DEFAULT ) While (NOT rsQry.BOF) AND (NOT rsQry.EOF) NodeId = rsQry("node_id") NodeName = rsQry("node_name").Value %> <%rsQry.MoveNext%> <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%> <%End If%> <% WEnd OraDatabase.Parameters.Remove "BOM_ID" %> <%=objPMod.ComposeHiddenTags()%>  Network Node Version Installation Comments " hspace="2" align="absmiddle" border="0"><%=NodeName%> <%=rsQry("node_version") &"."& rsQry("node_life_cycle") %> <%=objFormater.TextToHtml( rsQry("node_comments") )%> <%Call objBtnControl.Render ( Array("btnEditNode", "btnRemoveNode") )%>	<%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) <> "hide" Then%> <%=GetNodeImage ( dbPARnode_id )%> Reason for release Fixed Issues <%End If%>

<% '------------ RUN AFTER PAGE RENDER ----------- Set objPMod = Nothing Set objCrumbs = Nothing Set objTabControl = Nothing '---------------------------------------------- %>