Subversion Repositories DevTools

Rev

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

Rev 15 Rev 23
Line 226... Line 226...
226
	  If (objFormCollector.Item("rtag_id_fk") <> "")  Then
226
	  If (objFormCollector.Item("rtag_id_fk") <> "")  Then
227
	  	  
227
	  	  
228
		  '===== Release Manager PRODUCTS =====
228
		  '===== Release Manager PRODUCTS =====
229
		  OraDatabase.Parameters.Add "RTAG_ID_FK", 				objFormCollector.Item("rtag_id_fk"),	ORAPARM_INPUT, ORATYPE_NUMBER 
229
		  OraDatabase.Parameters.Add "RTAG_ID_FK", 				objFormCollector.Item("rtag_id_fk"),	ORAPARM_INPUT, ORATYPE_NUMBER 
230
		  OraDatabase.Parameters.Add "enumPRODUCTS_BASE_VIEW_ID", 	enumPRODUCTS_BASE_VIEW_ID,				ORAPARM_INPUT, ORATYPE_NUMBER 
230
		  OraDatabase.Parameters.Add "enumPRODUCTS_BASE_VIEW_ID", 	enumPRODUCTS_BASE_VIEW_ID,				ORAPARM_INPUT, ORATYPE_NUMBER 
-
 
231
		  OraDatabase.Parameters.Add "enumAUTOPRODUCTS_BASE_VIEW_ID", 	enumAUTOPRODUCTS_BASE_VIEW_ID,				ORAPARM_INPUT, ORATYPE_NUMBER 
231
		  OraDatabase.Parameters.Add "OS_ID", 						parOs_id,								ORAPARM_INPUT, ORATYPE_NUMBER 
232
		  OraDatabase.Parameters.Add "OS_ID", 						parOs_id,								ORAPARM_INPUT, ORATYPE_NUMBER 
232
		  
233
		  
233
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ReleaseManagerProductsView.sql"), ORADYN_DEFAULT )
234
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ReleaseManagerProductsView.sql"), ORADYN_DEFAULT )
234
		  
235
		  
235
		  If rsQry.RecordCount < 1 Then
236
		  If rsQry.RecordCount < 1 Then
Line 273... Line 274...
273
		  
274
		  
274
		  
275
		  
275
		  
276
		  
276
		  OraDatabase.Parameters.Remove "RM_BRANCH_ID"
277
		  OraDatabase.Parameters.Remove "RM_BRANCH_ID"
277
		  OraDatabase.Parameters.Remove "enumPRODUCTS_BASE_VIEW_ID"
278
		  OraDatabase.Parameters.Remove "enumPRODUCTS_BASE_VIEW_ID"
-
 
279
		  OraDatabase.Parameters.Remove "enumAUTOPRODUCTS_BASE_VIEW_ID"		  
278
		  OraDatabase.Parameters.Remove "OS_ID"
280
		  OraDatabase.Parameters.Remove "OS_ID"
279
		  
281
		  
280
	  End If
282
	  End If
281
	  %>
283
	  %>
282
          </table></td>
284
          </table></td>