Index: APPS/VKP/Korting/impl/KortingService.cls.xml
===================================================================
diff -u -r48516 -r53486
--- APPS/VKP/Korting/impl/KortingService.cls.xml	(.../KortingService.cls.xml)	(revision 48516)
+++ APPS/VKP/Korting/impl/KortingService.cls.xml	(.../KortingService.cls.xml)	(revision 53486)
@@ -124,9 +124,9 @@
 		Set lbVariantenVoorTbx = $LB(##class(DOM.PM.enu.Variant).TandemboxAntaro())
 	}
 	
-	#dim KopieerKortingVanTbxNaarLbx As %Boolean = (PersonalityID = ##class(DOM.common.enu.Personality).HaefeleNL())
-	If KopieerKortingVanTbxNaarLbx {
-		Set lbVariantenVoorTbx = lbVariantenVoorTbx _ $LB(##class(DOM.PM.enu.Variant).LegraboxPure())
+	#dim KopieerKortingVanTbxNaarAndereTypes As %Boolean = (PersonalityID = ##class(DOM.common.enu.Personality).HaefeleNL())
+	If KopieerKortingVanTbxNaarAndereTypes {
+		Set lbVariantenVoorTbx = lbVariantenVoorTbx _ $LB(##class(DOM.PM.enu.Variant).LegraboxPure()) _ $LB(##class(DOM.PM.enu.Variant).Taorbox())
 	}
 	
 	#dim KortingConfiguratieArray As Array Of APPS.VKP.dto.KortingConfiguratie = ##class(%ArrayOfObjects).%New()	
@@ -141,7 +141,7 @@
 				Do KortingConfiguratieArray.SetAt(..GeefKortingConfiguratie(KlantID,enuVariant,KortingPercentage,PersonalityID),enuVariant)
 			}
 		}
-	}	
+	}
 	Quit KortingConfiguratieArray
 ]]></Implementation>
 </Method>