Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBestellerSpy.cls.xml
===================================================================
diff -u -r36495 -r36543
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBestellerSpy.cls.xml (.../UnishopBestellerSpy.cls.xml) (revision 36495)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBestellerSpy.cls.xml (.../UnishopBestellerSpy.cls.xml) (revision 36543)
@@ -4,13 +4,12 @@
APPS.EDI.Bestel.impl.BestelService.UnishopBesteller
-%String
+%Integer
0
TECH.Horolog
-1
@@ -50,12 +49,6 @@
-
-
-TECH.Horolog
-
-
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBestellerSpy.cls.xml
===================================================================
diff -u -r36495 -r36543
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBestellerSpy.cls.xml (.../TandemboxBestellerSpy.cls.xml) (revision 36495)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBestellerSpy.cls.xml (.../TandemboxBestellerSpy.cls.xml) (revision 36543)
@@ -5,7 +5,6 @@
TECH.Horolog
-1
@@ -16,12 +15,6 @@
Quit ##class(APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat).%New(1234)
]]>
-
-
-TECH.Horolog
-
-
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/Test.cls.xml
===================================================================
diff -u -r36495 -r36543
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/Test.cls.xml (.../Test.cls.xml) (revision 36495)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/Test.cls.xml (.../Test.cls.xml) (revision 36543)
@@ -176,9 +176,9 @@
Set BestelService = ##class(APPS.EDI.Bestel.impl.BestelService).%New(UnishopBestellerSpy, TandemboxBestellerSpy)
#dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat = BestelService.PlaatsBestelling(Aanvraag)
- Set ..HorologUnishop = UnishopBestellerSpy.GeefUitvoerTijdstip()
+ Set ..HorologUnishop = UnishopBestellerSpy.UitvoerTijdstip
- Do $$$AssertTrue(..HorologUnishopGetDifferenceInMilliseconds(TandemboxBestellerSpy.GeefUitvoerTijdstip()) < 0)
+ Do $$$AssertTrue(..HorologUnishopGetDifferenceInMilliseconds(TandemboxBestellerSpy.UitvoerTijdstip) < 0)
]]>