Index: WSimpl/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r73700 -r73701
--- WSimpl/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 73700)
+++ WSimpl/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 73701)
@@ -970,6 +970,7 @@
 				Set Klantinstellingen.IsBlumXs = BewerkKlantInstellingen.IsBlumXs
 				Set Klantinstellingen.WegwerpPallet = BewerkKlantInstellingen.WegwerpPallet
 				Set Klantinstellingen.HalvePallet = BewerkKlantInstellingen.HalvePallet
+				Set Klantinstellingen.KartonnenPallet = BewerkKlantInstellingen.KartonnenPallet
 				Set Klantinstellingen.MeerdereToeleveringen = BewerkKlantInstellingen.MeerdereToeleveringen
 				
 				Do ..KlantinstellingenRepository.Bewaar(Klantinstellingen)
@@ -981,6 +982,7 @@
 					Set Klantinstellingen.IsBlumXs = BewerkKlantInstellingen.IsBlumXs
 					Set Klantinstellingen.WegwerpPallet = BewerkKlantInstellingen.WegwerpPallet
 					Set Klantinstellingen.HalvePallet = BewerkKlantInstellingen.HalvePallet
+					Set Klantinstellingen.KartonnenPallet = BewerkKlantInstellingen.KartonnenPallet
 					Set Klantinstellingen.MeerdereToeleveringen = BewerkKlantInstellingen.MeerdereToeleveringen
 					
 					Do ..KlantinstellingenRepository.Bewaar(Klantinstellingen)
@@ -1104,6 +1106,7 @@
 	Set KlantinstellingenDto.Klantnaam = ..VerkoopAPI.GeefKlant(Klantinstellingen.KlantId).GeefNaam()
 	Set KlantinstellingenDto.WegwerpPallet = Klantinstellingen.WegwerpPallet
 	Set KlantinstellingenDto.HalvePallet = Klantinstellingen.HalvePallet
+	Set KlantinstellingenDto.KartonnenPallet = Klantinstellingen.KartonnenPallet
 	Set KlantinstellingenDto.MeerdereToeleveringen = Klantinstellingen.MeerdereToeleveringen
 	
 	Quit KlantinstellingenDto