Index: vhUnitTest/DOM/ProdRes/VerwachteUitvoerAPI/GeefAantalGereserveerd/Test.cls.xml =================================================================== diff -u -r33221 -r33225 --- vhUnitTest/DOM/ProdRes/VerwachteUitvoerAPI/GeefAantalGereserveerd/Test.cls.xml (.../Test.cls.xml) (revision 33221) +++ vhUnitTest/DOM/ProdRes/VerwachteUitvoerAPI/GeefAantalGereserveerd/Test.cls.xml (.../Test.cls.xml) (revision 33225) @@ -72,8 +72,17 @@ TECH.DynamicQuery 0 " + + Set Query.Statement = Statement Set Query.Parameters = $ListBuild(..#ProductID, ##class(TECH.ListUtils).ListToPieces(..GeefReservatieFasen(), "', '"), ..MaxDueOut, ..Bedrijf, ..InclusiefTransferReservatie) Quit Query Index: DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml =================================================================== diff -u -r33221 -r33225 --- DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml (.../VerwachteUitvoerAPIimpl.cls.xml) (revision 33221) +++ DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml (.../VerwachteUitvoerAPIimpl.cls.xml) (revision 33225) @@ -136,7 +136,8 @@ Set Statement = Statement _ "AND Reservatie.ReservatieFase IN ('?') " Set Statement = Statement _ "AND (Reservatie.DueOut is null OR Reservatie.DueOut <= ?) " Set Statement = Statement _ "AND Reservatie.Bedrijf = ? " - Set Statement = Statement _ "AND (? = 1 OR IsTransferReservatie = 0)" + Set Statement = Statement _ "AND (? = 1 OR IsTransferReservatie = 0) " + Set Statement = Statement _ "AND Reservatie.Aantal > 0 " #dim Query As TECH.DynamicQuery = ##class(TECH.DynamicQuery).%New(Statement, $ListBuild(ProductID, MogelijkeReservatieFases, MaxDueOut, Bedrijf, InclusiefTransferReservatie)) #dim ResultSet As TECH.ResultSet = ..QueryAPI.GetResultSet(Query)