Index: vhUnitTest/APPS/VKP/VerzendWijze/DueOutProductieBepaler/Test.cls.xml
===================================================================
diff -u -r69417 -r70576
--- vhUnitTest/APPS/VKP/VerzendWijze/DueOutProductieBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 69417)
+++ vhUnitTest/APPS/VKP/VerzendWijze/DueOutProductieBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 70576)
@@ -245,6 +245,59 @@
 	Do VerzendWijzeMock.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Geef DueOutTime van verzendwijze DI1 en klant met leveradres in Nederland ">
+<Implementation><![CDATA[
+	#dim KlantNummer As %String = "DummyKlantNummer"
+	#dim DueOutProductieTime As %Time = ##class(TECH.DateTime.impl.DateTimeAPI).%New().TextToTime("13:00:00")
+	#dim OrderID As %String = "DummyOrderID"
+
+	Set CategorieBepalerMock = ##class(vhTest.Mock.APPS.Halux.common.impl.ProductieService.CategorieBepaler).%New()
+	Set LegacyPartijAPIMock = ##class(vhTest.Mock.DOM.PARTIJ.LegacyPartijAPI).%New()
+	Do LegacyPartijAPIMock.VerwachtMethodCall("GeefKlantPartijID",KlantNummer).DanReturn("DummyPartijID")
+	Do LegacyPartijAPIMock.VerwachtMethodCall("GeefKlantNummerVoorPartijID","K||26329").DanReturn($$$False)
+	
+	Set KlantOrderInstellingenMock = ##class(vhTest.Mock.DOM.VKP.KlantOrderInstellingen).%New()
+	Do KlantOrderInstellingenMock.VerwachtMethodCall("MoetOpWegwerppallet").DanReturn($$$False)
+	
+	#dim LandMock As vhTest.Mock.DOM.common.Land = ##class(vhTest.Mock.DOM.common.Land).%New()
+	Do LandMock.VerwachtMethodCall("GeefCode").DanReturn("NL")
+	#dim LeveradresMock As vhTest.Mock.DOM.VKP.LeverAdres = ##class(vhTest.Mock.DOM.VKP.LeverAdres).%New()
+	Do LeveradresMock.VerwachtMethodCall("GeefLand").DanReturn(LandMock)
+	
+	#dim KlantMock As vhTest.Mock.DOM.VKP.VanHoeckeKlant = ##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant()
+	Do KlantMock.VerwachtMethodCall("GeefKlantOrderInstellingen").DanReturn(KlantOrderInstellingenMock)
+	Do KlantMock.VerwachtMethodCall("GeefStandaardLeverAdres").DanReturn(LeveradresMock)
+	
+	Set VerkoopAPIMock = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopAPIMock.VerwachtMethodCall("GeefKlant","DummyPartijID").DanReturn(KlantMock)
+	
+	Set VerzendWijzeMock = ##class(vhTest.Mock.APPS.VKP.VerzendWijze).%New()
+	Set VerzendWijzeMock.VerzendWijzeID = "DI1"
+	
+	#dim OrderMock As vhTest.Mock.DOM.VKP.Order = ##class(vhTest.Mock.DOM.VKP.Order).%New()
+	Do OrderMock.IndienMethodCall("GeefOorsprongKetting").DanReturn("")
+	
+	#dim OrderAPIMock as DOM.VKP.OrderAPI = ##class(vhTest.Mock.DOM.VKP.OrderAPI).MockInstance()
+	Do OrderAPIMock.IndienMethodCall("BestaatOrder",OrderID).DanReturn($$$True)
+	Do OrderAPIMock.IndienMethodCall("GeefOrder",OrderID).DanReturn(OrderMock)
+	
+	#dim EindPersonalityBepalerMock As vhTest.Mock.DOM.VKP.impl.EindPersonalityBepaler = ##class(vhTest.Mock.DOM.VKP.impl.EindPersonalityBepaler).%New()
+	Do EindPersonalityBepalerMock.IndienMethodCall("GeefEindPersonality").DanReturn("")
+	
+	Set DueOutProductieBepaler = ##class(APPS.VKP.VerzendWijze.DueOutProductieBepaler).%New(CategorieBepalerMock, LegacyPartijAPIMock, VerkoopAPIMock, , OrderAPIMock, EindPersonalityBepalerMock)
+	#dim DueOutTime As %String = $ZT(DueOutProductieBepaler.GeefDueOutProductieTime("", "", KlantNummer, VerzendWijzeMock, OrderID))
+	
+	Do $$$AssertEquals(DueOutTime,"12:00:00")
+	
+	Do LegacyPartijAPIMock.Verifieer()
+	Do KlantOrderInstellingenMock.Verifieer()
+	Do KlantMock.Verifieer()
+	Do VerkoopAPIMock.Verifieer()
+	Do LandMock.Verifieer()
+	Do LeveradresMock.Verifieer()
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/VKP/VerzendWijze/DueOutProductieBepaler.cls.xml
===================================================================
diff -u -r70363 -r70576
--- APPS/VKP/VerzendWijze/DueOutProductieBepaler.cls.xml	(.../DueOutProductieBepaler.cls.xml)	(revision 70363)
+++ APPS/VKP/VerzendWijze/DueOutProductieBepaler.cls.xml	(.../DueOutProductieBepaler.cls.xml)	(revision 70576)
@@ -62,13 +62,15 @@
 	If (Categorie = ##class(APPS.Halux.common.enu.Categorie).Mat()) {
 		Set DueOutProductieTime = ..DueOutProductieBepaler.GeefDueOutProductieTime(ProductieDatum)
 	} Else {
-	 	#dim Klant As DOM.VKP.Klant = ..VerkoopAPI.GeefKlant(..LegacyPartijAPI.GeefKlantPartijID(KlantNummer))
+	 	#dim Klant As DOM.VKP.VanHoeckeKlant = ..VerkoopAPI.GeefKlant(..LegacyPartijAPI.GeefKlantPartijID(KlantNummer))
 		#dim KlantOrderInstellingen As DOM.VKP.KlantOrderInstellingen = Klant.GeefKlantOrderInstellingen()
 		
 		If IsKlantOIC {
 			Set DueOutProductieTime = $$INTTIME^vhLib.DataTypes("09:00")
 		} ElseIf ((KlantOrderInstellingen.MoetOpWegwerppallet()) || (..IsKlantVanPersonalityVoorWegwerppallet(OrderID))) {
 			Set DueOutProductieTime = $$INTTIME^vhLib.DataTypes("11:00")
+		} ElseIf (##class(TECH.StringUtils).Equals(VerzendWijze.VerzendWijzeID, "DI1", "DD1", "DI2") && (Klant.GeefStandaardLeverAdres().GeefLand().GeefCode() = "NL")) {
+			Set DueOutProductieTime = $$INTTIME^vhLib.DataTypes("12:00")
 		} Else {
 			Set DueOutProductieTime = VerzendWijze.DueOutProductieTime()
 		}
Index: vhDeploy/Deploy20230228xWijzigDueOutVerzendwijze.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20230228xWijzigDueOutVerzendwijze.cls.xml	(revision 0)
+++ vhDeploy/Deploy20230228xWijzigDueOutVerzendwijze.cls.xml	(revision 70576)
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20230228xWijzigDueOutVerzendwijze">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>DueOut voor alle verzendwijzen op 13u zetten</Default>
+</Parameter>
+
+<UDLText name="T">
+<Content><![CDATA[
+// Do ##class(vhDeploy.Deploy20230228xWijzigDueOutVerzendwijze).ExecCode()
+
+]]></Content>
+</UDLText>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ..WijzigDueoutProductie("DI1", "13:00")
+	Do ..WijzigDueoutProductie("DD1", "13:00")
+	Do ..WijzigDueoutProductie("DI2", "13:00")
+]]></Implementation>
+</Method>
+
+<Method name="WijzigDueoutProductie">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>VerzendWijzeID:%String,DueOut:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim VerzendWijze As DOM.VKP.VerzendWijze = ##class(DOM.VKP.VerzendWijze).%OpenId(VerzendWijzeID)
+	Set VerzendWijze.DueOutProductie = $$INTTIME^vhLib.DataTypes(DueOut)
+	Do VerzendWijze.Save()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>