Index: vhUnitTest/APPS/OrderUitvoering/HaluxReservatie/TestVerwachteInvoerBijTransfers.cls.xml
===================================================================
diff -u -r32978 -r32979
--- vhUnitTest/APPS/OrderUitvoering/HaluxReservatie/TestVerwachteInvoerBijTransfers.cls.xml (.../TestVerwachteInvoerBijTransfers.cls.xml) (revision 32978)
+++ vhUnitTest/APPS/OrderUitvoering/HaluxReservatie/TestVerwachteInvoerBijTransfers.cls.xml (.../TestVerwachteInvoerBijTransfers.cls.xml) (revision 32979)
@@ -7,6 +7,19 @@
1
vhUnitTest.TestCase
+
+DOM.ProdRes.VerwachteInvoerAPI
+1
+
+
+
+
+
+
aTestName:%String
%Status
@@ -25,7 +38,7 @@
do ##class(vhUnitTest.DataHelper).MaakOrderCompleet(7587,198909)
- #dim VerwachteInvoer As DOM.ProdRes.VerwachteInvoer = ##class(DOM.DomeinContext).Instance().GeefVerwachteInvoerAPI().ZoekInvoerViaTransactieRef(90001,100,##class(DOM.common.enu.Bedrijf).Halux())
+ #dim VerwachteInvoer As DOM.ProdRes.VerwachteInvoer = ..VerwachteInvoerAPI.ZoekInvoerViaTransactieRef(90001,100,##class(DOM.common.enu.Bedrijf).Halux())
If ($IsObject(VerwachteInvoer)) { Do VerwachteInvoer.Delete() }
Set VerwachteInvoer = ""
@@ -96,10 +109,8 @@
#dim KlantID As DOM.VKP.VanHoeckeKlantID = "K||"_KlantNr
/* Lijn aanmaken */
+ #dim VerwachteInvoer As DOM.ProdRes.VerwachteInvoer = ..VerwachteInvoerAPI.GeefInvoerViaTransactieRef(OrderID, OrderLijnCode, ##class(DOM.common.enu.Bedrijf).Halux())
- #dim VerwachteInvoerAPI As DOM.ProdRes.VerwachteInvoer = ##class(DOM.DomeinContext).Instance().GeefVerwachteInvoerAPI()
- #dim VerwachteInvoer As DOM.ProdRes.VerwachteInvoer = VerwachteInvoerAPI.GeefInvoerViaTransactieRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).Halux())
-
Do $$$AssertEquals(VerwachteInvoer.GeefReservatie().GeefProductID(),ProductID,"Het product ID")
Do $$$AssertEquals(VerwachteInvoer.GeefReservatie().GeefDueIn(),"2011-09-16 00:00:00","De leverdatum")
Do $$$AssertEquals(VerwachteInvoer.GeefReservatie().GeefAantal(),16,"Het aantal")
@@ -118,7 +129,7 @@
Set ProductOrderLijnGewijzigdEvent = ##class(DOM.VKP.event.ProductOrderLijnGewijzigd).%New(ProductOrderLijnWijzigEventData)
Do ##class(APPS.OrderUitvoering.impl.HaluxReservatieService).BijProductOrderLijnGewijzigd(ProductOrderLijnGewijzigdEvent)
- Set VerwachteInvoer = VerwachteInvoerAPI.GeefInvoerViaTransactieRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).Halux())
+ Set VerwachteInvoer = ..VerwachteInvoerAPI.GeefInvoerViaTransactieRef(OrderID, OrderLijnCode, ##class(DOM.common.enu.Bedrijf).Halux())
Do $$$AssertEquals(VerwachteInvoer.GeefReservatie().GeefDueIn(),"2011-09-17 00:00:00","De leverdatum")
Do $$$AssertEquals(VerwachteInvoer.GeefReservatie().GeefAantal(),15,"Het aantal")
Set VerwachteInvoer = ""
@@ -133,7 +144,7 @@
Set ProductOrderLijnGewijzigdEvent = ##class(DOM.VKP.event.ProductOrderLijnGewijzigd).%New(ProductOrderLijnWijzigEventData)
Do ##class(APPS.OrderUitvoering.impl.HaluxReservatieService).BijProductOrderLijnGewijzigd(ProductOrderLijnGewijzigdEvent)
- Set VerwachteInvoer = VerwachteInvoerAPI.GeefInvoerViaTransactieRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).Halux())
+ Set VerwachteInvoer = ..VerwachteInvoerAPI.GeefInvoerViaTransactieRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).Halux())
Do $$$AssertEquals(VerwachteInvoer.GeefReservatie().GeefProductID(),570175,"De leverdatum")
Set VerwachteInvoer = ""
@@ -147,8 +158,7 @@
Set ProductOrderLijnAnnulatieEvent = ##class(DOM.VKP.event.ProductOrderLijnAnnulatie).%New(EventData)
Do ##class(APPS.OrderUitvoering.impl.HaluxReservatieService).BijProductOrderLijnAnnulatie(ProductOrderLijnAnnulatieEvent)
- Set VerwachteInvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteInvoerAPI()
- Set VerwachteInvoer = VerwachteInvoerAPI.ZoekInvoerViaTransactieRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).Halux())
+ Set VerwachteInvoer = ..VerwachteInvoerAPI.ZoekInvoerViaTransactieRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).Halux())
Do $$$AssertFalse($IsObject(VerwachteInvoer),"De invoer werd verwijderd")
Set VerwachteInvoer = ""
@@ -167,8 +177,7 @@
Do ##class(APPS.OrderUitvoering.impl.HaluxReservatieService).BijProductLijnOpBonEvent(ProductLijnOpBonEvent)
Kill ^KU1(BonID)
- Set VerwachteInvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteInvoerAPI()
- Set VerwachteInvoer = VerwachteInvoerAPI.ZoekInvoerViaTransactieRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).Halux())
+ Set VerwachteInvoer = ..VerwachteInvoerAPI.ZoekInvoerViaTransactieRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).Halux())
Do $$$AssertFalse($IsObject(VerwachteInvoer),"De invoer werd verwijderd")
Set VerwachteInvoer = ""
]]>