WebSVN – DevTools – Diff – /ManagerSuite/Deployment_Manager/trunk/Bom_Home.asp



	
	Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("BomLocationDetails.sql"), ORADYN_DEFAULT )
	
	If rsQry.RecordCount > 0 Then
		GetCompareBomDetails = rsQry("proj_name") &"&nbsp;/&nbsp;"& rsQry("branch_name") &"&nbsp;/&nbsp;"& rsQry("bom_name") &"&nbsp;"& rsQry("bom_version") &"."& rsQry("bom_lifecycle")
 
	Else
		GetBomTreeList = NULL
		
	End If
	

        <td background="images/bg_bage_0.gif"><img src="images/spacer.gif" width="30" height="10"></td>
        <td background="images/bg_bage_0.gif">
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
		<%
		'-- Define Action buttons on this tab
		aTabBtnsDef = Array("abtnSyncProdLatest", "abtnUnhideProducts", "abtnRevertProdLatest")
		
		Call LoadTabActionButtons ( aTabBtnsDef, objBtnControl )
		
		' -- Tell control if buttons need to be readonly actions 
		objBtnControl.IsReadonlyAction = objBomCollector.Item("is_readonly")

			OraDatabase.Parameters.Add "ENTITY_ID", 		dbPARbom_id,	ORAPARM_INPUT, ORATYPE_NUMBER
			OraDatabase.Parameters.Add "ENUM_ENTITY_TYPE", 	"enumENTITY_TYPE_BOM",	ORAPARM_INPUT, ORATYPE_VARCHAR2
			
			Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("RejectionTrail.sql"), ORADYN_DEFAULT )
			
 
			sMessage = "<table width='100%'  border='0' cellspacing='3' cellpadding='0'>"
			sMessage = sMessage &"<tr>"
			sMessage = sMessage &"<td width='100%' class='body_txt'><b>BOM NOTES</b><br><br><br></td>"
			If rsQry.RecordCount = 0 Then
				sMessage = sMessage &"<td width='1%' nowrap valign='bottom' align='right'><a href='javascript:;' onClick=""MM_openBrWindow('wBomAddNote.asp?rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() &"','BomRejectNote','scrollbars=yes,resizable=yes,width=600,height=350');""  class='body_smllink' title='Create new note'>Create Note"& LIMG_NOTE_NEW &"</a></td>"

		objFormComponent.FormName = "OldVersion"
		objFormComponent.Action = SCRIPT_NAME
		objFormComponent.Method = "get"
		Call objFormComponent.FormStart()
		%> 	
		
		<SPAN class="body_colb"><%Call RenderTitle( objBomCollector )%><br>compared with <%= GetCompareBomDetails( objFormCollector.Item("compare_bom_id") ) %></SPAN><br>
		<a href="javascript:;" onclick="MM_openBrWindow('_wform_upload_pdf.asp?bom_id=<%=dbPARbom_id%>', 'upload', 'resizable=yes,height=250,width=500')" class="txt_linked">Upload PDF<img src="images/i_new.gif" width="13" height="13" hspace="2" border="0" align="absmiddle" alt="Upload pdf."></a>
		<%If NOT IsNull(objFormCollector.Item("pdf_attachment_path")) Then%>
		<a href="pdf/<%=objFormCollector.Item("pdf_attachment_path")%>" class="txt_linked" target='_blank'>Download PDF<img src="images/i_new.gif" width="13" height="13" hspace="2" border="0" align="absmiddle" alt="Download pdf."></a>
		<%End If%>
            <hr width="100%" size="1px" noshade color="#808080"><br>
			
		
		<SPAN class="body_txt">Show changes since BOM version&nbsp;</SPAN>
		<%=objFormComponent.Combo ( "compare_bom_id", GetBomTreeList(), TRUE, "class='form_ivalue'" )%>
		<%=objPMod.ComposeHiddenTagsWithout("compare_bom_id")%>
		<%=objFormComponent.SubmitButton ( "Compare", "class='form_btn'" )%>

		  	<td valign="top"><%=Eval( aProductList( 5, rowNum ) )%></td>
            <td nowrap valign="top">
			<%
			Set rsTemp = OraDatabase.DbCreateDynaset("SELECT * FROM PACKAGE_VERSIONS PV, PRODUCT_DETAILS PD WHERE PD.PROD_ID(+) = PV.PV_ID AND PV.PV_ID ="&ProdId, ORADYN_DEFAULT )
			%>
			<SPAN id="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" style="display:block;"><a href="javascript:;" class="menu_link" onClick="RequestProductLocation('?new_version=<%=aProductList( 2, rowNum )%>&prod_id=<%=ProdId%>&bom_id=<%=dbPARbom_id%>&compare_bom_id=<%=objFormCollector.Item("compare_bom_id")%>&change_type=<%=ChangeType%>&pkg_name=<%=aProductList( 1, rowNum )%>', '<%=ProdId & ChangeType%>');"><%=LIMG_EXPAND & GetProductIcon( rsTemp ) &  aProductList( 1, rowNum )%></a></SPAN>
			<SPAN id="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" style="display:none;"><a href="javascript:;" class="menu_link" onClick="ToggleDisplay( 'PRODUCT_<%=ProdId & ChangeType%>', 'IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>', 'IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>');"><%=LIMG_COLLAPSE & GetProductIcon( rsTemp ) &  aProductList( 1, rowNum )%></a></SPAN>
			<%
			rsTemp.Close()
			Set rsTemp = nothing
			%>

		  	<td valign="top"><%=Eval( aProductList( 5, rowNum ) )%></td>
            <td nowrap valign="top">
			<%
			Set rsTemp = OraDatabase.DbCreateDynaset("SELECT * FROM PACKAGE_VERSIONS PV, PRODUCT_DETAILS PD WHERE PD.PROD_ID(+) = PV.PV_ID AND PV.PV_ID ="&ProdId, ORADYN_DEFAULT )
			%>
			<SPAN id="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" style="display:block;"><a href="javascript:;" class="menu_link" onClick="RequestProductLocation('?new_version=<%=aProductList( 2, rowNum )%>&prod_id=<%=ProdId%>&bom_id=<%=dbPARbom_id%>&compare_bom_id=<%=objFormCollector.Item("compare_bom_id")%>&change_type=<%=ChangeType%>&pkg_name=<%=aProductList( 1, rowNum )%>', '<%=ProdId & ChangeType%>');"><%=LIMG_EXPAND & GetProductIcon( rsTemp ) &  aProductList( 1, rowNum )%></a></SPAN>
			<SPAN id="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" style="display:none;"><a href="javascript:;" class="menu_link" onClick="ToggleDisplay( 'PRODUCT_<%=ProdId & ChangeType%>', 'IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>', 'IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>');"><%=LIMG_COLLAPSE & GetProductIcon( rsTemp ) &  aProductList( 1, rowNum )%></a></SPAN>
			<%
			rsTemp.Close()
			Set rsTemp = nothing
			%>

Subversion Repositories DevTools

(root)/ManagerSuite/Deployment_Manager/trunk/Bom_Home.asp @ 29 – Rev 25 → 29

Rev 25		Rev 29
Line 125...		Line 125...
125		125
126	`Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("BomLocationDetails.sql"), ORADYN_DEFAULT )`	126	`Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("BomLocationDetails.sql"), ORADYN_DEFAULT )`
127		127
128	`If rsQry.RecordCount > 0 Then`	128	`If rsQry.RecordCount > 0 Then`
129	`GetCompareBomDetails = rsQry("proj_name") &" / "& rsQry("branch_name") &" / "& rsQry("bom_name") &" "& rsQry("bom_version") &"."& rsQry("bom_lifecycle")`	129	`GetCompareBomDetails = rsQry("proj_name") &" / "& rsQry("branch_name") &" / "& rsQry("bom_name") &" "& rsQry("bom_version") &"."& rsQry("bom_lifecycle")`
130		-
131	`Else`	130	`Else`
132	`GetBomTreeList = NULL`	131	`GetBomTreeList = NULL`
133		132
134	`End If`	133	`End If`
135		134
Line 236...		Line 235...
236	`<td background="images/bg_bage_0.gif"><img src="images/spacer.gif" width="30" height="10"></td>`	235	`<td background="images/bg_bage_0.gif"><img src="images/spacer.gif" width="30" height="10"></td>`
237	`<td background="images/bg_bage_0.gif">`	236	`<td background="images/bg_bage_0.gif">`
238	`<!-- BUTTONS CONTROL +++++++++++++++++++ -->`	237	`<!-- BUTTONS CONTROL +++++++++++++++++++ -->`
239	`<%`	238	`<%`
240	`'-- Define Action buttons on this tab`	239	`'-- Define Action buttons on this tab`
241	`aTabBtnsDef = Array("abtnSyncProdLatest")`	240	`aTabBtnsDef = Array("abtnSyncProdLatest", "abtnUnhideProducts", "abtnRevertProdLatest")`
242		241
243	`Call LoadTabActionButtons ( aTabBtnsDef, objBtnControl )`	242	`Call LoadTabActionButtons ( aTabBtnsDef, objBtnControl )`
244		243
245	`' -- Tell control if buttons need to be readonly actions`	244	`' -- Tell control if buttons need to be readonly actions`
246	`objBtnControl.IsReadonlyAction = objBomCollector.Item("is_readonly")`	245	`objBtnControl.IsReadonlyAction = objBomCollector.Item("is_readonly")`
Line 268...		Line 267...
268	`OraDatabase.Parameters.Add "ENTITY_ID", dbPARbom_id, ORAPARM_INPUT, ORATYPE_NUMBER`	267	`OraDatabase.Parameters.Add "ENTITY_ID", dbPARbom_id, ORAPARM_INPUT, ORATYPE_NUMBER`
269	`OraDatabase.Parameters.Add "ENUM_ENTITY_TYPE", "enumENTITY_TYPE_BOM", ORAPARM_INPUT, ORATYPE_VARCHAR2`	268	`OraDatabase.Parameters.Add "ENUM_ENTITY_TYPE", "enumENTITY_TYPE_BOM", ORAPARM_INPUT, ORATYPE_VARCHAR2`
270		269
271	`Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("RejectionTrail.sql"), ORADYN_DEFAULT )`	270	`Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("RejectionTrail.sql"), ORADYN_DEFAULT )`
272		271
273		-
274	`sMessage = "<table width='100%' border='0' cellspacing='3' cellpadding='0'>"`	272	`sMessage = "<table width='100%' border='0' cellspacing='3' cellpadding='0'>"`
275	`sMessage = sMessage &"<tr>"`	273	`sMessage = sMessage &"<tr>"`
276	`sMessage = sMessage &"<td width='100%' class='body_txt'><b>BOM NOTES</b><br><br><br></td>"`	274	`sMessage = sMessage &"<td width='100%' class='body_txt'><b>BOM NOTES</b><br><br><br></td>"`
277	`If rsQry.RecordCount = 0 Then`	275	`If rsQry.RecordCount = 0 Then`
278	`sMessage = sMessage &"<td width='1%' nowrap valign='bottom' align='right'><a href='javascript:;' onClick=""MM_openBrWindow('wBomAddNote.asp?rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() &"','BomRejectNote','scrollbars=yes,resizable=yes,width=600,height=350');"" class='body_smllink' title='Create new note'>Create Note"& LIMG_NOTE_NEW &"</a></td>"`	276	`sMessage = sMessage &"<td width='1%' nowrap valign='bottom' align='right'><a href='javascript:;' onClick=""MM_openBrWindow('wBomAddNote.asp?rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() &"','BomRejectNote','scrollbars=yes,resizable=yes,width=600,height=350');"" class='body_smllink' title='Create new note'>Create Note"& LIMG_NOTE_NEW &"</a></td>"`
Line 360...		Line 358...
360	`objFormComponent.FormName = "OldVersion"`	358	`objFormComponent.FormName = "OldVersion"`
361	`objFormComponent.Action = SCRIPT_NAME`	359	`objFormComponent.Action = SCRIPT_NAME`
362	`objFormComponent.Method = "get"`	360	`objFormComponent.Method = "get"`
363	`Call objFormComponent.FormStart()`	361	`Call objFormComponent.FormStart()`
364	`%>`	362	`%>`
-		363
365	`<SPAN class="body_colb"><%Call RenderTitle( objBomCollector )%><br>compared with <%= GetCompareBomDetails( objFormCollector.Item("compare_bom_id") ) %></SPAN><br>`	364	`<SPAN class="body_colb"><%Call RenderTitle( objBomCollector )%><br>compared with <%= GetCompareBomDetails( objFormCollector.Item("compare_bom_id") ) %></SPAN><br>`
-		365	`<a href="javascript:;" onclick="MM_openBrWindow('_wform_upload_pdf.asp?bom_id=<%=dbPARbom_id%>', 'upload', 'resizable=yes,height=250,width=500')" class="txt_linked">Upload PDF<img src="images/i_new.gif" width="13" height="13" hspace="2" border="0" align="absmiddle" alt="Upload pdf."></a>`
-		366	`<%If NOT IsNull(objFormCollector.Item("pdf_attachment_path")) Then%>`
-		367	`<a href="pdf/<%=objFormCollector.Item("pdf_attachment_path")%>" class="txt_linked" target='_blank'>Download PDF<img src="images/i_new.gif" width="13" height="13" hspace="2" border="0" align="absmiddle" alt="Download pdf."></a>`
-		368	`<%End If%>`
366	`<hr width="100%" size="1px" noshade color="#808080"><br>`	369	`<hr width="100%" size="1px" noshade color="#808080"><br>`
-		370
367		371
368	`<SPAN class="body_txt">Show changes since BOM version </SPAN>`	372	`<SPAN class="body_txt">Show changes since BOM version </SPAN>`
369	`<%=objFormComponent.Combo ( "compare_bom_id", GetBomTreeList(), TRUE, "class='form_ivalue'" )%>`	373	`<%=objFormComponent.Combo ( "compare_bom_id", GetBomTreeList(), TRUE, "class='form_ivalue'" )%>`
370	`<%=objPMod.ComposeHiddenTagsWithout("compare_bom_id")%>`	374	`<%=objPMod.ComposeHiddenTagsWithout("compare_bom_id")%>`
371	`<%=objFormComponent.SubmitButton ( "Compare", "class='form_btn'" )%>`	375	`<%=objFormComponent.SubmitButton ( "Compare", "class='form_btn'" )%>`
Line 396...		Line 400...
396	`<td valign="top"><%=Eval( aProductList( 5, rowNum ) )%></td>`	400	`<td valign="top"><%=Eval( aProductList( 5, rowNum ) )%></td>`
397	`<td nowrap valign="top">`	401	`<td nowrap valign="top">`
398	`<%`	402	`<%`
399	`Set rsTemp = OraDatabase.DbCreateDynaset("SELECT * FROM PACKAGE_VERSIONS PV, PRODUCT_DETAILS PD WHERE PD.PROD_ID(+) = PV.PV_ID AND PV.PV_ID ="&ProdId, ORADYN_DEFAULT )`	403	`Set rsTemp = OraDatabase.DbCreateDynaset("SELECT * FROM PACKAGE_VERSIONS PV, PRODUCT_DETAILS PD WHERE PD.PROD_ID(+) = PV.PV_ID AND PV.PV_ID ="&ProdId, ORADYN_DEFAULT )`
400	`%>`	404	`%>`
401	`<SPAN id="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" style="display:block;"><a href="javascript:;" class="menu_link" onClick="RequestProductLocation('?new_version=<%=aProductList( 2, rowNum )%>&prod_id=<%=ProdId%>&bom_id=<%=dbPARbom_id%>&compare_bom_id=<%=objFormCollector.Item("compare_bom_id")%>&change_type=<%=ChangeType%>', '<%=ProdId & ChangeType%>');"><%=LIMG_EXPAND & GetProductIcon( rsTemp ) & aProductList( 1, rowNum )%></a></SPAN>`	405	<SPAN id="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" style="display:block;"><a href="javascript:;" class="menu_link" onClick="RequestProductLocation('?new_version=<%=aProductList( 2, rowNum )%>&prod_id=<%=ProdId%>&bom_id=<%=dbPARbom_id%>&compare_bom_id=<%=objFormCollector.Item("compare_bom_id")%>&change_type=<%=ChangeType%>&pkg_name=<%=aProductList( 1, rowNum )%>', '<%=ProdId & ChangeType%>');"><%=LIMG_EXPAND & GetProductIcon( rsTemp ) & aProductList( 1, rowNum )%></a></SPAN>
402	`<SPAN id="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" style="display:none;"><a href="javascript:;" class="menu_link" onClick="ToggleDisplay( 'PRODUCT_<%=ProdId & ChangeType%>', 'IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>', 'IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>');"><%=LIMG_COLLAPSE & GetProductIcon( rsTemp ) & aProductList( 1, rowNum )%></a></SPAN>`	406	`<SPAN id="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" style="display:none;"><a href="javascript:;" class="menu_link" onClick="ToggleDisplay( 'PRODUCT_<%=ProdId & ChangeType%>', 'IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>', 'IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>');"><%=LIMG_COLLAPSE & GetProductIcon( rsTemp ) & aProductList( 1, rowNum )%></a></SPAN>`
403	`<%`	407	`<%`
404	`rsTemp.Close()`	408	`rsTemp.Close()`
405	`Set rsTemp = nothing`	409	`Set rsTemp = nothing`
406	`%>`	410	`%>`
Line 452...		Line 456...
452	`<td valign="top"><%=Eval( aProductList( 5, rowNum ) )%></td>`	456	`<td valign="top"><%=Eval( aProductList( 5, rowNum ) )%></td>`
453	`<td nowrap valign="top">`	457	`<td nowrap valign="top">`
454	`<%`	458	`<%`
455	`Set rsTemp = OraDatabase.DbCreateDynaset("SELECT * FROM PACKAGE_VERSIONS PV, PRODUCT_DETAILS PD WHERE PD.PROD_ID(+) = PV.PV_ID AND PV.PV_ID ="&ProdId, ORADYN_DEFAULT )`	459	`Set rsTemp = OraDatabase.DbCreateDynaset("SELECT * FROM PACKAGE_VERSIONS PV, PRODUCT_DETAILS PD WHERE PD.PROD_ID(+) = PV.PV_ID AND PV.PV_ID ="&ProdId, ORADYN_DEFAULT )`
456	`%>`	460	`%>`
457	`<SPAN id="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" style="display:block;"><a href="javascript:;" class="menu_link" onClick="RequestProductLocation('?new_version=<%=aProductList( 2, rowNum )%>&prod_id=<%=ProdId%>&bom_id=<%=dbPARbom_id%>&compare_bom_id=<%=objFormCollector.Item("compare_bom_id")%>&change_type=<%=ChangeType%>', '<%=ProdId & ChangeType%>');"><%=LIMG_EXPAND & GetProductIcon( rsTemp ) & aProductList( 1, rowNum )%></a></SPAN>`	461	<SPAN id="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>" style="display:block;"><a href="javascript:;" class="menu_link" onClick="RequestProductLocation('?new_version=<%=aProductList( 2, rowNum )%>&prod_id=<%=ProdId%>&bom_id=<%=dbPARbom_id%>&compare_bom_id=<%=objFormCollector.Item("compare_bom_id")%>&change_type=<%=ChangeType%>&pkg_name=<%=aProductList( 1, rowNum )%>', '<%=ProdId & ChangeType%>');"><%=LIMG_EXPAND & GetProductIcon( rsTemp ) & aProductList( 1, rowNum )%></a></SPAN>
458	`<SPAN id="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" style="display:none;"><a href="javascript:;" class="menu_link" onClick="ToggleDisplay( 'PRODUCT_<%=ProdId & ChangeType%>', 'IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>', 'IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>');"><%=LIMG_COLLAPSE & GetProductIcon( rsTemp ) & aProductList( 1, rowNum )%></a></SPAN>`	462	`<SPAN id="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" name="IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>" style="display:none;"><a href="javascript:;" class="menu_link" onClick="ToggleDisplay( 'PRODUCT_<%=ProdId & ChangeType%>', 'IMG_EXPAND_PRODUCT_<%=ProdId & ChangeType%>', 'IMG_COLLAPSE_PRODUCT_<%=ProdId & ChangeType%>');"><%=LIMG_COLLAPSE & GetProductIcon( rsTemp ) & aProductList( 1, rowNum )%></a></SPAN>`
459	`<%`	463	`<%`
460	`rsTemp.Close()`	464	`rsTemp.Close()`
461	`Set rsTemp = nothing`	465	`Set rsTemp = nothing`
462	`%>`	466	`%>`