Index: vhTest/Utils/ECON/PM/Maatwerk/dto/TaxKenmerken.cls.xml =================================================================== diff -u -r52499 -r53409 --- vhTest/Utils/ECON/PM/Maatwerk/dto/TaxKenmerken.cls.xml (.../TaxKenmerken.cls.xml) (revision 52499) +++ vhTest/Utils/ECON/PM/Maatwerk/dto/TaxKenmerken.cls.xml (.../TaxKenmerken.cls.xml) (revision 53409) @@ -106,9 +106,10 @@ Set TaxKenmerken.NietMeeleveren.Geleider = "true" Set TaxKenmerken.NietMeeleveren.Koppeling = "true" Set TaxKenmerken.NietMeeleveren.Opvullijst = "true" - Set TaxKenmerken.NietMeeleveren.TiponBlumotionSynchronisatieAdapter = "true" + Set TaxKenmerken.NietMeeleveren.TiponBlumotionSet = "true" Set TaxKenmerken.NietMeeleveren.TiponBlumotionSetEenhedenEnMeenemers = "true" Set TaxKenmerken.NietMeeleveren.TiponBlumotionSynchronisatieStang = "true" + Set TaxKenmerken.NietMeeleveren.TiponSynchronisatieSet = "true" Quit TaxKenmerken ]]> Index: vhTest/Utils/AXimpl/PM/Maatwerk/TaxKenmerken.cls.xml =================================================================== diff -u -r53216 -r53409 --- vhTest/Utils/AXimpl/PM/Maatwerk/TaxKenmerken.cls.xml (.../TaxKenmerken.cls.xml) (revision 53216) +++ vhTest/Utils/AXimpl/PM/Maatwerk/TaxKenmerken.cls.xml (.../TaxKenmerken.cls.xml) (revision 53409) @@ -21,11 +21,13 @@ Set Toepassing = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set IsBinnenlade = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "Corpusbreedte", "600", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(RugHoogte, "Rughoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "CorpusBreedte", "600", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(RugHoogte, "RugHoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) Do ..SetAxdEntityAttributeEnInsertInLijst(Toepassing, "Toepassing", ##class(DOM.PM.enu.TAORToepassing).Lade(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "Isbinnenlade", "false", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "IsBinnenlade", "false", TaxKenmerken) + Do ..ZetDefaultNietMeeleverenKenmerken(TaxKenmerken) + Quit TaxKenmerken ]]> @@ -41,11 +43,13 @@ Set Toepassing = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set IsBinnenlade = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "Corpusbreedte", "600", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(RugHoogte, "Rughoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "CorpusBreedte", "600", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(RugHoogte, "RugHoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) Do ..SetAxdEntityAttributeEnInsertInLijst(Toepassing, "Toepassing", ##class(DOM.PM.enu.TAORToepassing).Lade(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "Isbinnenlade", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "IsBinnenlade", "true", TaxKenmerken) + Do ..ZetDefaultNietMeeleverenKenmerken(TaxKenmerken) + Quit TaxKenmerken ]]> @@ -86,36 +90,38 @@ Set Variant = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set VerpakkingType = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Do ..SetAxdEntityAttributeEnInsertInLijst(BodemKleur, "Bodemkleur", ##class(DOM.PM.enu.TAORLadeKleur).Dakar(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "Corpusbreedte", "600", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusWandDikte, "Corpuswanddikte", "18", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(BodemKleur, "BodemKleur", ##class(DOM.PM.enu.TAORLadeKleur).Dakar(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "CorpusBreedte", "600", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusWandDikte, "CorpusWandDikte", "18", TaxKenmerken) Do ..SetAxdEntityAttributeEnInsertInLijst(Draagkracht, "Draagkracht", ##class(DOM.PM.enu.TAORDraagkracht).Draagkracht60(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(FrontBevestiging, "Frontbevestiging", "", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(FrontEindkapKleur, "Fronteindkapkleur", ##class(DOM.PM.enu.TAORFrontEindkapKleur).ZwartAluminiumLook(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(GeleiderTechnologie, "Geleidertechnologie", ##class(DOM.PM.enu.TAORGeleiderTechnologie).TIPONBLUMOTION(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(GeleiderType, "Geleidertype", ##class(DOM.PM.enu.TAORGlijderType).Movento(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftDiepteVerstelling, "Heeftdiepteverstelling", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftOpvullijstLinks, "Heeftopvullijstlinks", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftOpvullijstRechts, "Heeftopvullijstrechts", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftZijstabilisering, "Heeftzijstabilisering", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenbreedte, "Isbinnenbreedte", "false", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "Isbinnenlade", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(KantenbandKleur, "Kantenbandkleur", ##class(DOM.PM.enu.TAORKantenbandKleur).MultiplexBerk(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(KoppelingType, "Koppelingtype", ##class(DOM.PM.enu.TAORKoppelingType).Drevel(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(LadeBinnenKleur, "Ladebinnenkleur", ##class(DOM.PM.enu.TAORLadeKleur).NatuurNotenhout(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(LadeDiepte, "Ladediepte", ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte520(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(LadeHoogte, "Ladehoogte", ##class(DOM.PM.enu.TAORLadeHoogte).N(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(LadeKleur, "Ladekleur", ##class(DOM.PM.enu.TAORLadeKleur).NatuurEikenhout(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(MatMateriaal, "Matmateriaal", ##class(DOM.PM.enu.MATMateriaal).AntislipFiber(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(MatKleur, "Matkleur", ##class(DOM.PM.enu.MATKleur).AntiSlipFiberWit(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(OpvullijstKleur, "Opvullijstkleur", ##class(DOM.PM.enu.TAOROpvullijstKleur).PlatinaZilverGrijs(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(ProductieWijze, "Productiewijze", ##class(ECON.PM.Maatwerk.enu.ProductieWijze).Volledig(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(RugHoogte, "Rughoogte", ##class(DOM.PM.enu.TAORRugHoogte).N(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(SpecialType, "Specialtype", ##class(DOM.PM.enu.SpecialType).Normaal(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(FrontBevestiging, "FrontBevestiging", "", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(FrontEindkapKleur, "FrontEindkapKleur", ##class(DOM.PM.enu.TAORFrontEindkapKleur).ZwartAluminiumLook(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(GeleiderTechnologie, "GeleiderTechnologie", ##class(DOM.PM.enu.TAORGeleiderTechnologie).TIPONBLUMOTION(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(GeleiderType, "GeleiderType", ##class(DOM.PM.enu.TAORGlijderType).Movento(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftDiepteVerstelling, "HeeftDiepteVerstelling", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftOpvullijstLinks, "HeeftOpvullijstLinks", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftOpvullijstRechts, "HeeftOpvullijstRechts", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftZijstabilisering, "HeeftZijstabilisering", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenbreedte, "IsBinnenbreedte", "false", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "IsBinnenlade", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(KantenbandKleur, "KantenbandKleur", ##class(DOM.PM.enu.TAORKantenbandKleur).MultiplexBerk(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(KoppelingType, "KoppelingType", ##class(DOM.PM.enu.TAORKoppelingType).Drevel(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(LadeBinnenKleur, "LadeBinnenKleur", ##class(DOM.PM.enu.TAORLadeKleur).NatuurNotenhout(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(LadeDiepte, "LadeDiepte", ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte520(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(LadeHoogte, "LadeHoogte", ##class(DOM.PM.enu.TAORLadeHoogte).N(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(LadeKleur, "LadeKleur", ##class(DOM.PM.enu.TAORLadeKleur).NatuurEikenhout(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(MatMateriaal, "MatMateriaal", ##class(DOM.PM.enu.MATMateriaal).AntislipFiber(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(MatKleur, "MatKleur", ##class(DOM.PM.enu.MATKleur).AntiSlipFiberWit(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(OpvullijstKleur, "OpvullijstKleur", ##class(DOM.PM.enu.TAOROpvullijstKleur).PlatinaZilverGrijs(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(ProductieWijze, "ProductieWijze", ##class(ECON.PM.Maatwerk.enu.ProductieWijze).Volledig(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(RugHoogte, "RugHoogte", ##class(DOM.PM.enu.TAORRugHoogte).N(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(SpecialType, "SpecialType", ##class(DOM.PM.enu.SpecialType).Normaal(), TaxKenmerken) Do ..SetAxdEntityAttributeEnInsertInLijst(Toepassing, "Toepassing", ##class(DOM.PM.enu.TAORToepassing).Lade(), TaxKenmerken) Do ..SetAxdEntityAttributeEnInsertInLijst(Variant, "Variant", "TAX", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(VerpakkingType, "Verpakkingtype", ##class(DOM.PM.enu.TAORVerpakkingType).Probox(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(VerpakkingType, "VerpakkingType", ##class(DOM.PM.enu.TAORVerpakkingType).Probox(), TaxKenmerken) + Do ..ZetDefaultNietMeeleverenKenmerken(TaxKenmerken) + Quit TaxKenmerken ]]> @@ -136,23 +142,25 @@ Set NietMeeleverenGeleider = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set NietMeeleverenKoppeling = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set NietMeeleverenOpvullijst = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Set NietMeeleverenTiponBlumotionSetEenhedenEnMeenemers = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Set NietMeeleverenTiponBlumotionSynchronisatieAdapter = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Set NietMeeleverenTiponBlumotionSynchronisatieStang = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() + Set NietMeeleverenTOBSet = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() + Set NietMeeleverenTOBSetEenhedenEnMeenemers = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() + Set NietMeeleverenTOBSyncStang = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() + Set NietMeeleverenTiponSynchronisatieSet = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "Corpusbreedte", "600", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(RugHoogte, "Rughoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "CorpusBreedte", "600", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(RugHoogte, "RugHoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) Do ..SetAxdEntityAttributeEnInsertInLijst(Toepassing, "Toepassing", ##class(DOM.PM.enu.TAORToepassing).Lade(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "Isbinnenlade", "false", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenAfdekkapBoven, "Nietmeeleverenafdekkapboven", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenBodemOndersteuning, "Nietmeeleverenbodemondersteuning", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenFrontBevestiging, "Nietmeeleverenfrontbevestiging", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenGeleider, "Nietmeeleverengeleider", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenKoppeling, "Nietmeeleverenkoppeling", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenOpvullijst, "Nietmeeleverenopvullijst", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenTiponBlumotionSetEenhedenEnMeenemers, "Nietmeeleverentiponblumotionseteenhedenenmeenemers", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenTiponBlumotionSynchronisatieAdapter, "Nietmeeleverentiponblumotionsynchronisatieadapter", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenTiponBlumotionSynchronisatieStang, "NietmeeleverentiponblumotionsynchronisatieStang", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "IsBinnenlade", "false", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenAfdekkapBoven, "NM_AfdekkapBoven", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenBodemOndersteuning, "NM_BodemOndersteuning", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenFrontBevestiging, "NM_FrontBevestiging", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenGeleider, "NM_Geleider", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenKoppeling, "NM_Koppeling", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenOpvullijst, "NM_Opvullijst", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenTOBSet, "NM_TOBSet", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenTOBSetEenhedenEnMeenemers, "NM_TOBSetEenhedenEnMeenemers", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenTOBSyncStang, "NM_TOBSynchronisatieStang", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(NietMeeleverenTiponSynchronisatieSet, "NM_TiponSynchronisatieSet", "true", TaxKenmerken) Quit TaxKenmerken ]]> @@ -165,8 +173,9 @@ #dim TaxKenmerken As %ListOfObjects = ..GeefLijstMetDefaultkenmerken() Set CorpusBreedte = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Set Toepassing = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set IsBinnenlade = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() + Set RugHoogte = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() + Set Toepassing = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set UitsparingDataUitsparingAantal = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set UitsparingDataMBreedte = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set UitsparingDataMHoogte = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() @@ -188,30 +197,33 @@ Set UitsparingDataZ2Materiaal = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set UitsparingDataZ2Vorm = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "Corpusbreedte", "674", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "CorpusBreedte", "674", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "IsBinnenlade", "false", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(RugHoogte, "RugHoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) Do ..SetAxdEntityAttributeEnInsertInLijst(Toepassing, "Toepassing", ##class(DOM.PM.enu.TAORToepassing).Sifon(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "Isbinnenlade", "false", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataUitsparingAantal, "Uitsparingdatauitsparingaantal", ##class(DOM.PM.enu.AantalUitsparingen).Enkel(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMBreedte, "Uitsparingdatambreedte", "0", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMHoogte, "Uitsparingdatamhoogte", "", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMMateriaal, "Uitsparingdatammateriaal", "", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXBreedte, "Uitsparingdataxbreedte", "205", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXHoogte, "Uitsparingdataxhoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXMateriaal, "Uitsparingdataxmateriaal", "Hout", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYBreedte, "Uitsparingdataybreedte", "195", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYHoogte, "Uitsparingdatayhoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYMateriaal, "Uitsparingdataymateriaal", "Hout", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Breedte, "Uitsparingdataz1breedte", "274", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Diepte, "Uitsparingdataz1diepte", "250", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Hoogte, "Uitsparingdataz1hoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Materiaal, "Uitsparingdataz1materiaal", "Hout", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Vorm, "Uitsparingdataz1vorm", "Recht", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Breedte, "Uitsparingdataz2breedte", "0", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Diepte, "Uitsparingdataz2diepte", "0", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Hoogte, "Uitsparingdataz2hoogte", "", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Materiaal, "Uitsparingdataz2materiaal", "", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Vorm, "Uitsparingdataz2vorm", "", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataUitsparingAantal, "UitsparingData_UitsparingAantal", ##class(DOM.PM.enu.AantalUitsparingen).Enkel(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMBreedte, "UitsparingData_M_Breedte", "0", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMHoogte, "UitsparingData_M_Hoogte", "", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMMateriaal, "UitsparingData_M_Materiaal", "", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXBreedte, "UitsparingData_X_Breedte", "205", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXHoogte, "UitsparingData_X_Hoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXMateriaal, "UitsparingData_X_Materiaal", "Hout", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYBreedte, "UitsparingData_Y_Breedte", "195", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYHoogte, "UitsparingData_Y_Hoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYMateriaal, "UitsparingData_Y_Materiaal", "Hout", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Breedte, "UitsparingData_Z1_Breedte", "274", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Diepte, "UitsparingData_Z1_Diepte", "250", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Hoogte, "UitsparingData_Z1_Hoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Materiaal, "UitsparingData_Z1_Materiaal", "Hout", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Vorm, "UitsparingData_Z1_Vorm", "Recht", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Breedte, "UitsparingData_Z2_Breedte", "0", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Diepte, "UitsparingData_Z2_Diepte", "0", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Hoogte, "UitsparingData_Z2_Hoogte", "", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Materiaal, "UitsparingData_Z2_Materiaal", "", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Vorm, "UitsparingData_Z2_Vorm", "", TaxKenmerken) + Do ..ZetDefaultNietMeeleverenKenmerken(TaxKenmerken) + Quit TaxKenmerken ]]> @@ -223,8 +235,9 @@ #dim TaxKenmerken As %ListOfObjects = ..GeefLijstMetDefaultkenmerken() Set CorpusBreedte = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Set Toepassing = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set IsBinnenlade = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() + Set RugHoogte = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() + Set Toepassing = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set UitsparingDataUitsparingAantal = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set UitsparingDataMBreedte = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set UitsparingDataMHoogte = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() @@ -246,30 +259,33 @@ Set UitsparingDataZ2Materiaal = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set UitsparingDataZ2Vorm = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "Corpusbreedte", "958", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusBreedte, "CorpusBreedte", "958", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "IsBinnenlade", "false", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(RugHoogte, "RugHoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) Do ..SetAxdEntityAttributeEnInsertInLijst(Toepassing, "Toepassing", ##class(DOM.PM.enu.TAORToepassing).Sifon(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenlade, "Isbinnenlade", "false", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataUitsparingAantal, "Uitsparingdatauitsparingaantal", ##class(DOM.PM.enu.AantalUitsparingen).Enkel(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMBreedte, "Uitsparingdatambreedte", "160", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMHoogte, "Uitsparingdatamhoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMMateriaal, "Uitsparingdatammateriaal", "Hout", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXBreedte, "Uitsparingdataxbreedte", "210", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXHoogte, "Uitsparingdataxhoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXMateriaal, "Uitsparingdataxmateriaal", "Hout", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYBreedte, "Uitsparingdataybreedte", "195", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYHoogte, "Uitsparingdatayhoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYMateriaal, "Uitsparingdataymateriaal", "Hout", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Breedte, "Uitsparingdataz1breedte", "274", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Diepte, "Uitsparingdataz1diepte", "300", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Hoogte, "Uitsparingdataz1hoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Materiaal, "Uitsparingdataz1materiaal", "Hout", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Vorm, "Uitsparingdataz1vorm", "Recht", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Breedte, "Uitsparingdataz2breedte", "124", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Diepte, "Uitsparingdataz2diepte", "300", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Hoogte, "Uitsparingdataz2hoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Materiaal, "Uitsparingdataz2materiaal", "Hout", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Vorm, "Uitsparingdataz2vorm", "Recht", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataUitsparingAantal, "UitsparingData_UitsparingAantal", ##class(DOM.PM.enu.AantalUitsparingen).Dubbel(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMBreedte, "UitsparingData_M_Breedte", "160", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMHoogte, "UitsparingData_M_Hoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataMMateriaal, "UitsparingData_M_Materiaal", "Hout", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXBreedte, "UitsparingData_X_Breedte", "210", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXHoogte, "UitsparingData_X_Hoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataXMateriaal, "UitsparingData_X_Materiaal", "Hout", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYBreedte, "UitsparingData_Y_Breedte", "190", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYHoogte, "UitsparingData_Y_Hoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataYMateriaal, "UitsparingData_Y_Materiaal", "Hout", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Breedte, "UitsparingData_Z1_Breedte", "274", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Diepte, "UitsparingData_Z1_Diepte", "300", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Hoogte, "UitsparingData_Z1_Hoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Materiaal, "UitsparingData_Z1_Materiaal", "Hout", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ1Vorm, "UitsparingData_Z1_Vorm", "Recht", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Breedte, "UitsparingData_Z2_Breedte", "124", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Diepte, "UitsparingData_Z2_Diepte", "300", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Hoogte, "UitsparingData_Z2_Hoogte", ##class(DOM.PM.enu.TAORRugHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Materiaal, "UitsparingData_Z2_Materiaal", "Hout", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(UitsparingDataZ2Vorm, "UitsparingData_Z2_Vorm", "Recht", TaxKenmerken) + Do ..ZetDefaultNietMeeleverenKenmerken(TaxKenmerken) + Quit TaxKenmerken ]]> @@ -304,34 +320,63 @@ Set Variant = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() Set VerpakkingType = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute).%New() - Do ..SetAxdEntityAttributeEnInsertInLijst(BodemKleur, "Bodemkleur", ##class(DOM.PM.enu.TAORBodemKleur).Wit(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusWandDikte, "Corpuswanddikte", "0", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(BodemKleur, "BodemKleur", ##class(DOM.PM.enu.TAORBodemKleur).Wit(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(CorpusWandDikte, "CorpusWandDikte", "0", TaxKenmerken) Do ..SetAxdEntityAttributeEnInsertInLijst(Draagkracht, "Draagkracht", ##class(DOM.PM.enu.TAORDraagkracht).Draagkracht40(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(FrontBevestiging, "Frontbevestiging", ##class(DOM.PM.enu.TAORFrontBevestiging).Expando(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(FrontEindkapKleur, "Fronteindkapkleur", ##class(DOM.PM.enu.TAORFrontEindkapKleur).AluminiumLook(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(GeleiderTechnologie, "Geleidertechnologie", ##class(DOM.PM.enu.TAORGeleiderTechnologie).BLUMOTION(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(GeleiderType, "Geleidertype", ##class(DOM.PM.enu.TAORGlijderType).Movento(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftDiepteVerstelling, "Heeftdiepteverstelling", "false", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftOpvullijstLinks, "Heeftopvullijstlinks", "false", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftOpvullijstRechts, "Heeftopvullijstrechts", "false", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftZijstabilisering, "Heeftzijstabilisering", "false", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenbreedte, "Isbinnenbreedte", "true", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(KantenbandKleur, "Kantenbandkleur", ##class(DOM.PM.enu.TAORKantenbandKleur).Wit(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(KoppelingType, "Koppelingtype", ##class(DOM.PM.enu.TAORKoppelingType).Schroef(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(LadeBinnenKleur, "Ladebinnenkleur", ##class(DOM.PM.enu.TAORLadeKleur).Wit(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(LadeDiepte, "Ladediepte", ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte500(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(LadeHoogte, "Ladehoogte", ##class(DOM.PM.enu.TAORLadeHoogte).M(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(LadeKleur, "Ladekleur", ##class(DOM.PM.enu.TAORLadeKleur).Wit(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(OpvullijstKleur, "Opvullijstkleur", "", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(ProductieWijze, "Productiewijze", ##class(ECON.PM.Maatwerk.enu.ProductieWijze).Volledig(), TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(SpecialType, "Specialtype", ##class(DOM.PM.enu.SpecialType).Normaal(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(FrontBevestiging, "FrontBevestiging", ##class(DOM.PM.enu.TAORFrontBevestiging).Expando(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(FrontEindkapKleur, "FrontEindkapKleur", ##class(DOM.PM.enu.TAORFrontEindkapKleur).AluminiumLook(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(GeleiderTechnologie, "GeleiderTechnologie", ##class(DOM.PM.enu.TAORGeleiderTechnologie).BLUMOTION(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(GeleiderType, "GeleiderType", ##class(DOM.PM.enu.TAORGlijderType).Movento(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftDiepteVerstelling, "HeeftDiepteVerstelling", "false", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftOpvullijstLinks, "HeeftOpvullijstLinks", "false", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftOpvullijstRechts, "HeeftOpvullijstRechts", "false", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(HeeftZijstabilisering, "HeeftZijstabilisering", "false", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(IsBinnenbreedte, "IsBinnenbreedte", "true", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(KantenbandKleur, "KantenbandKleur", ##class(DOM.PM.enu.TAORKantenbandKleur).Wit(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(KoppelingType, "KoppelingType", ##class(DOM.PM.enu.TAORKoppelingType).Schroef(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(LadeBinnenKleur, "LadeBinnenKleur", ##class(DOM.PM.enu.TAORLadeKleur).Wit(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(LadeDiepte, "LadeDiepte", ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte500(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(LadeHoogte, "LadeHoogte", ##class(DOM.PM.enu.TAORLadeHoogte).M(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(LadeKleur, "LadeKleur", ##class(DOM.PM.enu.TAORLadeKleur).Wit(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(OpvullijstKleur, "OpvullijstKleur", "", TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(ProductieWijze, "ProductieWijze", ##class(ECON.PM.Maatwerk.enu.ProductieWijze).Volledig(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(SpecialType, "SpecialType", ##class(DOM.PM.enu.SpecialType).Normaal(), TaxKenmerken) Do ..SetAxdEntityAttributeEnInsertInLijst(Variant, "Variant", "TAX", TaxKenmerken) - Do ..SetAxdEntityAttributeEnInsertInLijst(VerpakkingType, "Verpakkingtype", ##class(DOM.PM.enu.TAORVerpakkingType).V1(), TaxKenmerken) + Do ..SetAxdEntityAttributeEnInsertInLijst(VerpakkingType, "VerpakkingType", ##class(DOM.PM.enu.TAORVerpakkingType).V1(), TaxKenmerken) Quit TaxKenmerken ]]> + +1 +TaxKenmerken:%ListOfObjects +1 + + + 1 AxdEntityAttribute:AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityAttribute,AxdEntityAttributeName:%String,AxdEntityAttributeValueTxt:%String,TaxKenmerken:%ListOfObjects Index: vhUnitTest/AXimpl/PM/Maatwerk/TAX/AxNaarEconConverter/Test.cls.xml =================================================================== diff -u -r53216 -r53409 --- vhUnitTest/AXimpl/PM/Maatwerk/TAX/AxNaarEconConverter/Test.cls.xml (.../Test.cls.xml) (revision 53216) +++ vhUnitTest/AXimpl/PM/Maatwerk/TAX/AxNaarEconConverter/Test.cls.xml (.../Test.cls.xml) (revision 53409) @@ -37,23 +37,17 @@ ]]> - - -IN COMMENT TOTDAT BESLIST IS HOE AX UITSPARINGDATA EN NIETMEELEVEREN GAAT DOORGEVEN + - - -IN COMMENT TOTDAT BESLIST IS HOE AX UITSPARINGDATA EN NIETMEELEVEREN GAAT DOORGEVEN + - - -IN COMMENT TOTDAT BESLIST IS HOE AX UITSPARINGDATA EN NIETMEELEVEREN GAAT DOORGEVEN + @@ -67,8 +61,6 @@ #dim AxKenmerken As %ListOfDataTypes = $ClassMethod("vhTest.Utils.AXimpl.PM.Maatwerk.TaxKenmerken", SoortLade) #dim GeconverteerdeKenmerken As ECON.PM.Maatwerk.dto.EconConfiguratie = ..Converter.Convert(AxKenmerken) #dim IngegevenKenmerken As ECON.PM.Maatwerk.dto.EconConfiguratieKenmerken = GeconverteerdeKenmerken.IngegevenKenmerken - #dim NietMeeleveren As ECON.PM.Maatwerk.dto.TaxKenmerken.NietMeeleveren = ##class(ECON.PM.Maatwerk.dto.TaxKenmerken.NietMeeleveren).%New() - Set IngegevenKenmerken.NietMeeleveren = NietMeeleveren Do $$$AssertEmptyList(..Differenciator.GetDifferences(IngegevenKenmerken, $ClassMethod("vhTest.Utils.ECON.PM.Maatwerk.dto.TaxKenmerken", SoortLade))) ]]>