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,"")