Index: APPS/VKP/Maatwerk/LadeRegistratie/impl/RegistratieRepository.cls.xml =================================================================== diff -u -r66428 -r72943 --- APPS/VKP/Maatwerk/LadeRegistratie/impl/RegistratieRepository.cls.xml (.../RegistratieRepository.cls.xml) (revision 66428) +++ APPS/VKP/Maatwerk/LadeRegistratie/impl/RegistratieRepository.cls.xml (.../RegistratieRepository.cls.xml) (revision 72943) @@ -11,14 +11,14 @@ ProductNr:%String TECH.Iterator - ProductNr:%String,Toelevering:%String TECH.Iterator - Index: vhUnitTest/WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper/GeefWerkpost/Test.cls.xml =================================================================== diff -u -r72666 -r72943 --- vhUnitTest/WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper/GeefWerkpost/Test.cls.xml (.../Test.cls.xml) (revision 72666) +++ vhUnitTest/WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper/GeefWerkpost/Test.cls.xml (.../Test.cls.xml) (revision 72943) @@ -13,27 +13,26 @@ P2 - + @@ -44,11 +43,9 @@ Set DnaCode.Toelevering = "111111" Set DnaCode.ProductNummer = "1304468" - #dim Familie As %String = "" - Set LadeRegistratie = ##class(APPS.VKP.Maatwerk.LadeRegistratie.impl.Registratie).%New(..#Werkpost1, Familie) - + #dim LadeRegistratieIterator As TECH.Iterator = ..GeefLadeRegistratieIterator(..#Werkpost1) Set RegistratieRepositoryMock = ##class(vhTest.Mock.APPS.VKP.Maatwerk.LadeRegistratie.impl.RegistratieRepository).%New() - Do RegistratieRepositoryMock.VerwachtMethodCall("GeefViaProductNrEnToelevering",DnaCode.ProductNummer, DnaCode.Toelevering).DanReturn(LadeRegistratie) + Do RegistratieRepositoryMock.VerwachtMethodCall("GeefViaProductNrEnToelevering",DnaCode.ProductNummer, DnaCode.Toelevering).DanReturn(LadeRegistratieIterator) Set EtiketAfdrukkenHelper = ##class(WSimpl.Halux.AAP.AfdrukService.EtiketAfdrukkenHelper).%New(, RegistratieRepositoryMock) #dim WerkPost As %String = EtiketAfdrukkenHelper.GeefWerkpost(DnaCode) @@ -65,11 +62,9 @@ Set DnaCode.DnaCode = "LAAAAA0" Set DnaCode.ProductNummer = "1304468" - #dim Familie As %String = "" - Set LadeRegistratie = ##class(APPS.VKP.Maatwerk.LadeRegistratie.impl.Registratie).%New(..#Werkpost1, Familie) - + #dim LadeRegistratieIterator As TECH.Iterator = ..GeefLadeRegistratieIterator(..#Werkpost1) Set RegistratieRepositoryMock = ##class(vhTest.Mock.APPS.VKP.Maatwerk.LadeRegistratie.impl.RegistratieRepository).%New() - Do RegistratieRepositoryMock.VerwachtMethodCall("GeefViaProductNr",DnaCode.ProductNummer).DanReturn(LadeRegistratie) + Do RegistratieRepositoryMock.VerwachtMethodCall("GeefViaProductNr",DnaCode.ProductNummer).DanReturn(LadeRegistratieIterator) Set EtiketAfdrukkenHelper = ##class(WSimpl.Halux.AAP.AfdrukService.EtiketAfdrukkenHelper).%New(, RegistratieRepositoryMock) #dim WerkPost As %String = EtiketAfdrukkenHelper.GeefWerkpost(DnaCode) @@ -79,6 +74,19 @@ Do RegistratieRepositoryMock.Verifieer() ]]> + + +Werkpost:%String,Familie:%String="" +1 +TECH.Iterator + + Index: vhTest/Mock/WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper.cls.xml =================================================================== diff -u -r72099 -r72943 --- vhTest/Mock/WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper.cls.xml (.../EtiketAfdrukkenHelper.cls.xml) (revision 72099) +++ vhTest/Mock/WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper.cls.xml (.../EtiketAfdrukkenHelper.cls.xml) (revision 72943) @@ -9,7 +9,7 @@ right -DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",RegistratieRepository:APPS.VKP.Maatwerk.LadeRegistratie.impl.RegistratieRepository="" +DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",RegistratieRepository:APPS.VKP.Maatwerk.LadeRegistratie.impl.RegistratieRepository="",Logger:vhLib.Logger="" %Status Index: WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper.cls.xml =================================================================== diff -u -r72666 -r72943 --- WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper.cls.xml (.../EtiketAfdrukkenHelper.cls.xml) (revision 72666) +++ WSimpl/Halux/AAP/AfdrukService/EtiketAfdrukkenHelper.cls.xml (.../EtiketAfdrukkenHelper.cls.xml) (revision 72943) @@ -13,15 +13,21 @@ 1 + +vhLib.Logger +1 + + -DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",RegistratieRepository:APPS.VKP.Maatwerk.LadeRegistratie.impl.RegistratieRepository="" +DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",RegistratieRepository:APPS.VKP.Maatwerk.LadeRegistratie.impl.RegistratieRepository="",Logger:vhLib.Logger="" 1 1 %Status 1 @@ -166,21 +172,24 @@ #dim Werkpost As %String = "" #dim IsTaor As %Boolean = ##class(TECH.StringUtils).StartsWith(DnaCode.DnaCode, "H") #dim DummyBypassGebruiken As %Boolean = ##class(TECH.Config.ConfigMgr).Instance().GetString("DummyLaderegistraties") - + If (DummyBypassGebruiken && IsTaor) { Quit "TAO" } - #dim LadeRegistratie As APPS.VKP.Maatwerk.LadeRegistratie.impl.Registratie + #dim LadeRegistraties As TECH.Iterator If $$$HasLength(DnaCode.Toelevering) { - Set LadeRegistratie = ..RegistratieRepository.GeefViaProductNrEnToelevering(DnaCode.ProductNummer, DnaCode.Toelevering) + Set LadeRegistraties = ..RegistratieRepository.GeefViaProductNrEnToelevering(DnaCode.ProductNummer, DnaCode.Toelevering) } Else { - Set LadeRegistratie = ..RegistratieRepository.GeefViaProductNr(DnaCode.ProductNummer) + Set LadeRegistraties = ..RegistratieRepository.GeefViaProductNr(DnaCode.ProductNummer) } - Set Werkpost = LadeRegistratie.Werkpost + If (LadeRegistraties.HasNext()) { + Set Werkpost = LadeRegistraties.Next().Werkpost + } + If Werkpost = "" { - Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.DataNotFoundException).%New("Werkpost/Productielijn kon niet bepaald worden voor DnaCode '"_DnaCode.DnaCode_"'")) + Do ..Logger.Warning("GeefWerkpost", "Werkpost kon niet bepaald worden voor DnaCode '"_DnaCode.DnaCode_"'") } Quit Werkpost @@ -204,7 +213,7 @@ } } } - + Quit TeGebruikenPrinter ]]> Index: vhTest/Fake/APPS/VKP/Maatwerk/LadeRegistratie/impl/RegistratieRepository.cls.xml =================================================================== diff -u -r66428 -r72943 --- vhTest/Fake/APPS/VKP/Maatwerk/LadeRegistratie/impl/RegistratieRepository.cls.xml (.../RegistratieRepository.cls.xml) (revision 66428) +++ vhTest/Fake/APPS/VKP/Maatwerk/LadeRegistratie/impl/RegistratieRepository.cls.xml (.../RegistratieRepository.cls.xml) (revision 72943) @@ -16,8 +16,7 @@ Data:TECH.Persistent - + @@ -56,14 +55,12 @@ ID:%String - + Data:TECH.Persistent - +