Index: vhUnitTest/DOM/PM/Maatwerk/GenerischProductBepaler/GeefGenerischProductID/TAX/Test.cls.xml =================================================================== diff -u --- vhUnitTest/DOM/PM/Maatwerk/GenerischProductBepaler/GeefGenerischProductID/TAX/Test.cls.xml (revision 0) +++ vhUnitTest/DOM/PM/Maatwerk/GenerischProductBepaler/GeefGenerischProductID/TAX/Test.cls.xml (revision 30262) @@ -0,0 +1,58 @@ + + + +vhUnitTest.DOM.PM.Maatwerk.TAX.Base + + +DOM.PM.Maatwerk.GenerischProductBepaler +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID.AutoComplete +1 + + + +DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken +1 + + + + + + + +aTestName:%String + + + + + + + + + + + + + + Index: DOM/PM/Maatwerk/enu/GenerischProductID.cls.xml =================================================================== diff -u -r29313 -r30262 --- DOM/PM/Maatwerk/enu/GenerischProductID.cls.xml (.../GenerischProductID.cls.xml) (revision 29313) +++ DOM/PM/Maatwerk/enu/GenerischProductID.cls.xml (.../GenerischProductID.cls.xml) (revision 30262) @@ -2,10 +2,10 @@ datatype -%String +TECH.Enumeration -;212616;865733;896366 +;868317;865733;896366;896358;896361;896354;675435;896398;896396;858490;1174139;1226125;1253212;1253213;1253214 @@ -91,6 +91,27 @@ + + +1 +DOM.PM.Maatwerk.enu.GenerischProductID + + + + +1 +DOM.PM.Maatwerk.enu.GenerischProductID + + + + +1 +DOM.PM.Maatwerk.enu.GenerischProductID + + Index: DOM/PM/Maatwerk/GenerischProductBepaler.cls.xml =================================================================== diff -u -r29313 -r30262 --- DOM/PM/Maatwerk/GenerischProductBepaler.cls.xml (.../GenerischProductBepaler.cls.xml) (revision 29313) +++ DOM/PM/Maatwerk/GenerischProductBepaler.cls.xml (.../GenerischProductBepaler.cls.xml) (revision 30262) @@ -8,6 +8,19 @@ 1 + +DOM.PM.Maatwerk.Calc.HF.impl.TAOR.PlaatAfwerkingBepaler +1 + + + +DOM.PM.Maatwerk.Calc.HF.impl.TAOR.PlaatAfwerkingBepaler + + + IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken %String @@ -74,6 +87,15 @@ Set ..GenerischProductID = ##class(DOM.PM.Maatwerk.enu.GenerischProductID).TAORBulkPerOnderdeelGegroepeerd() } ElseIf (TAORKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1()) { Set ..GenerischProductID = ##class(DOM.PM.Maatwerk.enu.GenerischProductID).TAORFlatpackV1() + } ElseIf (TAORKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).LosseComponentenInBulk()) { + #dim PlaatAfwerking As DOM.PM.enu.TAORPlaatAfwerking = ..TAORPlaatAfwerkingBepaler.GeefPlaatAfwerking(TAORKenmerken.LadeKleur) + + if (PlaatAfwerking = ##class(DOM.PM.enu.TAORPlaatAfwerking).Fineer()) { + set ..GenerischProductID = ##class(DOM.PM.Maatwerk.enu.GenerischProductID).TAORLosseComponentenInBulkFineer() + } elseif (PlaatAfwerking = ##class(DOM.PM.enu.TAORPlaatAfwerking).Melamine()) { + set ..GenerischProductID = ##class(DOM.PM.Maatwerk.enu.GenerischProductID).TAORLosseComponentenInBulkHoutDecor() + } + } Else { Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Kan geen generisch product id bepalen voor TA'OR BOX verpakking "_ TAORKenmerken.VerpakkingType)) } Index: DOM/PM/Maatwerk/enu/GenerischProductID/AutoComplete.cls.xml =================================================================== diff -u --- DOM/PM/Maatwerk/enu/GenerischProductID/AutoComplete.cls.xml (revision 0) +++ DOM/PM/Maatwerk/enu/GenerischProductID/AutoComplete.cls.xml (revision 30262) @@ -0,0 +1,119 @@ + + + + +Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig. +Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt +De enumeratie Eigenschapn moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration +serial +1 +%SerialObject + + +DOM.PM.Maatwerk.enu.GenerischProductID +"896354" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"896361" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"896358" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"865733" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"896366" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"868317" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"1174139" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"858490" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"1226125" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"896396" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"1253214" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"1253212" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"1253213" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"896398" +1 +1 + + + +DOM.PM.Maatwerk.enu.GenerischProductID +"675435" +1 +1 + + + + + Index: DOM/PM/Maatwerk/enu/GenerischProductID/Verwerker.cls.xml =================================================================== diff -u --- DOM/PM/Maatwerk/enu/GenerischProductID/Verwerker.cls.xml (revision 0) +++ DOM/PM/Maatwerk/enu/GenerischProductID/Verwerker.cls.xml (revision 30262) @@ -0,0 +1,144 @@ + + + + +Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig. +Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt +De enumeratie methoden moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration +1 +1 + + +1 +GenerischProductID:DOM.PM.Maatwerk.enu.GenerischProductID + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + + +