Index: vhUnitTest/APPS/EC/Verkoop/impl/Externe/VerkoopService/OfferteVoorBestellingValidator/TestVH.cls.xml
===================================================================
diff -u -r44801 -r45325
--- vhUnitTest/APPS/EC/Verkoop/impl/Externe/VerkoopService/OfferteVoorBestellingValidator/TestVH.cls.xml	(.../TestVH.cls.xml)	(revision 44801)
+++ vhUnitTest/APPS/EC/Verkoop/impl/Externe/VerkoopService/OfferteVoorBestellingValidator/TestVH.cls.xml	(.../TestVH.cls.xml)	(revision 45325)
@@ -7,6 +7,10 @@
 <Type>vhTest.Mock.APPS.VKP.Offerte</Type>
 </Property>
 
+<Property name="WinkelkarServiceStub">
+<Type>vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService</Type>
+</Property>
+
 <Property name="OfferteVoorBestellingValidator">
 <Type>APPS.EC.Verkoop.impl.OfferteVoorBestellingValidator</Type>
 </Property>
@@ -31,7 +35,7 @@
 	Do ..OfferteStub.IndienMethodCall("GeefWensLeverDatum").DanReturn("ASAP")
 	Do ..OfferteStub.IndienMethodCall("IsVhisie4").DanReturn($$$True)
 
-	Set ..OfferteVoorBestellingValidator = ##class(APPS.EC.Verkoop.impl.OfferteVoorBestellingValidator).%New()
+	Set ..OfferteVoorBestellingValidator = ##class(APPS.EC.Verkoop.impl.OfferteVoorBestellingValidator).%New(..WinkelkarServiceStub)
 
 	Do $$$AssertTrue(..OfferteVoorBestellingValidator.IsGeldig(..OfferteStub,..#KlantID,..#PersonalityID))
 ]]></Implementation>
@@ -42,13 +46,27 @@
 	#dim LeverDatum As %String = "2017-05-05"
 
 	Do ..Init(LeverDatum,..#PersonalityID)
+	Do ..OfferteStub.IndienMethodCall("IsVhisie4").DanReturn($$$False)
 
-	Set ..OfferteVoorBestellingValidator = ##class(APPS.EC.Verkoop.impl.OfferteVoorBestellingValidator).%New()
+	Set ..OfferteVoorBestellingValidator = ##class(APPS.EC.Verkoop.impl.OfferteVoorBestellingValidator).%New(..WinkelkarServiceStub)
 
 	Do $$$AssertTrue(..OfferteVoorBestellingValidator.IsGeldig(..OfferteStub,..#KlantID,..#PersonalityID))
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Vhisie 3 Offerte met vervallen prijzen is niet geldig">
+<Implementation><![CDATA[
+	#dim LeverDatum As %String = "2017-05-05"
+
+	Do ..Init(LeverDatum,..#PersonalityID,,$$$True,$$$True)
+	Do ..OfferteStub.IndienMethodCall("IsVhisie4").DanReturn($$$False)
+
+	Set ..OfferteVoorBestellingValidator = ##class(APPS.EC.Verkoop.impl.OfferteVoorBestellingValidator).%New(..WinkelkarServiceStub)
+
+	Do $$$AssertFalse(..OfferteVoorBestellingValidator.IsGeldig(..OfferteStub,..#KlantID,..#PersonalityID))
+]]></Implementation>
+</Method>
+
 <Method name="Test: Vhisie4 offerte zonder leverdatum en zonder ASAP is niet geldig">
 <Implementation><![CDATA[
 	#define NogNietBesteld 0
@@ -59,7 +77,7 @@
 	Do ..OfferteStub.IndienMethodCall("GeefWensLeverDatum").DanReturn("")
 	Do ..OfferteStub.IndienMethodCall("IsVhisie4").DanReturn($$$True)
 
-	Set ..OfferteVoorBestellingValidator = ##class(APPS.EC.Verkoop.impl.OfferteVoorBestellingValidator).%New()
+	Set ..OfferteVoorBestellingValidator = ##class(APPS.EC.Verkoop.impl.OfferteVoorBestellingValidator).%New(..WinkelkarServiceStub)
 
 	Do $$$AssertFalse(..OfferteVoorBestellingValidator.IsGeldig(..OfferteStub,..#KlantID,..#PersonalityID))
 ]]></Implementation>
@@ -75,18 +93,29 @@
 	Do ..OfferteStub.IndienMethodCall("GeefWensLeverDatum").DanReturn("ASAP")
 	Do ..OfferteStub.IndienMethodCall("IsVhisie4").DanReturn($$$False)
 
-	Set ..OfferteVoorBestellingValidator = ##class(APPS.EC.Verkoop.impl.OfferteVoorBestellingValidator).%New()
+	Set ..OfferteVoorBestellingValidator = ##class(APPS.EC.Verkoop.impl.OfferteVoorBestellingValidator).%New(..WinkelkarServiceStub)
 
 	Do $$$AssertFalse(..OfferteVoorBestellingValidator.IsGeldig(..OfferteStub,..#KlantID,..#PersonalityID))
 ]]></Implementation>
 </Method>
 
-<Method name="Init">
-<FormalSpec>LeverDatum:%Date,PersonalityID:DOM.common.enu.Personality=""</FormalSpec>
+<Method name="Test: Offerte met vervallen prijzen is geldig als er geen maatwerklijnen zijn">
 <Implementation><![CDATA[
-	#dim IsBesteld As %Boolean = 0
-	#dim ZijnPrijzenVervallen As %Boolean = 0
+	#dim LeverDatum As %String = "2017-05-05"
+	#dim ErZijnMaatwerklijnen As %Boolean = $$$False
+	
+	Do ..Init(LeverDatum,..#PersonalityID,,$$$True,ErZijnMaatwerklijnen)
+	Do ..OfferteStub.IndienMethodCall("IsVhisie4").DanReturn($$$False)
 
+	Set ..OfferteVoorBestellingValidator = ##class(APPS.EC.Verkoop.impl.OfferteVoorBestellingValidator).%New(..WinkelkarServiceStub)
+
+	Do $$$AssertTrue(..OfferteVoorBestellingValidator.IsGeldig(..OfferteStub,..#KlantID,..#PersonalityID))
+]]></Implementation>
+</Method>
+
+<Method name="Init">
+<FormalSpec>LeverDatum:%Date,PersonalityID:DOM.common.enu.Personality="",IsBesteld:%Boolean=0,ZijnPrijzenVervallen:%Boolean=0,HeeftMaatwerklijnen:%Boolean=0</FormalSpec>
+<Implementation><![CDATA[
 	Set ..OfferteStub = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	If PersonalityID '= ""{
 		Do ..OfferteStub.IndienMethodCall("GeefPersonalityID").DanReturn(PersonalityID)
@@ -99,6 +128,13 @@
 	Do ..OfferteStub.IndienMethodCall("IsBesteld").DanReturn(IsBesteld)
 	Do ..OfferteStub.IndienMethodCall("ZijnPrijzenVervallen").DanReturn(ZijnPrijzenVervallen)
 	Do ..OfferteStub.IndienMethodCall("GeefLeverDatum").DanReturn(LeverDatum)
+	
+	#dim MaatwerkLijnen As %ListOfObjects = ##class(%ListOfObjects).%New()
+	If HeeftMaatwerklijnen {
+		Do MaatwerkLijnen.Insert(##class(DOM.EC.Winkelkar.MaatwerkLijn).%New())
+	} 
+	Set ..WinkelkarServiceStub = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
+	Do ..WinkelkarServiceStub.IndienMethodCall("GeefMaatwerkLijnen",$$$ElkeWaarde).DanReturn(MaatwerkLijnen)
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/EC/Verkoop/impl/OfferteVoorBestellingValidator.cls.xml
===================================================================
diff -u -r44801 -r45325
--- APPS/EC/Verkoop/impl/OfferteVoorBestellingValidator.cls.xml	(.../OfferteVoorBestellingValidator.cls.xml)	(revision 44801)
+++ APPS/EC/Verkoop/impl/OfferteVoorBestellingValidator.cls.xml	(.../OfferteVoorBestellingValidator.cls.xml)	(revision 45325)
@@ -28,6 +28,23 @@
 <Private>1</Private>
 </Property>
 
+<Property name="WinkelkarService">
+<Type>APPS.EC.Winkelkar.WinkelkarService</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>WinkelkarService:APPS.EC.Winkelkar.WinkelkarService</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..WinkelkarService = $$$Inject(WinkelkarService, ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="IsGeldig">
 <FormalSpec>Offerte:APPS.VKP.Offerte,KlantID:DOM.VKP.VanHoeckeKlantID,PersonalityID:DOM.common.enu.Personality</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
@@ -180,7 +197,13 @@
 
 <Method name="ControleerZijnPrijzenVervallen">
 <Private>1</Private>
-<Implementation><![CDATA[	Do:..Offerte.ZijnPrijzenVervallen() ..Meldingen.Insert("De offerte '"_..Offerte.GeefID()_"' is niet meer geldig!")
+<Implementation><![CDATA[
+	#dim HeeftMaatwerklijnen As %Boolean = $$$False
+	Set:$Length(..Offerte.GeefWinkelkarID()) HeeftMaatwerklijnen = (..WinkelkarService.GeefMaatwerkLijnen(..Offerte.GeefWinkelkarID()).Count()>0)
+
+	#dim ControleerOfPrijzenVervallenZijn As %Boolean = (HeeftMaatwerklijnen = $$$True)		
+	
+	Do:(ControleerOfPrijzenVervallenZijn&&..Offerte.ZijnPrijzenVervallen()) ..Meldingen.Insert("De offerte '"_..Offerte.GeefID()_"' is niet meer geldig!")
 ]]></Implementation>
 </Method>