Subversion Repositories DevTools

Rev

Rev 25 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 25 Rev 29
Line 59... Line 59...
59 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
 59 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
60 
          <%
 60 
          <%
61 
		  OraDatabase.Parameters.Add "BOM_ID", 			Request("bom_id"),			ORAPARM_INPUT, ORATYPE_NUMBER
61 
		  OraDatabase.Parameters.Add "BOM_ID", 			Request("bom_id"),			ORAPARM_INPUT, ORATYPE_NUMBER
62 
		  OraDatabase.Parameters.Add "COMPARE_BOM_ID", 	Request("compare_bom_id"),	ORAPARM_INPUT, ORATYPE_NUMBER
62 
		  OraDatabase.Parameters.Add "COMPARE_BOM_ID", 	Request("compare_bom_id"),	ORAPARM_INPUT, ORATYPE_NUMBER
63 
		  OraDatabase.Parameters.Add "PROD_ID",  		Request("prod_id"),		ORAPARM_INPUT, ORATYPE_NUMBER
63 
		  OraDatabase.Parameters.Add "PROD_ID",  		Request("prod_id"),		ORAPARM_INPUT, ORATYPE_NUMBER
- 
 
 64 
		  OraDatabase.Parameters.Add "PKG_NAME",  		Request("pkg_name"),		ORAPARM_INPUT, ORATYPE_VARCHAR2
64
65
65 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ( QueryName ), ORADYN_DEFAULT )
 66 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ( QueryName ), ORADYN_DEFAULT )
66
67
67 
		  bgColor = NULL
 68 
		  bgColor = NULL
68
69
Line 162... Line 163...
162 
		  	rsQry.MoveNext
 163 
		  	rsQry.MoveNext
163 
		  WEnd
 164 
		  WEnd
164
165
165 
		  OraDatabase.Parameters.Remove "BOM_ID"
 166 
		  OraDatabase.Parameters.Remove "BOM_ID"
166 
		  OraDatabase.Parameters.Remove "PROD_ID"
 167 
		  OraDatabase.Parameters.Remove "PROD_ID"
- 
 
 168 
		  OraDatabase.Parameters.Remove "COMPARE_BOM_ID"
- 
 
 169 
		  OraDatabase.Parameters.Remove "PKG_NAME"
167
170
168 
		  rsQry.Close
 171 
		  rsQry.Close
169 
		  Set rsQry = Nothing
 172 
		  Set rsQry = Nothing
170 
		  %>
 173 
		  %>
171
174