Index: AXimpl/Utils.cls.xml =================================================================== diff -u -r47532 -r47676 --- AXimpl/Utils.cls.xml (.../Utils.cls.xml) (revision 47532) +++ AXimpl/Utils.cls.xml (.../Utils.cls.xml) (revision 47676) @@ -503,7 +503,7 @@ Set ADUPriceCodexGroupId = "OL" } ElseIf ($G(PRNr)&&ProductTypeAPI.IsTAORIndelingProduct(PRNr))||(Type = ##class(BL.Legacy.enu.CodexType).TAOR()) { Set ADUPriceCodexGroupId = "TA" - } ElseIf $$$PRGet($$$KlassificatieKey)=35 { ; Subgroep="ZZ-MAG-KAT" + } ElseIf $$$PRGet($$$VorkPerc)'=40{ ; $$$PRGet($$$KlassificatieKey)=35 { ; Subgroep="ZZ-MAG-KAT" Set ADUPriceCodexGroupId = "MAG" } Else { Set ADUPriceCodexGroupId = "STD"