Index: DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItem.cls.xml
===================================================================
diff -u -r52908 -r52909
--- DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItem.cls.xml (.../SamengesteldKostItem.cls.xml) (revision 52908)
+++ DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItem.cls.xml (.../SamengesteldKostItem.cls.xml) (revision 52909)
@@ -98,7 +98,7 @@
-KostItemsToExcludeFilter:TECH.Filter
+KostItemNamenToExcludeFilter:TECH.Filter
%Decimal
@@ -90,9 +90,9 @@
#dim ExcludeList As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
Do ExcludeList.Insert("Sub12")
- #dim Filter As TECH.Filter = ##class(TECH.Filter.ValueBasedExcludeFilter).%New(ExcludeList)
+ #dim KostItemNamenToExcludeFilter As TECH.Filter = ##class(TECH.Filter.ValueBasedExcludeFilter).%New(ExcludeList)
- Set TaxVerdubbelingEnProcentueelKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.TaxVerdubbelingEnProcentueelKostItem).%New("",,,0.03,Samengesteld1,Filter)
+ Set TaxVerdubbelingEnProcentueelKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.TaxVerdubbelingEnProcentueelKostItem).%New("",,,0.03,Samengesteld1,KostItemNamenToExcludeFilter)
Do Samengesteld1.VoegToe(TaxVerdubbelingEnProcentueelKostItem)
Do $$$AssertEquals(Samengesteld1.GeefKost(),3090,"De kost is: 700 + 500 = 1200 * 2 = 2400 + 600 = 3000 + 90 (3%) = 3090")
@@ -121,9 +121,9 @@
Do ExcludeList.Insert("Sub12")
Do ExcludeList.Insert("Sub21")
- #dim Filter As TECH.Filter = ##class(TECH.Filter.ValueBasedExcludeFilter).%New(ExcludeList)
+ #dim KostItemNamenToExcludeFilter As TECH.Filter = ##class(TECH.Filter.ValueBasedExcludeFilter).%New(ExcludeList)
- Set TaxVerdubbelingEnProcentueelKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.TaxVerdubbelingEnProcentueelKostItem).%New("",,,0.03,Samengesteld1,Filter)
+ Set TaxVerdubbelingEnProcentueelKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.TaxVerdubbelingEnProcentueelKostItem).%New("",,,0.03,Samengesteld1,KostItemNamenToExcludeFilter)
Do Samengesteld1.VoegToe(TaxVerdubbelingEnProcentueelKostItem)
Do $$$AssertEquals(Samengesteld1.GeefKost(),3502,"De kost is: 700 + 500 + 100 = 1300 * 2 = 2600 + 600 + 200 = 3400 + 102(3%) = 3502")
Index: DOM/PM/Maatwerk/Calc/Kost/TaxVerdubbelingEnProcentueelKostItem.cls.xml
===================================================================
diff -u -r52908 -r52909
--- DOM/PM/Maatwerk/Calc/Kost/TaxVerdubbelingEnProcentueelKostItem.cls.xml (.../TaxVerdubbelingEnProcentueelKostItem.cls.xml) (revision 52908)
+++ DOM/PM/Maatwerk/Calc/Kost/TaxVerdubbelingEnProcentueelKostItem.cls.xml (.../TaxVerdubbelingEnProcentueelKostItem.cls.xml) (revision 52909)
@@ -8,7 +8,7 @@
1
-
+
TECH.Filter
1
@@ -26,13 +26,13 @@
De parameters TypeCode en Kost moeten niet meegegeven worden
-Naam:%String,Kost:%Float="",Details:%String="",Percentage:%Decimal,KostItemOmPercentageOpTeRekenen:DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem,KostItemsToExcludeFilter:TECH.Filter
+Naam:%String,Kost:%Float="",Details:%String="",Percentage:%Decimal,KostItemOmPercentageOpTeRekenen:DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem,KostItemNamenToExcludeFilter:TECH.Filter
1
1
%Status
@@ -59,7 +59,7 @@
%Float