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