Index: APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml =================================================================== diff -u -r53810 -r61403 --- APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml (.../ZijkantLogoService.cls.xml) (revision 53810) +++ APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml (.../ZijkantLogoService.cls.xml) (revision 61403) @@ -18,8 +18,13 @@ 1 + +DOM.VKP.impl.KlantDataRepository +1 + + -ZijkantLogoRepository:DOM.PM.Maatwerk.TAX.Data.ZijkantLogoRepository,PersonalityRepository:DOM.common.impl.PersonalityRepository,LegacyPartijAPI:DOM.PARTIJ.impl.LegacyPartijAPI +ZijkantLogoRepository:DOM.PM.Maatwerk.TAX.Data.ZijkantLogoRepository,PersonalityRepository:DOM.common.impl.PersonalityRepository,LegacyPartijAPI:DOM.PARTIJ.impl.LegacyPartijAPI,KlantDataRepository:DOM.VKP.impl.KlantDataRepository 1 1 %Status @@ -28,6 +33,7 @@ Set ..ZijkantLogoRepository = $$$Inject(ZijkantLogoRepository,##class(DOM.PM.Maatwerk.TAX.Data.ZijkantLogoRepository).%New()) Set ..PersonalityRepository = $$$Inject(PersonalityRepository, ##class(DOM.common.impl.PersonalityRepository).%New()) Set ..LegacyPartijAPI = $$$Inject(LegacyPartijAPI, ##class(DOM.PARTIJ.impl.LegacyPartijAPI).%New()) + Set ..KlantDataRepository = $$$Inject(KlantDataRepository, ##class(DOM.VKP.impl.KlantDataRepository).%New()) Quit $$$OK ]]> @@ -59,7 +65,26 @@ #dim Personality As DOM.common.impl.Personality = ..PersonalityRepository.GeefViaKlantNummer(KlantNummer) Set ZijkantLogoIterator = ..ZijkantLogoRepository.ZoekViaPersonalityID(Personality.GeefID()) } Else { - Set ZijkantLogoIterator = ..ZijkantLogoRepository.ZoekViaKlantID(KlantNummer) + If (..IsVanHoeckePersonality(PersonalityID)) { + Set ZijkantLogoIterator = ..ZijkantLogoRepository.ZoekViaPersonalityIDEnKlantID(PersonalityID, KlantNummer) + } Else { + If (PersonalityID = ##class(DOM.common.enu.Personality).SFS()) { + #dim KlantIterator As TECH.Iterator = ..KlantDataRepository.ZoekSFSHandelIdViaHandelKlantId(##class(DOM.common.SFSPersonality).Instance().GeefPrefix()_KlantNummer) + If (KlantIterator.HasNext()) { + #dim SFSHandelsKlantId As %String = $Piece($Piece(KlantIterator.Next().Naam,"(",2),"/",1) + If $$$HasLength(SFSHandelsKlantId) { + Set ZijkantLogoIterator = ..ZijkantLogoRepository.ZoekViaPersonalityIDEnKlantID(##class(DOM.common.enu.Personality).SFS(), SFSHandelsKlantId) + } Else { + Set ZijkantLogoIterator = ..ZijkantLogoRepository.ZoekViaPersonalityIDEnKlantID(##class(DOM.common.enu.Personality).SFS(), KlantNummer) + } + } Else { + Set ZijkantLogoIterator = ..ZijkantLogoRepository.ZoekViaPersonalityIDEnKlantID(##class(DOM.common.enu.Personality).SFS(), KlantNummer) + } + } Else { + Set ZijkantLogoIterator = ..ZijkantLogoRepository.ZoekViaPersonalityIDEnKlantID(PersonalityID, KlantNummer) + } + } + } Quit ..MaakZijkantLogosVoorKlant(ZijkantLogoIterator) Index: APPS/EDI/common/impl/Validator/ZijkantLogoValidator.cls.xml =================================================================== diff -u -r53810 -r61403 --- APPS/EDI/common/impl/Validator/ZijkantLogoValidator.cls.xml (.../ZijkantLogoValidator.cls.xml) (revision 53810) +++ APPS/EDI/common/impl/Validator/ZijkantLogoValidator.cls.xml (.../ZijkantLogoValidator.cls.xml) (revision 61403) @@ -13,15 +13,21 @@ 1 + +DOM.VKP.impl.KlantDataRepository +1 + + -ZijkantLogoService:APPS.PM.Maatwerk.impl.TAX.ZijkantLogoService +ZijkantLogoService:APPS.PM.Maatwerk.impl.TAX.ZijkantLogoService,KlantDataRepository:DOM.VKP.impl.KlantDataRepository 1 1 %Status 1 @@ -53,6 +59,17 @@ If (..IsVanHoeckePersonality(PersonalityID) && ..PersonalityRepository.BestaatViaKlantNummer(KlantID)) { Set PersonalityID = ..PersonalityRepository.GeefViaKlantNummer(KlantID).GeefID() Set IsValid = ..ZijkantLogoService.BestaatLogoVoorPersonalityID(PersonalityID, TaxLade.ZijkantLogoID) + } ElseIf (PersonalityID = ##class(DOM.common.enu.Personality).SFS()) { + #dim KlantIterator As TECH.Iterator = ..KlantDataRepository.ZoekSFSHandelIdViaHandelKlantId(##class(DOM.common.SFSPersonality).Instance().GeefPrefix()_KlantID) + If (KlantIterator.HasNext()) { + #dim SFSHandelsKlantId As %String = $Piece($Piece(KlantIterator.Next().Naam,"(",2),"/",1) + + If $$$HasLength(SFSHandelsKlantId) { + Set IsValid = ..ZijkantLogoService.BestaatLogoVoorKlantID(SFSHandelsKlantId, TaxLade.ZijkantLogoID) + } Else { + Set IsValid = ..ZijkantLogoService.BestaatLogoVoorKlantID(KlantID, TaxLade.ZijkantLogoID) + } + } } Else { Set IsValid = ..ZijkantLogoService.BestaatLogoVoorKlantID(KlantID, TaxLade.ZijkantLogoID) }