Index: WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml
===================================================================
diff -u -r54040 -r54042
--- WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml	(.../QRcodeNaarKenmerkenService.cls.xml)	(revision 54040)
+++ WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml	(.../QRcodeNaarKenmerkenService.cls.xml)	(revision 54042)
@@ -55,6 +55,11 @@
 	#dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..ConfiguratorService.GeefOnverwerkteKenmerkenVanProduct(ProductNummer)
 	
 	#dim EconKenmerken As ECON.PM.Maatwerk.dto.EconConfiguratieKenmerken = ..AppsNaarEconConverter.ConverteerAppsNaarEcon(IngegevenKenmerken)
+	
+	If QRcodeNaarKenmerkenRequest.HerbestellingBijProbleem {
+		Do ..ZetAlleNietMeeleverenOpTrue(EconKenmerken)
+	}
+	
 	#dim EconKenmerkenArray As %ArrayOfDataTypes = EconKenmerken.ToArray()
 	Do ..ZetServiceSpecifiekeKenmerken(EconKenmerkenArray)
 	
@@ -65,6 +70,19 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetAlleNietMeeleverenOpTrue">
+<FormalSpec>EconKenmerken:ECON.PM.Maatwerk.dto.EconConfiguratieKenmerken</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim PropertyList As %ListOfDataTypes = ##class(TECH.ClassUtils).GeefProperties($classname(EconKenmerken.NietMeeleveren))
+	Set PropertyIterator = ##class(TECH.ListIterator).%New(PropertyList)
+	
+	While PropertyIterator.HasNext() {
+		Set $zobjproperty(EconKenmerken.NietMeeleveren, PropertyIterator.Next()) = "true"
+	}
+]]></Implementation>
+</Method>
+
 <Method name="GeefRegistratieCode">
 <FormalSpec>QRdata:%String</FormalSpec>
 <Private>1</Private>
Index: vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml
===================================================================
diff -u -r54036 -r54042
--- vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml	(.../Test.cls.xml)	(revision 54036)
+++ vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml	(.../Test.cls.xml)	(revision 54042)
@@ -26,6 +26,7 @@
 	Set ..Request.Header.PersonalityId = 1
 	Set ..Request.Header.KlantId = 1000
 	Set ..Request.QRcodeData = "https://www.orgalux.com/drawercode?QC="""_..#RegistratieCode_""""
+	Set ..Request.HerbestellingBijProbleem = ""
 ]]></Implementation>
 </Method>
 
@@ -167,6 +168,43 @@
 	Do AppsConverterMock.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Alle niet-meeleverens op &apos;true&apos; indien HerbestellingBijProbleem&apos;">
+<Implementation><![CDATA[
+	Set ..Request.HerbestellingBijProbleem = $$$True
+	
+	Set LadeRegistratieServiceMock = ##class(vhTest.Mock.APPS.VKP.Maatwerk.impl.LadeRegistratieService).%New()
+	Do LadeRegistratieServiceMock.VerwachtMethodCall("ZoekProductNummerViaRegistratieCode",..#RegistratieCode).DanReturn(..#ProductNummer)
+	
+	#dim Kenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
+	Set ConfiguratorServiceMock = ##class(vhTest.Mock.APPS.VKP.Maatwerk.ConfiguratorService).%New()
+	Do ConfiguratorServiceMock.VerwachtMethodCall("GeefOnverwerkteKenmerkenVanProduct",..#ProductNummer).DanReturn(Kenmerken)
+	
+	Set AppsConverterMock = ##class(vhTest.Mock.ECONimpl.PM.Maatwerk.AppsConverter).%New()
+	Do AppsConverterMock.VerwachtMethodCall("ConverteerAppsNaarEcon",Kenmerken).DanReturn(##class(vhTest.Utils.ECON.PM.Maatwerk.dto.TaxKenmerken).StandaardLade())
+	
+	Set QRNaarKenmerkenService = ##class(WSimpl.Vhisie4.QRcodeNaarKenmerkenService).%New(LadeRegistratieServiceMock, ConfiguratorServiceMock, AppsConverterMock)
+	
+	#dim Response As WS.Vhisie4.QRcodeNaarKenmerkenResponse = QRNaarKenmerkenService.GeefKenmerken(..Request)
+	
+	Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Lijn.Aantal"),"1")
+	Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Kenmerken.Verpakkingtype"),"V1")
+	Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_afdekkapboven"),"true")
+    Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_bodemondersteuning"),"true")
+    Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_frontbevestiging"),"true")
+    Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_geleider"),"true")
+    Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_koppeling"),"true")
+    Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_opvullijst"),"true")
+    Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_tiponblumotionset"),"true")
+    Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_tiponblumotionseteenhedenenmeenemers"),"true")
+    Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_tiponblumotionsynchronisatiestang"),"true")
+    Do $$$AssertEquals(Response.EconConfiguratie.GetAt("Data.Kenmerken.Nietmeeleveren.Nietmeeleveren_tiponsynchronisatieset"),"true")
+	
+	Do LadeRegistratieServiceMock.Verifieer()
+	Do ConfiguratorServiceMock.Verifieer()
+	Do AppsConverterMock.Verifieer()
+]]></Implementation>
+</Method>
 </Class>