Index: EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml =================================================================== diff -u -r68661 -r69368 --- EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml (.../ProductConverter.cls.xml) (revision 68661) +++ EXT/Unishop/PurchaseOrder001/ProductConverter.cls.xml (.../ProductConverter.cls.xml) (revision 69368) @@ -228,7 +228,7 @@ Do ..ConverterData.Add("Type", "Type") Do ..ConverterData.Add("Klasse", "Toepassing") Do ..ConverterData.Add("VerpakkingType","VerpakkingType") - Do ..ConverterData.Add("KoppelingType","KoppelingType","set:Input=""D"" Output = ""Drevel"" set:Input=""S"" Output=""Schroef""") + Do ..ConverterData.Add("KoppelingType","KoppelingType","set:Input=""D"" Output = ""Drevel"" set:Input=""S"" Output=""Schroef"" set:Input=""M"" Output=""Movento""") Quit ..ConverterData ]]> Index: vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTAX.cls.xml =================================================================== diff -u -r54909 -r69368 --- vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTAX.cls.xml (.../LadeEigenschappenTAX.cls.xml) (revision 54909) +++ vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTAX.cls.xml (.../LadeEigenschappenTAX.cls.xml) (revision 69368) @@ -23,7 +23,7 @@ set Kenmerken.HeeftZijstabilisering = $$$False set Kenmerken.IsBinnenbreedte = $$$True set Kenmerken.IsBinnenlade = $$$False - set Kenmerken.KoppelingType = "S" + set Kenmerken.KoppelingType = "M" set Kenmerken.LadeBinnenKleur = ##class(DOM.PM.enu.TAORLadeKleur).NatuurNotenhout() set Kenmerken.LadeDiepte = ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte500() set Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).C() @@ -57,7 +57,7 @@ set Kenmerken.IsBinnenbreedte = $$$True set Kenmerken.IsBinnenlade = $$$False set Kenmerken.KantenbandKleur = ##class(DOM.PM.enu.TAORKantenbandKleur).Wit() - set Kenmerken.KoppelingType = "S" + set Kenmerken.KoppelingType = "M" set Kenmerken.LadeBinnenKleur = ##class(DOM.PM.enu.TAORLadeKleur).Wit() set Kenmerken.LadeDiepte = ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte500() set Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).M() @@ -154,7 +154,6 @@ set Kenmerken.IsBinnenbreedte = $$$False set Kenmerken.IsBinnenlade = $$$True set Kenmerken.KantenbandKleur = ##class(DOM.PM.enu.TAORKantenbandKleur).MultiplexBerk() - set Kenmerken.KoppelingType = "D" ; Drevel set Kenmerken.LadeBinnenKleur = ##class(DOM.PM.enu.TAORLadeKleur).NatuurNotenhout() set Kenmerken.LadeDiepte = ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte520() set Kenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).N() Index: vhUnitTest/EXT/Unishop/PurchaseOrder001/ProductConverter/ExtNaarEdi/Tax/Test.cls.xml =================================================================== diff -u -r68661 -r69368 --- vhUnitTest/EXT/Unishop/PurchaseOrder001/ProductConverter/ExtNaarEdi/Tax/Test.cls.xml (.../Test.cls.xml) (revision 68661) +++ vhUnitTest/EXT/Unishop/PurchaseOrder001/ProductConverter/ExtNaarEdi/Tax/Test.cls.xml (.../Test.cls.xml) (revision 69368) @@ -44,7 +44,7 @@ Do $$$AssertEquals(LadeTAX.HeeftZijstabilisering,$$$False) Do $$$AssertEquals(LadeTAX.IsBinnenbreedte,$$$True) Do $$$AssertEquals(LadeTAX.IsBinnenlade,$$$False) - Do $$$AssertEquals(LadeTAX.KoppelingType,"Schroef") + Do $$$AssertEquals(LadeTAX.KoppelingType,"Movento") Do $$$AssertEquals(LadeTAX.LadeBinnenKleur,Enum.LadeKleur.NatuurNotenhout) Do $$$AssertEquals(LadeTAX.LadeDiepte,Enum.LadeDiepte.LadeDiepte500) Do $$$AssertEquals(LadeTAX.LadeHoogte,Enum.LadeHoogte.C) Index: vhTest/Utils/APPS/EDI/common/dto/LadeTAX.cls.xml =================================================================== diff -u -r68661 -r69368 --- vhTest/Utils/APPS/EDI/common/dto/LadeTAX.cls.xml (.../LadeTAX.cls.xml) (revision 68661) +++ vhTest/Utils/APPS/EDI/common/dto/LadeTAX.cls.xml (.../LadeTAX.cls.xml) (revision 69368) @@ -25,7 +25,7 @@ Set Resultaat.IsBinnenbreedte = $$$True Set Resultaat.IsBinnenlade = $$$False Set Resultaat.KantenbandKleur = Enum.KantenbandKleur.Wit - Set Resultaat.KoppelingType = "Schroef" + Set Resultaat.KoppelingType = "Movento" Set Resultaat.LadeBinnenKleur = Enum.LadeKleur.Wit Set Resultaat.LadeDiepte = Enum.LadeDiepte.LadeDiepte500 Set Resultaat.LadeHoogte = Enum.LadeHoogte.M @@ -73,7 +73,6 @@ Set LadeTAX.IsBinnenbreedte = $$$False Set LadeTAX.IsBinnenlade = $$$True Set LadeTAX.KantenbandKleur = ##class(DOM.PM.enu.TAORKantenbandKleur).MultiplexBerk() - Set LadeTAX.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Drevel() Set LadeTAX.LadeBinnenKleur = ##class(DOM.PM.enu.TAORLadeKleur).NatuurNotenhout() Set LadeTAX.LadeDiepte = ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte520() Set LadeTAX.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).N() Index: vhTest/Utils/APPS/PM/Maatwerk/dto/TAORKenmerken.cls.xml =================================================================== diff -u -r69217 -r69368 --- vhTest/Utils/APPS/PM/Maatwerk/dto/TAORKenmerken.cls.xml (.../TAORKenmerken.cls.xml) (revision 69217) +++ vhTest/Utils/APPS/PM/Maatwerk/dto/TAORKenmerken.cls.xml (.../TAORKenmerken.cls.xml) (revision 69368) @@ -33,7 +33,7 @@ set TAORKenmerken.IsBinnenbreedte = $$$True set TAORKenmerken.IsBinnenlade = $$$False set TAORKenmerken.KantenbandKleur = ##class(DOM.PM.enu.TAORKantenbandKleur).Wit() - set TAORKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Schroef() + set TAORKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Movento() set TAORKenmerken.LadeBinnenKleur = ##class(DOM.PM.enu.TAORLadeKleur).Wit() set TAORKenmerken.LadeDiepte = ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte500() set TAORKenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).M() @@ -87,7 +87,6 @@ Set TAORKenmerken.IsBinnenbreedte = $$$False Set TAORKenmerken.IsBinnenlade = $$$True Set TAORKenmerken.KantenbandKleur = ##class(DOM.PM.enu.TAORKantenbandKleur).MultiplexBerk() - Set TAORKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Drevel() Set TAORKenmerken.LadeBinnenKleur = ##class(DOM.PM.enu.TAORLadeKleur).NatuurNotenhout() Set TAORKenmerken.LadeDiepte = ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte520() Set TAORKenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).N() Index: ECONimpl/PM/Maatwerk/KenmerkenConverter/EconNaarApps/Tax.cls.xml =================================================================== diff -u -r69217 -r69368 --- ECONimpl/PM/Maatwerk/KenmerkenConverter/EconNaarApps/Tax.cls.xml (.../Tax.cls.xml) (revision 69217) +++ ECONimpl/PM/Maatwerk/KenmerkenConverter/EconNaarApps/Tax.cls.xml (.../Tax.cls.xml) (revision 69368) @@ -29,6 +29,7 @@ Set TaxKenmerken.AantalDwarsverdelingen = Kenmerken.DwarsverdelingAantal Set TaxKenmerken.BevatGeleiderBevestigingSchroeven = Kenmerken.BevatGeleiderBevestigingSchroeven Set TaxKenmerken.GlijderType = Kenmerken.GeleiderType + Set TaxKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Movento() Set TaxKenmerken.Uittrekbaarheid = ..Enum.Uittrekbaarheid.Volledig Set TaxKenmerken.NietMeeleveren = ..MaakNietMeeleveren(Kenmerken) Set TaxKenmerken.ProductieWijze = ..GeefProductieWijze(Kenmerken) Index: vhTest/Utils/AXimpl/PM/Maatwerk/TaxKenmerken.cls.xml =================================================================== diff -u -r69217 -r69368 --- vhTest/Utils/AXimpl/PM/Maatwerk/TaxKenmerken.cls.xml (.../TaxKenmerken.cls.xml) (revision 69217) +++ vhTest/Utils/AXimpl/PM/Maatwerk/TaxKenmerken.cls.xml (.../TaxKenmerken.cls.xml) (revision 69368) @@ -32,7 +32,7 @@ Do ..VoegToeKenmerk("Isbinnenbreedte", "true", TaxKenmerken) Do ..VoegToeKenmerk("Isbinnenlade", "false", TaxKenmerken) Do ..VoegToeKenmerk("Kantenbandkleur", ##class(DOM.PM.enu.TAORKantenbandKleur).Wit(), TaxKenmerken) - Do ..VoegToeKenmerk("Koppelingtype", ##class(DOM.PM.enu.TAORKoppelingType).Schroef(), TaxKenmerken) + Do ..VoegToeKenmerk("Koppelingtype", ##class(DOM.PM.enu.TAORKoppelingType).Movento(), TaxKenmerken) Do ..VoegToeKenmerk("Ladebinnenkleur", ##class(DOM.PM.enu.TAORLadeKleur).Wit(), TaxKenmerken) Do ..VoegToeKenmerk("Ladediepte", ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte500(), TaxKenmerken) Do ..VoegToeKenmerk("Ladehoogte", ##class(DOM.PM.enu.TAORLadeHoogte).M(), TaxKenmerken) @@ -87,7 +87,6 @@ Do ..VoegToeKenmerk("Isbinnenbreedte", "false", TaxKenmerken) Do ..VoegToeKenmerk("Isbinnenlade", "true", TaxKenmerken) Do ..VoegToeKenmerk("Kantenbandkleur", ##class(DOM.PM.enu.TAORKantenbandKleur).MultiplexBerk(), TaxKenmerken) - Do ..VoegToeKenmerk("Koppelingtype", ##class(DOM.PM.enu.TAORKoppelingType).Drevel(), TaxKenmerken) Do ..VoegToeKenmerk("Ladebinnenkleur", ##class(DOM.PM.enu.TAORLadeKleur).NatuurNotenhout(), TaxKenmerken) Do ..VoegToeKenmerk("Ladediepte", ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte520(), TaxKenmerken) Do ..VoegToeKenmerk("Ladehoogte", ##class(DOM.PM.enu.TAORLadeHoogte).N(), TaxKenmerken) Index: vhTest/Utils/ECON/PM/Maatwerk/dto/TaxKenmerken.cls.xml =================================================================== diff -u -r69217 -r69368 --- vhTest/Utils/ECON/PM/Maatwerk/dto/TaxKenmerken.cls.xml (.../TaxKenmerken.cls.xml) (revision 69217) +++ vhTest/Utils/ECON/PM/Maatwerk/dto/TaxKenmerken.cls.xml (.../TaxKenmerken.cls.xml) (revision 69368) @@ -32,7 +32,7 @@ Set TaxKenmerken.IsBinnenbreedte = "true" Set TaxKenmerken.IsBinnenlade = "false" Set TaxKenmerken.KantenbandKleur = ##class(DOM.PM.enu.TAORKantenbandKleur).Wit() - Set TaxKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Schroef() + Set TaxKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Movento() Set TaxKenmerken.LadeBinnenKleur = ##class(DOM.PM.enu.TAORLadeKleur).Wit() Set TaxKenmerken.LadeDiepte = ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte500() Set TaxKenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).M() @@ -83,7 +83,6 @@ Set TaxKenmerken.IsBinnenbreedte = "false" Set TaxKenmerken.IsBinnenlade = "true" Set TaxKenmerken.KantenbandKleur = ##class(DOM.PM.enu.TAORKantenbandKleur).MultiplexBerk() - Set TaxKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Drevel() Set TaxKenmerken.LadeBinnenKleur = ##class(DOM.PM.enu.TAORLadeKleur).NatuurNotenhout() Set TaxKenmerken.LadeDiepte = ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte520() Set TaxKenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).N()