Index: vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/Test.cls.xml =================================================================== diff -u -r68330 -r68345 --- vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 68330) +++ vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/Test.cls.xml (.../Test.cls.xml) (revision 68345) @@ -29,7 +29,7 @@ #dim OPCKenmerkenRequest As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest = ..GeefRequest(VoegToeTestRequestKenmerk) #dim Resultaat As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenResponse = ..OPCKenmerkenConverter.ConverteerBlumKenmerkenNaarAXKenmerken(OPCKenmerkenRequest) - Do $$$AssertEquals(Resultaat.AxKenmerken.Count(), 31) + Do $$$AssertEquals(Resultaat.AxKenmerken.Count(), 32) Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Bomkenmerken.Stuklijst"),"01039285;1;01039286;2;01039287;3;01039288;4") Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Binnencorpusbreedteindetoepassing"),"1") Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Contactschakelaarhouderinbegrepen"),"true") @@ -47,19 +47,20 @@ Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Frontoverstandrechts"),"11") Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Inbouwbreedte"),"12") Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Inbouwdiepte"),"13") - Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Nominalelengte"),"14") - Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Nominalelengtelinks"),"15") - Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Nominalelengterechts"),"16") + Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Inbouwhoogte"),"14") + Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Nominalelengte"),"15") + Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Nominalelengtelinks"),"16") + Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Nominalelengterechts"),"17") Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Planmatigeaanpak"),"Nis") - Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Pocketachterwanddikte"),"17") - Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Pocketdiepte"),"18") - Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Pockethoogte"),"19") - Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Pocketzijkantdikte"),"20") + Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Pocketachterwanddikte"),"18") + Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Pocketdiepte"),"19") + Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Pockethoogte"),"20") + Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Pocketzijkantdikte"),"21") Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Toepassing"),"UnoRechts") Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Variant"),"RVG") - Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Voegboven"),"21") - Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Voegonder"),"22") - Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Voegzijkant"),"23") + Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Voegboven"),"22") + Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Voegonder"),"23") + Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Kenmerken.Voegzijkant"),"24") Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt("Data.Lijn.Aantal"),"1") ]]> Index: WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml =================================================================== diff -u -r68330 -r68345 --- WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml (.../OPCKenmerkenConverter.cls.xml) (revision 68330) +++ WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml (.../OPCKenmerkenConverter.cls.xml) (revision 68345) @@ -209,19 +209,20 @@ Do TestAXConfiguratieArray.SetAt(11, "Data.Kenmerken.Frontoverstandrechts") Do TestAXConfiguratieArray.SetAt(12, "Data.Kenmerken.Inbouwbreedte") Do TestAXConfiguratieArray.SetAt(13, "Data.Kenmerken.Inbouwdiepte") - Do TestAXConfiguratieArray.SetAt(14, "Data.Kenmerken.Nominalelengte") - Do TestAXConfiguratieArray.SetAt(15, "Data.Kenmerken.Nominalelengtelinks") - Do TestAXConfiguratieArray.SetAt(16, "Data.Kenmerken.Nominalelengterechts") + Do TestAXConfiguratieArray.SetAt(14, "Data.Kenmerken.Inbouwhoogte") + Do TestAXConfiguratieArray.SetAt(15, "Data.Kenmerken.Nominalelengte") + Do TestAXConfiguratieArray.SetAt(16, "Data.Kenmerken.Nominalelengtelinks") + Do TestAXConfiguratieArray.SetAt(17, "Data.Kenmerken.Nominalelengterechts") Do TestAXConfiguratieArray.SetAt(##class(DOM.PM.enu.RVGPlanmatigeAanpak).Nis(), "Data.Kenmerken.Planmatigeaanpak") - Do TestAXConfiguratieArray.SetAt(17, "Data.Kenmerken.Pocketachterwanddikte") - Do TestAXConfiguratieArray.SetAt(18, "Data.Kenmerken.Pocketdiepte") - Do TestAXConfiguratieArray.SetAt(19, "Data.Kenmerken.Pockethoogte") - Do TestAXConfiguratieArray.SetAt(20, "Data.Kenmerken.Pocketzijkantdikte") + Do TestAXConfiguratieArray.SetAt(18, "Data.Kenmerken.Pocketachterwanddikte") + Do TestAXConfiguratieArray.SetAt(19, "Data.Kenmerken.Pocketdiepte") + Do TestAXConfiguratieArray.SetAt(20, "Data.Kenmerken.Pockethoogte") + Do TestAXConfiguratieArray.SetAt(21, "Data.Kenmerken.Pocketzijkantdikte") Do TestAXConfiguratieArray.SetAt(##class(DOM.PM.enu.RVGToepassing).UnoRechts(), "Data.Kenmerken.Toepassing") Do TestAXConfiguratieArray.SetAt(##class(DOM.PM.enu.Variant).Revego(), "Data.Kenmerken.Variant") - Do TestAXConfiguratieArray.SetAt(21, "Data.Kenmerken.Voegboven") - Do TestAXConfiguratieArray.SetAt(22, "Data.Kenmerken.Voegonder") - Do TestAXConfiguratieArray.SetAt(23, "Data.Kenmerken.Voegzijkant") + Do TestAXConfiguratieArray.SetAt(22, "Data.Kenmerken.Voegboven") + Do TestAXConfiguratieArray.SetAt(23, "Data.Kenmerken.Voegonder") + Do TestAXConfiguratieArray.SetAt(24, "Data.Kenmerken.Voegzijkant") Quit TestAXConfiguratieArray ]]>