Index: vhPowerTools/DOM/PM/Product/TAX/ZijkantLogoIDAanpasser.cls.xml
===================================================================
diff -u
--- vhPowerTools/DOM/PM/Product/TAX/ZijkantLogoIDAanpasser.cls.xml (revision 0)
+++ vhPowerTools/DOM/PM/Product/TAX/ZijkantLogoIDAanpasser.cls.xml (revision 64421)
@@ -0,0 +1,41 @@
+
+
+
+TECH.RegisteredObject
+
+
+1
+OudZijkantLogoID:%String,NieuwZijkantLogoID:%String
+
+
+
+
+1
+OudZijkantLogoID:%String,NieuwZijkantLogoID:%String
+1
+
+
+
+
+1
+NieuwZijkantLogoID:%String
+1
+
+
+
+
+
+
Index: vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml
===================================================================
diff -u -r62496 -r64421
--- vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml (.../Test.cls.xml) (revision 62496)
+++ vhUnitTest/WSimpl/Vhisie4/QRcodeNaarKenmerken/GeefKenmerken/Test.cls.xml (.../Test.cls.xml) (revision 64421)
@@ -127,8 +127,8 @@
Set QRNaarKenmerkenService = ##class(WSimpl.Vhisie4.QRcodeNaarKenmerkenService).%New(LadeRegistratieServiceStub, ConfiguratorServiceStub)
- #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("DummyException")
- Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException",Substrings))
+ #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Er is een probleem bij het ophalen van de ladekenmerken.")
+ Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidUserInputException",Substrings))
Do QRNaarKenmerkenService.GeefKenmerken(..Request)
]]>
@@ -149,8 +149,8 @@
Set QRNaarKenmerkenService = ##class(WSimpl.Vhisie4.QRcodeNaarKenmerkenService).%New(LadeRegistratieServiceStub, ConfiguratorServiceStub, AppsConverterStub)
- #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("DummyException")
- Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException",Substrings))
+ #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Er is een probleem bij het ophalen van de ladekenmerken.")
+ Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidUserInputException",Substrings))
Do QRNaarKenmerkenService.GeefKenmerken(..Request)
]]>
Index: WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml
===================================================================
diff -u -r62620 -r64421
--- WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml (.../QRcodeNaarKenmerkenService.cls.xml) (revision 62620)
+++ WSimpl/Vhisie4/QRcodeNaarKenmerkenService.cls.xml (.../QRcodeNaarKenmerkenService.cls.xml) (revision 64421)
@@ -90,9 +90,15 @@
}
}
}
- #dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..ConfiguratorService.GeefOnverwerkteKenmerkenVanProduct(ProductNummer)
- #dim EconKenmerken As ECON.PM.Maatwerk.dto.EconConfiguratieKenmerken = ..AppsNaarEconConverter.ConverteerAppsNaarEcon(IngegevenKenmerken)
+ Try {
+ #dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..ConfiguratorService.GeefOnverwerkteKenmerkenVanProduct(ProductNummer)
+ #dim EconKenmerken As ECON.PM.Maatwerk.dto.EconConfiguratieKenmerken = ..AppsNaarEconConverter.ConverteerAppsNaarEcon(IngegevenKenmerken)
+ } Catch {
+ #dim ConvertieException As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+ Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidUserInputException).%New("Er is een probleem bij het ophalen van de ladekenmerken."))
+ }
+
If QRcodeNaarKenmerkenRequest.HerbestellingBijProbleem {
Do ..ZetAlleNietMeeleverenOpTrue(EconKenmerken)
}
Index: vhPowerTools/DOM/PM/Maatwerk/Calc/Common/IKIDService.cls.xml
===================================================================
diff -u -r63515 -r64421
--- vhPowerTools/DOM/PM/Maatwerk/Calc/Common/IKIDService.cls.xml (.../IKIDService.cls.xml) (revision 63515)
+++ vhPowerTools/DOM/PM/Maatwerk/Calc/Common/IKIDService.cls.xml (.../IKIDService.cls.xml) (revision 64421)
@@ -43,6 +43,24 @@
]]>
+
+ZijkantLogoID:%String
+
+
+
IKIDid:%String