Index: WSimpl/EC/Unishop/OrderConfirmation/Service.cls.xml =================================================================== diff -u -r65150 -r65296 --- WSimpl/EC/Unishop/OrderConfirmation/Service.cls.xml (.../Service.cls.xml) (revision 65150) +++ WSimpl/EC/Unishop/OrderConfirmation/Service.cls.xml (.../Service.cls.xml) (revision 65296) @@ -92,6 +92,7 @@ Do ..PasAanShopVoorHaefele(OfferteVanHandel) } If $$$Not(OfferteVanHandel.IsBesteld()) { + Do ##class(Tools.Wlip).%New(207).String("niet besteld") Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Offerte '"_EDInr_"' van handel is nog niet besteld.")) } @@ -147,8 +148,27 @@ OfferteVanHandel:APPS.VKP.Offerte 1 @@ -169,8 +189,10 @@ #dim LeverDatum As %Date = $$INTDATE^vhLib.DataTypes(GevraagdeLeverdatum) #dim HuidigeDatum As %Date = ..DateTimeAPI.CurrentDate() Set UniShopVerwerker = ##class(APPS.EC.enu.UniShopVerwerker.AutoComplete).%New() - If ##class(TECH.StringUtils).Equals(..Shop,UniShopVerwerker.OPO, UniShopVerwerker.HaefeleBelgie, UniShopVerwerker.HaefeleNederland,UniShopVerwerker.HaefeleDuitsland,UniShopVerwerker.HaefeleZweden,UniShopVerwerker.HaefeleFinland,UniShopVerwerker.HaefeleItalie,UniShopVerwerker.HaefeleOostenrijk,UniShopVerwerker.HaefeleDenemarken,UniShopVerwerker.HaefeleFrankrijk,UniShopVerwerker.HaefeleZwitserland) && (LeverDatum = HuidigeDatum) { + If ((LeverDatum = HuidigeDatum)) && ##class(TECH.StringUtils).Equals(..Shop,UniShopVerwerker.HaefeleBelgie, UniShopVerwerker.HaefeleNederland,UniShopVerwerker.OPO) { Do VanHoeckeOfferte.ZetLeverDatum(..BepaalLeverDatum(VanHoeckeOfferte.GeefWensLeverDatum(),LeverDatum)) + } elseif (##class(TECH.StringUtils).Equals(..Shop, UniShopVerwerker.HaefeleDuitsland,UniShopVerwerker.HaefeleZweden,UniShopVerwerker.HaefeleFinland,UniShopVerwerker.HaefeleItalie,UniShopVerwerker.HaefeleOostenrijk,UniShopVerwerker.HaefeleDenemarken,UniShopVerwerker.HaefeleFrankrijk,UniShopVerwerker.HaefeleZwitserland)) { + Do VanHoeckeOfferte.ZetLeverDatum(..GeefWensLeverDatumInJuistFormaat(VanHoeckeOfferte.GeefWensLeverDatum())) } Else { Do VanHoeckeOfferte.ZetLeverDatum(LeverDatum) } @@ -202,6 +224,24 @@ ]]> + +WensLeverDatum:%String +1 +%Date + + + DatumString:%String 1 Index: vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/ConfirmOrder/Test2.cls.xml =================================================================== diff -u -r59354 -r65296 --- vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/ConfirmOrder/Test2.cls.xml (.../Test2.cls.xml) (revision 59354) +++ vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/ConfirmOrder/Test2.cls.xml (.../Test2.cls.xml) (revision 65296) @@ -17,6 +17,8 @@ Do ..VanHoeckeOfferte.IndienMethodCall("IsBesteld").DanReturn(1) Do ..VanHoeckeOfferte.IndienMethodCall("IsVhisie4").DanReturn($$$False) Do ..VanHoeckeOfferte.IndienMethodCall("GeefWinkelkarID").DanDoeNiks() + Do ..VanHoeckeOfferte.IndienMethodCall("GeefWensLeverDatum").DanReturn("2099-12-31") + Do ..ZetMockExtras()