Index: vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Lbx/Test.cls.xml
===================================================================
diff -u -r60228 -r60237
--- vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Lbx/Test.cls.xml (.../Test.cls.xml) (revision 60228)
+++ vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Lbx/Test.cls.xml (.../Test.cls.xml) (revision 60237)
@@ -21,8 +21,8 @@
]]>
-
-
+
Index: vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Tbx/Test.cls.xml
===================================================================
diff -u -r60228 -r60237
--- vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Tbx/Test.cls.xml (.../Test.cls.xml) (revision 60228)
+++ vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Tbx/Test.cls.xml (.../Test.cls.xml) (revision 60237)
@@ -21,8 +21,8 @@
]]>
-
-
+
@@ -44,7 +44,7 @@
Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Lateral divider", "3", "Data.Kenmerken.Dwarsverdelingaantal", ##class(DOM.PM.enu.TBXDwarsverdeling).Drie())
Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Lateral divider", "4", "Data.Kenmerken.Dwarsverdelingaantal", ##class(DOM.PM.enu.TBXDwarsverdeling).Vier())
Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Lateral divider", "2x2", "Data.Kenmerken.Dwarsverdelingaantal", ##class(DOM.PM.enu.TBXDwarsverdeling).TweeMaalTwee())
- Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Lateral divider", "RandomWaarde", "Data.Kenmerken.Dwarsverdelingaantal", "", "Onbekende waarde resulteert in leeg")
+ Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Lateral divider", "RandomWaarde", "Data.Kenmerken.Dwarsverdelingaantal", ..#OnvertaalbaarKenmerk, "Onbekende waarde resulteert in 'Onvertaalbaar kenmerk'")
]]>
Index: WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml
===================================================================
diff -u -r60228 -r60237
--- WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml (.../BlumNaarEconKenmerkenConverter.cls.xml) (revision 60228)
+++ WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml (.../BlumNaarEconKenmerkenConverter.cls.xml) (revision 60237)
@@ -42,11 +42,7 @@
}
If ($$$Not($$$HasLength(EconKenmerk.Name))) {
- #dim EconKenmerkName As %String = ..ConvertKenmerkNameBlumNaarEconKenmerk(BlumKenmerk.Name)
- If ($$$Not($$$HasLength(EconKenmerkName))) {
- Set EconKenmerkName = ..#OnvertaalbaarKenmerk
- }
- Set EconKenmerk.Name = EconKenmerkName
+ Set EconKenmerk.Name = ..ConvertKenmerkNameBlumNaarEconKenmerk(BlumKenmerk.Name)
}
Quit EconKenmerk
@@ -98,7 +94,7 @@
Quit:(KenmerkNameBlumKenmerk="version of front") "Data.Kenmerken.VoorWandTypeVanMBinnenlade"
Quit:(KenmerkNameBlumKenmerk="type of back") "Data.Kenmerken.Rugwandmateriaal"
- Quit ""
+ Quit ..#OnvertaalbaarKenmerk
]]>
@@ -116,7 +112,7 @@
-KenmerkValueBlumKenmerk:%String=""
+KenmerkValueBlumKenmerk:%String
1
%String
-KenmerkValueBlumKenmerk:%String=""
+KenmerkValueBlumKenmerk:%String
1
%String
@@ -270,7 +266,7 @@
If ($IsValidNum(KenmerkValueBlumKenmerkMetPunt)) {
Set KenmerkValueBlumKenmerk = KenmerkValueBlumKenmerkMetPunt
} Else {
- Set KenmerkValueBlumKenmerk = ""
+ Set KenmerkValueBlumKenmerk = ..#OnvertaalbaarKenmerk
}
Quit KenmerkValueBlumKenmerk