Index: APPS/PM/Maatwerk/impl/IngegevenKenmerkVerpakkingVisitor.cls.xml
===================================================================
diff -u -r52232 -r52248
--- APPS/PM/Maatwerk/impl/IngegevenKenmerkVerpakkingVisitor.cls.xml (.../IngegevenKenmerkVerpakkingVisitor.cls.xml) (revision 52232)
+++ APPS/PM/Maatwerk/impl/IngegevenKenmerkVerpakkingVisitor.cls.xml (.../IngegevenKenmerkVerpakkingVisitor.cls.xml) (revision 52248)
@@ -23,21 +23,6 @@
1
-
-TECH.FrequentieTabel
-1
-
-
-
-TECH.FrequentieTabel
-1
-
-
-
-TECH.FrequentieTabel
-1
-
-
%Integer
1
@@ -54,12 +39,6 @@
Set ..VerpakkingenTAOR = ##class(TECH.FrequentieTabel).%New()
Set ..VerpakkingenTBX = ##class(TECH.FrequentieTabel).%New()
Set ..VerschillendeVerpakkingsTypes = ##class(TECH.FrequentieTabel).%New()
-
- If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsGemengdVerpakkingsTypeMogelijkViaVhisie4()) {
- Set ..LBXVerschillendeVerpakkingsTypes = ##class(TECH.FrequentieTabel).%New()
- Set ..TAORVerschillendeVerpakkingsTypes = ##class(TECH.FrequentieTabel).%New()
- Set ..TBXVerschillendeVerpakkingsTypes = ##class(TECH.FrequentieTabel).%New()
- }
Quit $$$OK
]]>
@@ -75,10 +54,6 @@
@@ -87,10 +62,6 @@
@@ -106,10 +77,6 @@
Do ..VerpakkingenTBX.VerhoogMetAantal(VerpakkingType,..AantalTeGebruikenBijVerwerking)
Do ..VerschillendeVerpakkingsTypes.VerhoogMetAantal(VerpakkingType,..AantalTeGebruikenBijVerwerking)
-
- If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsGemengdVerpakkingsTypeMogelijkViaVhisie4()) {
- Do ..TBXVerschillendeVerpakkingsTypes.VerhoogMetAantal(VerpakkingType,..AantalTeGebruikenBijVerwerking)
- }
]]>
@@ -119,7 +86,7 @@
#dim Aantal As %Integer = ..VerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems()
If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsGemengdVerpakkingsTypeMogelijkViaVhisie4()) {
- Set Aantal = ##class(TECH.Math).Grootste(..LBXVerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems(), ..TAORVerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems(), ..TBXVerschillendeVerpakkingsTypes.GeefAantalVerschillendeItems())
+ Set Aantal = ##class(TECH.Math).Grootste(..VerpakkingenLBX.GeefAantalVerschillendeItems(), ..VerpakkingenTAOR.GeefAantalVerschillendeItems(), ..VerpakkingenTBX.GeefAantalVerschillendeItems())
}
Quit Aantal