Subversion Repositories DevTools

Rev

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

Rev 25 Rev 27
Line 224... Line 224...
224 
		Set rsQry = OraDatabase.DbCreateDynaset( query , ORADYN_DEFAULT )
 224 
		Set rsQry = OraDatabase.DbCreateDynaset( query , ORADYN_DEFAULT )
225
225
226 
		If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
 226 
		If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
227 
			dbPARproj_id = CInt( rsQry("proj_id") )
 227 
			dbPARproj_id = CInt( rsQry("proj_id") )
228 
			dbPARbranch_id = CInt( rsQry("branch_id") )
 228 
			dbPARbranch_id = CInt( rsQry("branch_id") )
229 
			dbPARnode_id = CInt( rsQry("node_id") )
 229 
			dbPARnode_id = Int( rsQry("node_id") )
230 
		End If
 230 
		End If
231
231
232 
		rsQry.Close
 232 
		rsQry.Close
233 
		Set rsQry = Nothing
 233 
		Set rsQry = Nothing
234 
		OraDatabase.Parameters.Remove "BOM_ID"
 234 
		OraDatabase.Parameters.Remove "BOM_ID"