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)