Index: APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml
===================================================================
diff -u -r30301 -r30452
--- APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml	(.../PrijsBerekeningPrijsBepaler.cls.xml)	(revision 30301)
+++ APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBerekeningPrijsBepaler.cls.xml	(.../PrijsBerekeningPrijsBepaler.cls.xml)	(revision 30452)
@@ -154,14 +154,17 @@
 <Implementation><![CDATA[
 	#dim Aantal As %Integer
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ..MaatwerkLijn.GeefIngegevenKenmerken()
-	#dim IngegevenKenmerkenAPI As DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI = ##class(DOM.DomeinContext).Instance().GeefIngegevenKenmerkenTypeAPI()	
-
 	#dim IsFamilieLade As %Boolean = (IngegevenKenmerken.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade())
 	#dim IsVariantTAOR As %Boolean = (IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).Taorbox())
-	#dim IsEenLosseComponentenVerpakking As %Boolean = IngegevenKenmerkenAPI.IsEenLosseComponentenVerpakking(IngegevenKenmerken)
 	
-	if (IsFamilieLade && IsVariantTAOR && IsEenLosseComponentenVerpakking) {
- 		set Aantal = 10
+	set Aantal = ..MaatwerkLijn.GeefAantal()
+	
+	if (IsFamilieLade && IsVariantTAOR) {
+		#dim TAORKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = IngegevenKenmerken
+		
+		if (TAORKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).LosseComponentenInBulk()) {
+			set Aantal = 10
+		}
 	} else {
 		set Aantal = ..MaatwerkLijn.GeefAantal()
 	}
Index: vhUnitTest/DOM/PM/Maatwerk/impl/IngegevenKenmerkenTypeAPI/IsEenLosseComponentenVerpakking/Test.cls.xml
===================================================================
diff -u -r30345 -r30452
--- vhUnitTest/DOM/PM/Maatwerk/impl/IngegevenKenmerkenTypeAPI/IsEenLosseComponentenVerpakking/Test.cls.xml	(.../IsEenLosseComponentenVerpakkingBepaler/IsEenLCVerpakking/Test.cls.xml)	(revision 30345)
+++ vhUnitTest/DOM/PM/Maatwerk/impl/IngegevenKenmerkenTypeAPI/IsEenLosseComponentenVerpakking/Test.cls.xml	(.../IsEenLosseComponentenVerpakking/Test.cls.xml)	(revision 30452)
@@ -1,18 +1,18 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
-<Class name="vhUnitTest.DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI.IsEenLosseComponentenVerpakkingBepaler.IsEenLCVerpakking.Test">
+<Class name="vhUnitTest.DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI.IsEenLosseComponentenVerpakking.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Property name="IsEenLosseComponentenVerpakkingBepaler">
-<Type>DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI.IsEenLosseComponentenVerpakkingBepaler</Type>
+<Property name="IngegevenKenmerkenTypeAPI">
+<Type>DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="OnBeforeAllTests">
 <Implementation><![CDATA[
 	do ##super()
-	
-	set ..IsEenLosseComponentenVerpakkingBepaler = ##class(DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI.IsEenLosseComponentenVerpakkingBepaler).%New()
+		
+	set ..IngegevenKenmerkenTypeAPI = ##class(DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI).%New()
 ]]></Implementation>
 </Method>
 
@@ -29,12 +29,12 @@
 		if (##class(TECH.StringUtils).Equals(VerpakkingType, TAORVerpakkingType.BulkPerOnderdeelGegroepeerd, TAORVerpakkingType.LosseComponentenInBulk)) {
 			set VerwachteWaarde = $$$True
 		} elseif (##class(TECH.StringUtils).Equals(VerpakkingType, TAORVerpakkingType.V1, TAORVerpakkingType.Probox, TAORVerpakkingType.FlatpackV1)) {
-			Set VerwachteWaarde = $$$False
+			set VerwachteWaarde = $$$False
 		} else {
-			Do $$$AssertFalse(1, "Verpakking " _ VerpakkingType _ " niet gecontroleerd")
+			do $$$AssertFalse(1, "Verpakking " _ VerpakkingType _ " niet gecontroleerd")
 		}
 		
-		do $$$AssertEquals(..IsEenLosseComponentenVerpakkingBepaler.IsEenLosseComponentenVerpakking(TAORKenmerken), VerwachteWaarde)
+		do $$$AssertEquals(..IngegevenKenmerkenTypeAPI.IsEenLosseComponentenVerpakking(TAORKenmerken), VerwachteWaarde)
 	}
 ]]></Implementation>
 </Method>
@@ -43,25 +43,25 @@
 <Implementation><![CDATA[
 	#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).DummyLade()
 	
-	do $$$AssertEquals(..IsEenLosseComponentenVerpakkingBepaler.IsEenLosseComponentenVerpakking(LBXKenmerken), $$$False)
+	do $$$AssertEquals(..IngegevenKenmerkenTypeAPI.IsEenLosseComponentenVerpakking(LBXKenmerken), $$$False)
 ]]></Implementation>
 </Method>
 
 <Method name="TestMAT">
 <Implementation><![CDATA[
 	#dim MATKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken).%New()
 	
-	do $$$AssertEquals(..IsEenLosseComponentenVerpakkingBepaler.IsEenLosseComponentenVerpakking(MATKenmerken), $$$False)
+	do $$$AssertEquals(..IngegevenKenmerkenTypeAPI.IsEenLosseComponentenVerpakking(MATKenmerken), $$$False)
 ]]></Implementation>
 </Method>
 
 <Method name="TestTBX">
 <Implementation><![CDATA[
-	#dim TBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
+	#dim TBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
 	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Nog niet geïmplementeerd")
 	
 	do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.UnimplementedException).%ClassName(1), Substrings))
-	do ..IsEenLosseComponentenVerpakkingBepaler.IsEenLosseComponentenVerpakking(TBXKenmerken)
+	do ..IngegevenKenmerkenTypeAPI.IsEenLosseComponentenVerpakking(TBXKenmerken)
 ]]></Implementation>
 </Method>
 </Class>
FishEye: Tag 30452 refers to a dead (removed) revision in file `vhUnitTest/DOM/PM/Maatwerk/impl/IngegevenKenmerkenTypeAPI/IsEenLosseComponentenVerpakkingBepaler/IsEenLCVerpakking/Test.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?