Index: vhTest/Fake/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml =================================================================== diff -u -r68436 -r68437 --- vhTest/Fake/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml (.../OPCKenmerkenConverter.cls.xml) (revision 68436) +++ vhTest/Fake/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml (.../OPCKenmerkenConverter.cls.xml) (revision 68437) @@ -6,6 +6,20 @@ Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt 1 WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter + + +OPCKenmerkenRequest:WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest +WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenResponse + + + + +OPCGeefWinkelkarLijnInfoRequest:WS.Vhisie4.OPC.GeefWinkelkarLijnInfoRequest +WS.Vhisie4.OPC.GeefWinkelkarLijnInfoResponse + + Index: vhTest/Mock/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml =================================================================== diff -u -r68436 -r68437 --- vhTest/Mock/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml (.../OPCKenmerkenConverter.cls.xml) (revision 68436) +++ vhTest/Mock/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml (.../OPCKenmerkenConverter.cls.xml) (revision 68437) @@ -9,7 +9,7 @@ right -BlumNaarAXKenmerkenConverter:WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumNaarAXKenmerkenConverter="",BlumKenmerkenNaarWinkelkarLijnInfoConverter:WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumKenmerkenNaarWinkelkarLijnInfoConverter="" +BlumNaarAXKenmerkenConverter:WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumNaarAXKenmerkenConverter="",BlumKenmerkenNaarWinkelkarLijnInfoConverter:WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumKenmerkNaarWinkelkarLijnInfoConverter="" %Status Index: WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml =================================================================== diff -u -r68436 -r68437 --- WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml (.../OPCKenmerkenConverter.cls.xml) (revision 68436) +++ WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml (.../OPCKenmerkenConverter.cls.xml) (revision 68437) @@ -108,14 +108,12 @@ While (KenmerkenIterator.HasNext()) { Set BlumKenmerk = KenmerkenIterator.Next() - - If ($$$Not(##class(TECH.StringUtils).ToLower(BlumKenmerk.Name) = "amount")) { - #dim GeconverteerdKenmerk As WS.Vhisie4.OPC.dto.Kenmerk = ..BlumNaarAXKenmerkenConverter.ConverteerBlumKenmerkNaarAXKenmerk(BlumKenmerk) - - If ($$$HasLength(GeconverteerdKenmerk.Value) && $$$HasLength(GeconverteerdKenmerk.Name)) { - Do AXConfiguratieArray.SetAt(GeconverteerdKenmerk.Value, GeconverteerdKenmerk.Name) - } + + #dim GeconverteerdKenmerk As WS.Vhisie4.OPC.dto.Kenmerk = ..BlumNaarAXKenmerkenConverter.ConverteerBlumKenmerkNaarAXKenmerk(BlumKenmerk) + If ($$$HasLength(GeconverteerdKenmerk.Value) && $$$HasLength(GeconverteerdKenmerk.Name)) { + Do AXConfiguratieArray.SetAt(GeconverteerdKenmerk.Value, GeconverteerdKenmerk.Name) } + } Do ..VoegToeDefaults(KenmerkenIterator, AXConfiguratieArray) ]]> @@ -152,9 +150,7 @@ KenmerkenIterator:TECH.Iterator,AXConfiguratieArray:%ArrayOfDataTypes 1 - @@ -170,28 +166,6 @@ ]]> - -KenmerkenIterator:TECH.Iterator,AXConfiguratieArray:%ArrayOfDataTypes -1 - - - AXConfiguratieArray:%ArrayOfDataTypes 1 Index: WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumNaarAXKenmerkenConverter.cls.xml =================================================================== diff -u -r68364 -r68437 --- WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumNaarAXKenmerkenConverter.cls.xml (.../BlumNaarAXKenmerkenConverter.cls.xml) (revision 68364) +++ WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumNaarAXKenmerkenConverter.cls.xml (.../BlumNaarAXKenmerkenConverter.cls.xml) (revision 68437) @@ -95,6 +95,7 @@ Quit:(##class(TECH.StringUtils).StartsWith(KenmerkNameBlum, "internal width within the application")) "Data.Kenmerken.Binnencorpusbreedteindetoepassing" Quit:(##class(TECH.StringUtils).StartsWith(KenmerkNameBlum, "internal height within the application")) "Data.Kenmerken.Binnencorpushoogteindetoepassing" Quit:(##class(TECH.StringUtils).StartsWith(KenmerkNameBlum, "internal depth within the application")) "Data.Kenmerken.Binnencorpusdiepteindetoepassing" + Quit:(KenmerkNameBlum="amount") "Data.Lijn.Aantal" Quit ..#OnvertaalbaarKenmerk ]]>