Index: WSimpl/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r63661 -r71138
--- WSimpl/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 63661)
+++ WSimpl/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 71138)
@@ -950,6 +950,7 @@
 			If KlantinstellingenIterator.HasNext() {
 				Set Klantinstellingen = KlantinstellingenIterator.Next()
 				Set Klantinstellingen.IsExport = BewerkKlantInstellingen.IsExport
+				Set Klantinstellingen.IsBlumXs = BewerkKlantInstellingen.IsBlumXs
 				Set Klantinstellingen.WegwerpPallet = BewerkKlantInstellingen.WegwerpPallet
 				Set Klantinstellingen.MeerdereToeleveringen = BewerkKlantInstellingen.MeerdereToeleveringen
 				Do ..KlantinstellingenRepository.Bewaar(Klantinstellingen)
@@ -958,6 +959,7 @@
 					Set Klantinstellingen = ..KlantinstellingenRepository.Maak()
 					Set Klantinstellingen.KlantId = BewerkKlantInstellingen.KlantId
 					Set Klantinstellingen.IsExport = BewerkKlantInstellingen.IsExport
+					Set Klantinstellingen.IsBlumXs = BewerkKlantInstellingen.IsBlumXs
 					Set Klantinstellingen.WegwerpPallet = BewerkKlantInstellingen.WegwerpPallet
 					Set Klantinstellingen.MeerdereToeleveringen = BewerkKlantInstellingen.MeerdereToeleveringen
 					Do ..KlantinstellingenRepository.Bewaar(Klantinstellingen)
@@ -1076,7 +1078,8 @@
 	Set KlantinstellingenDto = ##class(WSimpl.Halux.AAP.dto.Klantinstellingen).%New()
 	
 	Set KlantinstellingenDto.KlantId = Klantinstellingen.KlantId 
-	Set KlantinstellingenDto.IsExport = Klantinstellingen.IsExport 
+	Set KlantinstellingenDto.IsExport = Klantinstellingen.IsExport
+	Set KlantinstellingenDto.IsBlumXs = Klantinstellingen.IsBlumXs
 	Set KlantinstellingenDto.Klantnaam = ..VerkoopAPI.GeefKlant(Klantinstellingen.KlantId).GeefNaam()
 	Set KlantinstellingenDto.WegwerpPallet = Klantinstellingen.WegwerpPallet
 	Set KlantinstellingenDto.MeerdereToeleveringen = Klantinstellingen.MeerdereToeleveringen