Index: APPS/EC/Verkoop/ExterneVerkoopService.cls.xml
===================================================================
diff -u -r39036 -r39894
--- APPS/EC/Verkoop/ExterneVerkoopService.cls.xml	(.../ExterneVerkoopService.cls.xml)	(revision 39036)
+++ APPS/EC/Verkoop/ExterneVerkoopService.cls.xml	(.../ExterneVerkoopService.cls.xml)	(revision 39894)
@@ -72,6 +72,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="GeefAsapMogelijk">
+<Abstract>1</Abstract>
+<FormalSpec>OfferteID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+</Method>
+
 <Method name="GeefMogelijkeLeverAdressen">
 <Abstract>1</Abstract>
 <FormalSpec>OfferteID:%String</FormalSpec>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml
===================================================================
diff -u -r39594 -r39894
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml	(.../BereidVoorBestelling.cls.xml)	(revision 39594)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml	(.../BereidVoorBestelling.cls.xml)	(revision 39894)
@@ -37,6 +37,7 @@
 
 	Set Response = ##class(WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse).%New()
 	Set Response.MogelijkeLeverdatums = ..VerkoopService.GeefMogelijkeLeverdatums(OfferteID)
+	Set Response.AsapIsMogelijk = ..VerkoopService.GeefAsapMogelijk(OfferteID)
 	
 	Quit Response
 ]]></Implementation>
Index: APPS/EC/Winkelkar/WinkelkarService.cls.xml
===================================================================
diff -u -r39587 -r39894
--- APPS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39587)
+++ APPS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39894)
@@ -94,6 +94,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="GeefAsapMogelijk">
+<Abstract>1</Abstract>
+<FormalSpec>WinkelkarID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+</Method>
+
 <Method name="GeefVroegsteLeverDatum">
 <Abstract>1</Abstract>
 <FormalSpec>WinkelKarID:%String,Verzendwijze:APPS.VKP.VerzendWijze</FormalSpec>
Index: vhTest/Utils/WS/Vhisie4/Winkelkar/dto/LeverAdres.cls.xml
===================================================================
diff -u
--- vhTest/Utils/WS/Vhisie4/Winkelkar/dto/LeverAdres.cls.xml	(revision 0)
+++ vhTest/Utils/WS/Vhisie4/Winkelkar/dto/LeverAdres.cls.xml	(revision 39894)
@@ -0,0 +1,25 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Utils.WS.Vhisie4.Winkelkar.dto.LeverAdres">
+<Super>%RegisteredObject</Super>
+
+<Method name="Belgisch">
+<ClassMethod>1</ClassMethod>
+<ReturnType>WS.Vhisie4.Winkelkar.dto.LeverAdres</ReturnType>
+<Implementation><![CDATA[
+	#Dim Adres As WS.Vhisie4.Winkelkar.dto.LeverAdres = ##class(WS.Vhisie4.Winkelkar.dto.LeverAdres).%New()
+	Set Adres.Aanspreking = "Dhr"
+	Set Adres.Toenaam = "Jo"
+	Set Adres.Land = "BE"
+	Set Adres.Naam = "Kapoen"
+	Set Adres.PostCode = "9100"
+	Set Adres.StraatNrBus = "ANKERSTRAAT 91"
+	Set Adres.Taal = "N"
+	Set Adres.Woonplaats = "Sint Niklaas"
+	Quit Adres
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml
===================================================================
diff -u -r33580 -r39894
--- vhTest/Mock/APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 33580)
+++ vhTest/Mock/APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 39894)
@@ -16,19 +16,12 @@
 ]]></Implementation>
 </Method>
 
-<Method name="VerwerkMaatwerkLijn">
-<FormalSpec>MaatwerkLijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
-<ReturnType>%Status</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("VerwerkMaatwerkLijn",MaatwerkLijn)
+<Method name="GeefVroegsteLeverdatumPerLijn">
+<FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar,VerzendWijze:APPS.VKP.VerzendWijze=""</FormalSpec>
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVroegsteLeverdatumPerLijn",Winkelkar,VerzendWijze)
 ]]></Implementation>
 </Method>
-
-<Method name="VerwerkProductLijn">
-<FormalSpec>ProductLijn:DOM.EC.Winkelkar.ProductLijn</FormalSpec>
-<ReturnType>%Status</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("VerwerkProductLijn",ProductLijn)
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: WS/Vhisie4/Winkelkar/BereidVoorBestellingResponse.cls.xml
===================================================================
diff -u -r37698 -r39894
--- WS/Vhisie4/Winkelkar/BereidVoorBestellingResponse.cls.xml	(.../BereidVoorBestellingResponse.cls.xml)	(revision 37698)
+++ WS/Vhisie4/Winkelkar/BereidVoorBestellingResponse.cls.xml	(.../BereidVoorBestellingResponse.cls.xml)	(revision 39894)
@@ -17,6 +17,10 @@
 <Type>TECH.String</Type>
 <Collection>list</Collection>
 </Property>
+
+<Property name="AsapIsMogelijk">
+<Type>%Boolean</Type>
+</Property>
 </Class>
 
 
Index: DOM/EC/Winkelkar/impl/LeverdatumBepaler.cls.xml
===================================================================
diff -u -r39869 -r39894
--- DOM/EC/Winkelkar/impl/LeverdatumBepaler.cls.xml	(.../LeverdatumBepaler.cls.xml)	(revision 39869)
+++ DOM/EC/Winkelkar/impl/LeverdatumBepaler.cls.xml	(.../LeverdatumBepaler.cls.xml)	(revision 39894)
@@ -77,7 +77,6 @@
 <Implementation><![CDATA[
 	#dim ProductID As DOM.common.ProductID = MaatwerkLijn.GeefProductID()
 	Set Termijn = ..LeveringTermijn.BinnenWelkeTermijnIsHetMaatwerkProductBeschikbaarBijVanHoecke(ProductID)
-	w !,"Termijnbepaald voor LijnID "_ MaatwerkLijn.GeefID()
 	Do ..BepaalVroegsteLeverdatum(Termijn,MaatwerkLijn.GeefID())
 	Quit $$$OK
 ]]></Implementation>
@@ -90,7 +89,7 @@
 	#dim Datum As %Date = ..LeveringTermijn.GetVroegsteDatumFromTermijn(BeschikbaarTermijn)
 	Set Datum = ..LeveringTermijn.GetPickDatumMagazijnGesloten(Datum)
 	Set Datum = ..LeveringTermijn.GetVroegsteLevering(Datum)
-	w !,"Setting id " _ LijnId _ " to " _ Datum
+	Set Datum = ..LeveringTermijn.AfrondenLeverDag(Datum)
 	Do ..LeverdatumPerLijn.SetAt(Datum,LijnId)
 ]]></Implementation>
 </Method>
Index: vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService.cls.xml
===================================================================
diff -u -r39587 -r39894
--- vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39587)
+++ vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39894)
@@ -28,6 +28,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAsapMogelijk">
+<FormalSpec>WinkelkarID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefAsapMogelijk",WinkelkarID)
+]]></Implementation>
+</Method>
+
 <Method name="GeefLijn">
 <FormalSpec>WinkelkarID:%String,LijnID:%String</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.Lijn</ReturnType>
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml
===================================================================
diff -u -r39594 -r39894
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 39594)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 39894)
@@ -3,25 +3,84 @@
 <Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<Method name="Test: Indien maar 1 mogelijke leverdatum geen ASAP mogelijk">
+<Implementation><![CDATA[
+	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", 1).DanReturn("InterneId")
+		
+	#Dim Hoofding as APPS.EC.dto.Hoofding = ..GeefHoofding()
+	
+	set HoofdingMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(Hoofding)
+	
+	Set VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
+	Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","InterneId", HoofdingMatcher ).DanDoeNiks()
+	Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","InterneId").DanReturn(..GeefMogelijkeLeverdatum()) 
+	Do VerkoopServiceMock.VerwachtMethodCall("GeefAsapMogelijk","InterneId").DanReturn($$$False) 
+	
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceMock, WinkelkarRepositoryMock)
+	
+	#Dim Response As WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse
+	Set Response = Service.BereidVoorBestelling(##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest).StandaardRequest())
+	
+	If $$$AssertEquals(Response.MogelijkeLeverdatums.Count(), 1 ) {		
+		Do $$$AssertFalse(Response.AsapIsMogelijk)		
+	}
+
+	Do VerkoopServiceMock.Verifieer()
+	Do WinkelkarRepositoryMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Indien meer dan 1 mogelijke leverdatum wel ASAP mogelijk">
+<Implementation><![CDATA[
+	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", 1).DanReturn("InterneId")
+		
+	#Dim Hoofding as APPS.EC.dto.Hoofding = ..GeefHoofding()
+	
+	set HoofdingMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(Hoofding)
+	
+	Set VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
+	Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","InterneId", HoofdingMatcher ).DanDoeNiks()
+	Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","InterneId").DanReturn(..GeefMogelijkeLeverdatums())
+	Do VerkoopServiceMock.VerwachtMethodCall("GeefAsapMogelijk","InterneId").DanReturn($$$True) 
+	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceMock, WinkelkarRepositoryMock)
+	
+	#Dim Response As WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse
+	Set Response = Service.BereidVoorBestelling(##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest).StandaardRequest())
+	
+	If $$$AssertEquals(Response.MogelijkeLeverdatums.Count(), 2 ) {		
+		Do $$$AssertTrue(Response.AsapIsMogelijk)		
+	}
+
+	Do VerkoopServiceMock.Verifieer()
+	Do WinkelkarRepositoryMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test: BereidVoorBestelling plaatst de hoofding op de offerte en bepaalt de mogelijke leverdatums - standaard zijn er geen herberekende lijnen en meldingen aan de gebruiker">
 <Implementation><![CDATA[
 	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
 	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", 1).DanReturn("InterneId")
+		
+	#Dim Hoofding as APPS.EC.dto.Hoofding = ..GeefHoofding()
 	
-	set Hoofding = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(..GeefHoofding())
+	set HoofdingMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(Hoofding)
 	
 	Set VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
-	Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","InterneId", Hoofding ).DanDoeNiks()
+	Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","InterneId", HoofdingMatcher ).DanDoeNiks()
 	Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","InterneId").DanReturn(..GeefMogelijkeLeverdatums())
+	Do VerkoopServiceMock.IndienMethodCall("GeefAsapMogelijk","InterneId").DanDoeNiks()
 	
 	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceMock, WinkelkarRepositoryMock)
 	
-	#dim Reponse As WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse = Service.BereidVoorBestelling(##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest).StandaardRequest())
+	#Dim Response As WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse
+	Set Response = Service.BereidVoorBestelling(##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest).StandaardRequest())
 	
-	If $$$AssertEquals(Reponse.MogelijkeLeverdatums.Count(), 2 ) {
-		Do $$$AssertEqualsList(Reponse.MogelijkeLeverdatums, ..GeefMogelijkeLeverdatums())
-		Do $$$AssertEmptyList(Reponse.HerberekendeMaatwerklijnen)
-		Do $$$AssertEmptyList(Reponse.MeldingenAanGebruiker)
+	If $$$AssertEquals(Response.MogelijkeLeverdatums.Count(), 2 ) {
+		Do $$$AssertEqualsList(Response.MogelijkeLeverdatums, ..GeefMogelijkeLeverdatums())
+		Do $$$AssertEmptyList(Response.HerberekendeMaatwerklijnen)
+		Do $$$AssertEmptyList(Response.MeldingenAanGebruiker)
 	}
 
 	Do VerkoopServiceMock.Verifieer()
@@ -54,25 +113,25 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefMogelijkeLeverdatum">
+<Private>1</Private>
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	Set MogelijkeLeverdatums = ##class(%ListOfDataTypes).%New()
+	Do MogelijkeLeverdatums.Insert( $$$CurrentDate + 1 )
+	Quit MogelijkeLeverdatums
+]]></Implementation>
+</Method>
+
 <Method name="GeefHoofding">
 <Private>1</Private>
 <ReturnType>APPS.EC.dto.Hoofding</ReturnType>
 <Implementation><![CDATA[
-	#dim Hoofding As APPS.EC.dto.Hoofding = ##class(APPS.EC.dto.Hoofding).%New()
-	
+	#Dim Hoofding as APPS.EC.dto.Hoofding =  ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
 	Set Hoofding.BestelOpmerking = ""
-	
-	Set Hoofding.LeveringDetail = ##class(APPS.EC.dto.LeveringDetail).%New()
-	Set Hoofding.LeveringDetail.Datum = ""
-	Set Hoofding.LeveringDetail.WensDatum = ""
-	
-	Set Hoofding.LeveringDetail.Adres = ##class(vhTest.Utils.APPS.common.dto.Adres).BelgischAdres()
-	
-	Set Hoofding.Referentie = ##class(APPS.VKP.dto.DocumentReferenties).%New()
 	Set Hoofding.Referentie.OrderReferentie = ""
-	Set Hoofding.Referentie.KlantOrderNummer = ""
-	Set Hoofding.Referentie.CommissieReferentie = ""
-	Quit Hoofding
+	Set Hoofding.LeveringDetail.WensDatum = ""
+	quit Hoofding
 ]]></Implementation>
 </Method>
 </Class>
Index: vhTest/Fake/APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml
===================================================================
diff -u -r33580 -r39894
--- vhTest/Fake/APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 33580)
+++ vhTest/Fake/APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 39894)
@@ -14,6 +14,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefVroegsteLeverdatumPerLijn">
+<FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar,VerzendWijze:APPS.VKP.VerzendWijze=""</FormalSpec>
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkMaatwerkLijn">
 <FormalSpec>MaatwerkLijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
 <ReturnType>%Status</ReturnType>
Index: APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml
===================================================================
diff -u -r34834 -r39894
--- APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 34834)
+++ APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 39894)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.EC.impl.VroegsteLeverdatumBepaler">
-<Super>TECH.Mockable,%RegisteredObject,DOM.EC.Winkelkar.WinkelkarVisitor</Super>
+<Super>TECH.Mockable</Super>
 
 <Property name="VroegsteLeverdatum">
 <Type>%Date</Type>
@@ -13,6 +13,23 @@
 <Private>1</Private>
 </Property>
 
+<Property name="LeverDatumBepaler">
+<Type>DOM.EC.Winkelkar.impl.LeverdatumBepaler</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>LeverDatumBepaler:DOM.EC.Winkelkar.impl.LeverdatumBepaler</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..LeverDatumBepaler = $$$Inject(LeverDatumBepaler,##class(DOM.EC.Winkelkar.impl.LeverdatumBepaler).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="GeefVroegsteLeverdatum">
 <FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar,VerzendWijze:APPS.VKP.VerzendWijze=""</FormalSpec>
 <ReturnType>%Date</ReturnType>
@@ -21,50 +38,34 @@
 	{
 		Set VerzendWijze = ##class(APPS.EC.impl.VerzendWijzeBepaler).%New().GeefVerzendWijze(Winkelkar)	
 	}
-	Set ..LeveringTermijn = ##class(APPS.VKP.LeveringsTermijn).%New(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog(),VerzendWijze)
+	#Dim VroegsteLeverDatumsPerLijn as %ListOfDataTypes
+	#Dim Datum as %Date
 
-	#dim Datum As %Date = ..LeveringTermijn.GetVroegsteDatumFromTermijn($LB(1,"A"))
-	Set Datum = ..LeveringTermijn.GetPickDatumMagazijnGesloten(Datum)
-	Set ..VroegsteLeverdatum = ..LeveringTermijn.GetVroegsteLevering(Datum)
-	
-	#dim Iterator As TECH.Iterator = Winkelkar.GeefLijnIterator()
-	While (Iterator.HasNext()) {
-		#dim Lijn As DOM.EC.Winkelkar.Lijn = Iterator.Next()
-		Do Lijn.Accept(##this)
+	Set VroegsteLeverDatumsPerLijn = ..LeverDatumBepaler.GeefLeverdatumPerLijn(Winkelkar,VerzendWijze)
+
+	#Dim DatumIterator as TECH.ArrayOneDimIterator = ##class(TECH.ArrayOneDimIterator).%New(VroegsteLeverDatumsPerLijn)
+	if VroegsteLeverDatumsPerLijn.Count(){
+		Set ..VroegsteLeverdatum = DatumIterator.Next()
+		While DatumIterator.HasNext(){
+			Set Datum = DatumIterator.Next()
+			Set:(Datum > ..VroegsteLeverdatum) ..VroegsteLeverdatum = Datum
+		}
 	}
-	Quit ..LeveringTermijn.AfrondenLeverDag(..VroegsteLeverdatum)
+	Quit ..VroegsteLeverdatum
 ]]></Implementation>
 </Method>
 
-<Method name="VerwerkProductLijn">
-<FormalSpec>ProductLijn:DOM.EC.Winkelkar.ProductLijn</FormalSpec>
-<ReturnType>%Status</ReturnType>
+<Method name="GeefVroegsteLeverdatumPerLijn">
+<FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar,VerzendWijze:APPS.VKP.VerzendWijze=""</FormalSpec>
+<ReturnType>%ListOfDataTypes</ReturnType>
 <Implementation><![CDATA[
-	Do ..BepaalVroegsteLeverdatum(..LeveringTermijn.BeschikbaarTermijn(ProductLijn.ProductGetObjectId()))
-	Quit $$$OK
+	if (VerzendWijze = "")
+	{
+		Set VerzendWijze = ##class(APPS.EC.impl.VerzendWijzeBepaler).%New().GeefVerzendWijze(Winkelkar)	
+	}
+	quit ..LeverDatumBepaler.GeefLeverdatumPerLijn(Winkelkar,VerzendWijze)
 ]]></Implementation>
 </Method>
-
-<Method name="VerwerkMaatwerkLijn">
-<FormalSpec>MaatwerkLijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
-<ReturnType>%Status</ReturnType>
-<Implementation><![CDATA[
-	#dim ProductID As DOM.common.ProductID = MaatwerkLijn.GeefProductID()
-	Do ..BepaalVroegsteLeverdatum(..LeveringTermijn.BinnenWelkeTermijnIsHetMaatwerkProductBeschikbaarBijVanHoecke(ProductID))
-	Quit $$$OK
-]]></Implementation>
-</Method>
-
-<Method name="BepaalVroegsteLeverdatum">
-<FormalSpec>BeschikbaarTermijn:%List</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim Datum As %Date = ..LeveringTermijn.GetVroegsteDatumFromTermijn(BeschikbaarTermijn)
-	Set Datum = ..LeveringTermijn.GetPickDatumMagazijnGesloten(Datum)
-	Set Datum = ..LeveringTermijn.GetVroegsteLevering(Datum)
-	If (Datum > ..VroegsteLeverdatum) Set ..VroegsteLeverdatum = Datum
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: vhTest/Mock/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml
===================================================================
diff -u -r39036 -r39894
--- vhTest/Mock/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml	(.../ExterneVerkoopService.cls.xml)	(revision 39036)
+++ vhTest/Mock/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml	(.../ExterneVerkoopService.cls.xml)	(revision 39894)
@@ -15,6 +15,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAsapMogelijk">
+<FormalSpec>OfferteID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefAsapMogelijk",OfferteID)
+]]></Implementation>
+</Method>
+
 <Method name="GeefBestelling">
 <FormalSpec>OfferteID:%String,KlantID:DOM.VKP.VanHoeckeKlantID,PersonalityID:DOM.common.enu.Personality</FormalSpec>
 <ReturnType>APPS.EC.dto.Bestelling</ReturnType>
Index: APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml
===================================================================
diff -u -r39157 -r39894
--- APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml	(.../VerkoopService.cls.xml)	(revision 39157)
+++ APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml	(.../VerkoopService.cls.xml)	(revision 39894)
@@ -232,6 +232,16 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAsapMogelijk">
+<FormalSpec>OfferteID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+		
+	#dim Offerte As APPS.VKP.Offerte = ..OfferteService.GeefOfferte(OfferteID)
+	Quit ..WinkelkarService.GeefAsapMogelijk(Offerte.WinkelkarID)
+]]></Implementation>
+</Method>
+
 <Method name="VoegToeMaatwerk">
 <FormalSpec>OfferteID:%String,IngegevenKenmerken:APPS.PM.Maatwerk.dto.IngegevenKenmerken,Aantal:%String,ProjectReferentie:%String="",ExterneId:%String=""</FormalSpec>
 <ReturnType>%String</ReturnType>
Index: vhTest/Utils/WS/Vhisie4/Winkelkar/BestelWinkelkarRequest.cls.xml
===================================================================
diff -u -r39822 -r39894
--- vhTest/Utils/WS/Vhisie4/Winkelkar/BestelWinkelkarRequest.cls.xml	(.../BestelWinkelkarRequest.cls.xml)	(revision 39822)
+++ vhTest/Utils/WS/Vhisie4/Winkelkar/BestelWinkelkarRequest.cls.xml	(.../BestelWinkelkarRequest.cls.xml)	(revision 39894)
@@ -3,7 +3,7 @@
 <Class name="vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest">
 <Super>TECH.RegisteredObject</Super>
 
-<Method name="BestelWinkelkarRequest">
+<Method name="xBestelWinkelkarRequest">
 <ClassMethod>1</ClassMethod>
 <ReturnType>WS.Vhisie4.Winkelkar.BestelWinkelkarRequest</ReturnType>
 <Implementation><![CDATA[
@@ -19,20 +19,12 @@
 <ReturnType>WS.Vhisie4.Winkelkar.BestelWinkelkarRequest</ReturnType>
 <Implementation><![CDATA[
 	Set BestelWinkelkarRequest = ##class(WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).%New()
-	Set BestelWinkelkarRequest.Winkelkar.Id = "WinkelkarId"
+	Set BestelWinkelkarRequest.Winkelkar = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.dto.Winkelkar).StandaardProduct()
 	Set BestelWinkelkarRequest.BestelOpmerking = "BestelOpmerking"
 	Set BestelWinkelkarRequest.Leverdatum = $$$CurrentDate
-	Set BestelWinkelkarRequest.LeverAdres.Aanspreking = "Dhr"
-	Set BestelWinkelkarRequest.LeverAdres.Naam = "Kapoen"
-	Set BestelWinkelkarRequest.LeverAdres.Toenaam = "Jo"
-	Set BestelWinkelkarRequest.LeverAdres.Land = "BE" 
-	Set BestelWinkelkarRequest.LeverAdres.Woonplaats = "Sint Niklaas" 
-	Set BestelWinkelkarRequest.LeverAdres.PostCode = "9100"  
-	Set BestelWinkelkarRequest.LeverAdres.StraatNrBus = "ANKERSTRAAT 91"
-	Set BestelWinkelkarRequest.LeverAdres.Taal = "N"
+	Set BestelWinkelkarRequest.LeverAdres = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.dto.LeverAdres).Belgisch()
 	Set BestelWinkelkarRequest.Referentie = "OrderReferentie"
 	
-	
 	Quit BestelWinkelkarRequest
 ]]></Implementation>
 </Method>
Index: vhUnitTest/DOM/EC/Winkelkar/impl/LeverdatumBepaler/Test.cls.xml
===================================================================
diff -u -r39870 -r39894
--- vhUnitTest/DOM/EC/Winkelkar/impl/LeverdatumBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 39870)
+++ vhUnitTest/DOM/EC/Winkelkar/impl/LeverdatumBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 39894)
@@ -31,6 +31,8 @@
 	Do LeveringsTermijnMock.VerwachtMethodCall("GetPickDatumMagazijnGesloten",64334).DanReturn(64334) 
 	Do LeveringsTermijnMock.VerwachtMethodCall("GetVroegsteLevering",64333).DanReturn( 64334)
 	Do LeveringsTermijnMock.VerwachtMethodCall("GetVroegsteLevering",64334).DanReturn( 64335)
+	Do LeveringsTermijnMock.VerwachtMethodCall("AfrondenLeverDag",64334).DanReturn( 64334)
+	Do LeveringsTermijnMock.VerwachtMethodCall("AfrondenLeverDag",64335).DanReturn( 64335)
 	
 	Set LeverdatumBepaler = ##class(DOM.EC.Winkelkar.impl.LeverdatumBepaler).%New(VerzendWijzeBepaler,DateTimeApiMock,LeveringsTermijnFactoryMock)	
 	#Dim Datums as %ArrayOfDataTypes = LeverdatumBepaler.GeefLeverdatumPerLijn(Winkelkar)
Index: APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml
===================================================================
diff -u -r39587 -r39894
--- APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39587)
+++ APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39894)
@@ -327,6 +327,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAsapMogelijk">
+<FormalSpec>WinkelkarID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (..VroegsteLeverdatumBepaler.GeefVroegsteLeverdatumPerLijn(..GeefWinkelkar(WinkelkarID)).Count()>1)
+]]></Implementation>
+</Method>
+
 <Method name="GeefLijn">
 <FormalSpec>WinkelkarID:%String,LijnID:%String</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.Lijn</ReturnType>
Index: APPS/VKP/impl/LeveringsTermijnFactory.cls.xml
===================================================================
diff -u -r39869 -r39894
--- APPS/VKP/impl/LeveringsTermijnFactory.cls.xml	(.../LeveringsTermijnFactory.cls.xml)	(revision 39869)
+++ APPS/VKP/impl/LeveringsTermijnFactory.cls.xml	(.../LeveringsTermijnFactory.cls.xml)	(revision 39894)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="APPS.VKP.impl.LeveringsTermijnFactory">
-<Super>APPS.VKP.LeveringsTermijnFactory</Super>
+<Super>APPS.VKP.LeveringsTermijnFactory,TECH.RegisteredObject</Super>
 
 <Method name="MaakLeveringsTermijn">
 <FormalSpec>RefDate:%Date="",blVerzendWijze:APPS.VKP.VerzendWijze</FormalSpec>