Index: vhTest/Utils/APPS/EDI/common/dto/LadeTAX.cls.xml =================================================================== diff -u -r36968 -r52508 --- vhTest/Utils/APPS/EDI/common/dto/LadeTAX.cls.xml (.../LadeTAX.cls.xml) (revision 36968) +++ vhTest/Utils/APPS/EDI/common/dto/LadeTAX.cls.xml (.../LadeTAX.cls.xml) (revision 52508) @@ -10,11 +10,11 @@ Set Resultaat = ##class(APPS.EDI.common.dto.v001.LadeTAX).%New() Set Enum = ##class(DOM.PM.Maatwerk.TAX.impl.BaseEnums).%New() - Set Resultaat.BodemKleur = Enum.BodemKleur.NatuurNotenhout + Set Resultaat.BodemKleur = Enum.BodemKleur.Wit Set Resultaat.CorpusBreedte = 600 - Set Resultaat.CorpusWandDikte = "" + Set Resultaat.CorpusWandDikte = 0 Set Resultaat.Draagkracht = Enum.Draagkracht.Draagkracht40 - Set Resultaat.FrontBevestiging = Enum.FrontBevestiging.Drevel + Set Resultaat.FrontBevestiging = Enum.FrontBevestiging.Expando Set Resultaat.FrontEindkapKleur = Enum.FrontEindkapKleur.AluminiumLook Set Resultaat.GeleiderTechnologie = Enum.GeleiderTechnologie.BLUMOTION Set Resultaat.GlijderType = Enum.GlijderType.Movento @@ -25,17 +25,75 @@ Set Resultaat.IsBinnenbreedte = $$$True Set Resultaat.IsBinnenlade = $$$False Set Resultaat.KoppelingType = "Schroef" - Set Resultaat.LadeBinnenKleur = Enum.LadeKleur.NatuurNotenhout + Set Resultaat.LadeBinnenKleur = Enum.LadeKleur.Wit Set Resultaat.LadeDiepte = Enum.LadeDiepte.LadeDiepte500 - Set Resultaat.LadeHoogte = Enum.LadeHoogte.C - Set Resultaat.LadeKleur = Enum.LadeKleur.NatuurNotenhout + Set Resultaat.LadeHoogte = Enum.LadeHoogte.M + Set Resultaat.LadeKleur = Enum.LadeKleur.Wit Set Resultaat.OpvullijstKleur = "" + Set Resultaat.Toepassing = Enum.Toepassing.Lade Set Resultaat.VerpakkingType = Enum.VerpakkingType.V1 - Set Resultaat.RugHoogte = Enum.LadeHoogte.C + Set Resultaat.RugHoogte = Enum.LadeHoogte.M Quit Resultaat ]]> + + +1 +APPS.EDI.common.dto.v001.LadeTAX + + + + +1 +APPS.EDI.common.dto.v001.LadeTAX + + Index: vhUnitTest/APPS/EDI/common/impl/ProductConverter/Convert/TestTAX.cls.xml =================================================================== diff -u -r52219 -r52508 --- vhUnitTest/APPS/EDI/common/impl/ProductConverter/Convert/TestTAX.cls.xml (.../TestTAX.cls.xml) (revision 52219) +++ vhUnitTest/APPS/EDI/common/impl/ProductConverter/Convert/TestTAX.cls.xml (.../TestTAX.cls.xml) (revision 52508) @@ -17,11 +17,11 @@ Set Enum = ##class(DOM.PM.Maatwerk.TAX.impl.BaseEnums).%New() Do $$$AssertEquals(TAORKenmerken.SpecialType,Enum.SpecialType.Normaal) - Do $$$AssertEquals(TAORKenmerken.BodemKleur,Enum.BodemKleur.NatuurNotenhout) + Do $$$AssertEquals(TAORKenmerken.BodemKleur,Enum.BodemKleur.Wit) Do $$$AssertEquals(TAORKenmerken.CorpusBreedte,600) - Do $$$AssertEquals(TAORKenmerken.CorpusWandDikte,"") + Do $$$AssertEquals(TAORKenmerken.CorpusWandDikte,0) Do $$$AssertEquals(TAORKenmerken.Draagkracht,Enum.Draagkracht.Draagkracht40) - Do $$$AssertEquals(TAORKenmerken.FrontBevestiging,Enum.FrontBevestiging.Drevel) + Do $$$AssertEquals(TAORKenmerken.FrontBevestiging,Enum.FrontBevestiging.Expando) Do $$$AssertEquals(TAORKenmerken.FrontEindkapKleur,Enum.FrontEindkapKleur.AluminiumLook) Do $$$AssertEquals(TAORKenmerken.GeleiderTechnologie,Enum.GeleiderTechnologie.BLUMOTION) Do $$$AssertEquals(TAORKenmerken.GlijderType,Enum.GlijderType.Movento) @@ -32,14 +32,14 @@ Do $$$AssertEquals(TAORKenmerken.IsBinnenbreedte,$$$True) Do $$$AssertEquals(TAORKenmerken.IsBinnenlade,$$$False) Do $$$AssertEquals(TAORKenmerken.KoppelingType,"Schroef") - Do $$$AssertEquals(TAORKenmerken.LadeBinnenKleur,Enum.LadeKleur.NatuurNotenhout) + Do $$$AssertEquals(TAORKenmerken.LadeBinnenKleur,Enum.LadeKleur.Wit) Do $$$AssertEquals(TAORKenmerken.LadeDiepte,Enum.LadeDiepte.LadeDiepte500) - Do $$$AssertEquals(TAORKenmerken.LadeHoogte,Enum.LadeHoogte.C) - Do $$$AssertEquals(TAORKenmerken.LadeKleur,Enum.LadeKleur.NatuurNotenhout) + Do $$$AssertEquals(TAORKenmerken.LadeHoogte,Enum.LadeHoogte.M) + Do $$$AssertEquals(TAORKenmerken.LadeKleur,Enum.LadeKleur.Wit) Do $$$AssertEquals(TAORKenmerken.LosseComponent,"") Do $$$AssertEquals(TAORKenmerken.OpvullijstKleur,"") Do $$$AssertEquals(TAORKenmerken.VerpakkingType,Enum.VerpakkingType.V1) - Do $$$AssertEquals(TAORKenmerken.RugHoogte,Enum.LadeHoogte.C) + Do $$$AssertEquals(TAORKenmerken.RugHoogte,Enum.LadeHoogte.M) Do $$$AssertEquals(TAORKenmerken.Uittrekbaarheid,##class(DOM.PM.enu.TAORUittrekbaarheid).Volledig()) Do $$$AssertEquals(TAORKenmerken.NietMeeleveren.Count(),0) Do $$$AssertEquals(TAORKenmerken.ZijkantLogoID,"")