Subversion Repositories DevTools

Rev

Rev 5751 | Rev 5854 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5751 Rev 5846
Line 541... Line 541...
541
                          " union" &_
541
                          " union" &_
542
                          " select pv_id from RELEASE_CONTENT where rtag_id=:RTAG_ID and pv_id=:PV_ID"
542
                          " select pv_id from RELEASE_CONTENT where rtag_id=:RTAG_ID and pv_id=:PV_ID"
543
          Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
543
          Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
544
          If rsTemp.RecordCount < 1 Then
544
          If rsTemp.RecordCount < 1 Then
545
               pkgInfoHash.Item ("notInRelease") = true
545
               pkgInfoHash.Item ("notInRelease") = true
-
 
546
               '
-
 
547
               ' -- Determine related package that is in the release
-
 
548
               '    Use pkg_id and v_ext to locate package
-
 
549
               Query_String = "SELECT pv.PV_ID" &_
-
 
550
                              " FROM RELEASE_CONTENT rc, package_versions pv " &_ 
-
 
551
                              " WHERE rc.rtag_id = :RTAG_ID" &_
-
 
552
                              " and rc.PV_ID = pv.pv_id" &_
-
 
553
                              " and pv.pkg_id = " & pkgInfoHash.Item ("pkg_id") &_ 
-
 
554
                              " and NVL(pv.v_ext,'') = NVL('"&pkgInfoHash.Item ("v_ext")&"', '')"
-
 
555
               Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
-
 
556
               If rsTemp.RecordCount > 0 Then
-
 
557
                pkgInfoHash.Item ("pv_id_InRelease") = (rsTemp.Fields("pv_id"))
-
 
558
               End If
546
          End If
559
          End If
547
 
560
 
548
       End If
561
       End If
549
 
562
 
550
       If     (pkgInfoHash.Item ("dlocked") = "Y") _
563
       If     (pkgInfoHash.Item ("dlocked") = "Y") _