Index: APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml =================================================================== diff -u -r52453 -r53810 --- APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml (.../ZijkantLogoService.cls.xml) (revision 52453) +++ APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml (.../ZijkantLogoService.cls.xml) (revision 53810) @@ -88,6 +88,20 @@ ]]> + +KlantID:%String,LogoID:%String +%Boolean + + + + +PersonalityID:%String,LogoID:%String +%Boolean + + + KlantID:%String APPS.PM.Maatwerk.TAX.dto.ZijkantLogo Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/ZijkantLogoValidator.cls.xml =================================================================== diff -u -r53534 -r53810 --- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/ZijkantLogoValidator.cls.xml (.../ZijkantLogoValidator.cls.xml) (revision 53534) +++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/ZijkantLogoValidator.cls.xml (.../ZijkantLogoValidator.cls.xml) (revision 53810) @@ -8,6 +8,11 @@ 1 + +DOM.common.impl.PersonalityRepository +1 + + ZijkantLogoService:APPS.PM.Maatwerk.impl.TAX.ZijkantLogoService 1 @@ -16,23 +21,43 @@ 1 + +PersonalityId:%String +1 +%Boolean + + + EconMaatwerkLijn:APPS.EC.Winkelkar.dto.MaatwerkLijn,BewaarMaatwerkLijnRequest:WS.Vhisie4.Winkelkar.BewaarMaatwerkLijnRequest + +KlantID:%String,LogoID:%String,IsActief:%Boolean=1 +TECH.Persistent + + + + +PersonalityID:%String,LogoID:%String,IsActief:%Boolean=1 +TECH.Persistent + + + ID:%String %Boolean Index: DOM/PM/Maatwerk/TAX/Data/ZijkantLogoRepository.cls.xml =================================================================== diff -u -r51904 -r53810 --- DOM/PM/Maatwerk/TAX/Data/ZijkantLogoRepository.cls.xml (.../ZijkantLogoRepository.cls.xml) (revision 51904) +++ DOM/PM/Maatwerk/TAX/Data/ZijkantLogoRepository.cls.xml (.../ZijkantLogoRepository.cls.xml) (revision 53810) @@ -71,6 +71,20 @@ ]]> + +KlantID:%String,LogoID:%String,IsActief:%Boolean=1 +TECH.Persistent + + + + +PersonalityID:%String,LogoID:%String,IsActief:%Boolean=1 +TECH.Persistent + + + PersonalityID:%String,KlantID:%String,LogoID:%String,IsActief:%Boolean=1 TECH.Persistent Index: vhUnitTest/APPS/EDI/common/impl/Validator/ZijkantLogoValidator/IsValid/Test.cls.xml =================================================================== diff -u -r52236 -r53810 --- vhUnitTest/APPS/EDI/common/impl/Validator/ZijkantLogoValidator/IsValid/Test.cls.xml (.../Test.cls.xml) (revision 52236) +++ vhUnitTest/APPS/EDI/common/impl/Validator/ZijkantLogoValidator/IsValid/Test.cls.xml (.../Test.cls.xml) (revision 53810) @@ -26,7 +26,7 @@ Set Exceptions = ##class(TECH.ExceptionList).%New() #dim ZijkantLogoServiceMock As vhTest.Mock.APPS.PM.Maatwerk.impl.TAX.ZijkantLogoService = ##class(vhTest.Mock.APPS.PM.Maatwerk.impl.TAX.ZijkantLogoService).%New() - Do ZijkantLogoServiceMock.VerwachtMethodCall("BestaatLogoVoorKlant","PersonalityID","KlantID","ZijkantLogoID").DanReturn($$$True) + Do ZijkantLogoServiceMock.VerwachtMethodCall("BestaatLogoVoorKlantID","KlantID","ZijkantLogoID").DanReturn($$$True) Set Validator = ##class(APPS.EDI.common.impl.Validator.ZijkantLogoValidator).%New(ZijkantLogoServiceMock) @@ -48,7 +48,7 @@ Set Exceptions = ##class(TECH.ExceptionList).%New() #dim ZijkantLogoServiceMock As vhTest.Mock.APPS.PM.Maatwerk.impl.TAX.ZijkantLogoService = ##class(vhTest.Mock.APPS.PM.Maatwerk.impl.TAX.ZijkantLogoService).%New() - Do ZijkantLogoServiceMock.IndienMethodCall("BestaatLogoVoorKlant","PersonalityID","KlantID","ZijkantLogoID").DanReturn($$$False) + Do ZijkantLogoServiceMock.IndienMethodCall("BestaatLogoVoorKlantID","KlantID","ZijkantLogoID").DanReturn($$$False) Set Validator = ##class(APPS.EDI.common.impl.Validator.ZijkantLogoValidator).%New(ZijkantLogoServiceMock) Index: vhTest/Fake/APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml =================================================================== diff -u -r52235 -r53810 --- vhTest/Fake/APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml (.../ZijkantLogoService.cls.xml) (revision 52235) +++ vhTest/Fake/APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml (.../ZijkantLogoService.cls.xml) (revision 53810) @@ -21,6 +21,20 @@ ]]> + +KlantID:%String,LogoID:%String +%Boolean + + + + +PersonalityID:%String,LogoID:%String +%Boolean + + + KlantID:%String APPS.PM.Maatwerk.TAX.dto.ZijkantLogo Index: APPS/EDI/common/impl/Validator/ZijkantLogoValidator.cls.xml =================================================================== diff -u -r52237 -r53810 --- APPS/EDI/common/impl/Validator/ZijkantLogoValidator.cls.xml (.../ZijkantLogoValidator.cls.xml) (revision 52237) +++ APPS/EDI/common/impl/Validator/ZijkantLogoValidator.cls.xml (.../ZijkantLogoValidator.cls.xml) (revision 53810) @@ -8,6 +8,11 @@ 1 + +DOM.common.impl.PersonalityRepository +1 + + ZijkantLogoService:APPS.PM.Maatwerk.impl.TAX.ZijkantLogoService 1 @@ -16,6 +21,7 @@ 1 @@ -44,7 +50,12 @@ #dim TaxLade As APPS.EDI.common.dto.v001.LadeTAX = Product If ..IsGeldigZijkantLogoID(TaxLade.ZijkantLogoID) { - Set IsValid = ..ZijkantLogoService.BestaatLogoVoorKlant(PersonalityID, KlantID, TaxLade.ZijkantLogoID) + If (..IsVanHoeckePersonality(PersonalityID) && ..PersonalityRepository.BestaatViaKlantNummer(KlantID)) { + Set PersonalityID = ..PersonalityRepository.GeefViaKlantNummer(KlantID).GeefID() + Set IsValid = ..ZijkantLogoService.BestaatLogoVoorPersonalityID(PersonalityID, TaxLade.ZijkantLogoID) + } Else { + Set IsValid = ..ZijkantLogoService.BestaatLogoVoorKlantID(KlantID, TaxLade.ZijkantLogoID) + } } If $$$Not(IsValid) { @@ -60,6 +71,14 @@ ]]> + +PersonalityId:%String +1 +%Boolean + + + ZijkantLogoID:%String 1 Index: vhTest/Fake/DOM/PM/Maatwerk/TAX/Data/ZijkantLogoRepository.cls.xml =================================================================== diff -u -r52226 -r53810 --- vhTest/Fake/DOM/PM/Maatwerk/TAX/Data/ZijkantLogoRepository.cls.xml (.../ZijkantLogoRepository.cls.xml) (revision 52226) +++ vhTest/Fake/DOM/PM/Maatwerk/TAX/Data/ZijkantLogoRepository.cls.xml (.../ZijkantLogoRepository.cls.xml) (revision 53810) @@ -14,6 +14,20 @@ ]]> + +KlantID:%String,LogoID:%String,IsActief:%Boolean=1 +TECH.Persistent + + + + +PersonalityID:%String,LogoID:%String,IsActief:%Boolean=1 +TECH.Persistent + + + ID:%String %Boolean Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/ZijkantLogoValidator/Test.cls.xml =================================================================== diff -u -r53544 -r53810 --- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/ZijkantLogoValidator/Test.cls.xml (.../Test.cls.xml) (revision 53544) +++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/ZijkantLogoValidator/Test.cls.xml (.../Test.cls.xml) (revision 53810) @@ -11,7 +11,7 @@ Set EconMaatwerkLijn.IngegevenKenmerken.ZijkantLogoID = "ZijkantLogoID" Set ZijkantLogoServiceMock = ##class(vhTest.Mock.APPS.PM.Maatwerk.impl.TAX.ZijkantLogoService).%New() - Do ZijkantLogoServiceMock.VerwachtMethodCall("BestaatLogoVoorKlant","DummyPersonalityId", "DummyKlantId", "ZijkantLogoID").DanReturn($$$True) + Do ZijkantLogoServiceMock.VerwachtMethodCall("BestaatLogoVoorKlantID", "DummyKlantId", "ZijkantLogoID").DanReturn($$$True) Set ZijkantLogoValidator = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarMaatwerkLijn.ZijkantLogoValidator).%New(ZijkantLogoServiceMock) Do ZijkantLogoValidator.Valideer(EconMaatwerkLijn, BewaarMaatwerkLijnRequest) @@ -78,7 +78,7 @@ Set EconMaatwerkLijn.IngegevenKenmerken.ZijkantLogoID = "ZijkantLogoID" Set ZijkantLogoServiceMock = ##class(vhTest.Mock.APPS.PM.Maatwerk.impl.TAX.ZijkantLogoService).%New() - Do ZijkantLogoServiceMock.IndienMethodCall("BestaatLogoVoorKlant",$$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanReturn($$$False) + Do ZijkantLogoServiceMock.IndienMethodCall("BestaatLogoVoorKlantID",$$$ElkeWaarde, $$$ElkeWaarde).DanReturn($$$False) #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Het opgegeven ZijkantLogoID 'ZijkantLogoID' is niet geldig voor KlantID 'DummyKlantId' en PersonalityID 'DummyPersonalityId' bij BewaarMaatwerkLijn voor winkelkarID 'ExterneId' en LijnID 'LijnID' De maatwerklijn wordt niet bewaard! (Beste even uitzoeken waarom Vhisie4/ECON een verkeerd ZijkantLogoID kan meesturen!)") Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.InvalidInputException).%ClassName(1),Substrings)) Index: vhTest/Mock/APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml =================================================================== diff -u -r52235 -r53810 --- vhTest/Mock/APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml (.../ZijkantLogoService.cls.xml) (revision 52235) +++ vhTest/Mock/APPS/PM/Maatwerk/impl/TAX/ZijkantLogoService.cls.xml (.../ZijkantLogoService.cls.xml) (revision 53810) @@ -22,6 +22,20 @@ ]]> + +KlantID:%String,LogoID:%String +%Boolean + + + + +PersonalityID:%String,LogoID:%String +%Boolean + + + KlantID:%String APPS.PM.Maatwerk.TAX.dto.ZijkantLogo Index: APPS/PM/Maatwerk/impl/NaarObjectConverterTAX.cls.xml =================================================================== diff -u -r52383 -r53810 --- APPS/PM/Maatwerk/impl/NaarObjectConverterTAX.cls.xml (.../NaarObjectConverterTAX.cls.xml) (revision 52383) +++ APPS/PM/Maatwerk/impl/NaarObjectConverterTAX.cls.xml (.../NaarObjectConverterTAX.cls.xml) (revision 53810) @@ -66,7 +66,11 @@ set GeconverteerdeKenmerken.Toepassing = TAORKenmerken.Toepassing set GeconverteerdeKenmerken.Uittrekbaarheid = TAORKenmerken.Uittrekbaarheid set GeconverteerdeKenmerken.VerpakkingType = TAORKenmerken.VerpakkingType - set GeconverteerdeKenmerken.ZijkantLogoID = ..ZijkantLogoService.GeefLogoIDViaSamengesteldeNaam(TAORKenmerken.ZijkantLogoIds.GetAt(1)) + If $$$HasLength(TAORKenmerken.ZijkantLogoID) { + set GeconverteerdeKenmerken.ZijkantLogoID = TAORKenmerken.ZijkantLogoID + } Else { + set GeconverteerdeKenmerken.ZijkantLogoID = ..ZijkantLogoService.GeefLogoIDViaSamengesteldeNaam(TAORKenmerken.ZijkantLogoIds.GetAt(1)) + } set GeconverteerdeKenmerken.GUIKenmerken.IsBinnenbreedte = TAORKenmerken.IsBinnenbreedte set GeconverteerdeKenmerken.GUIKenmerken.WandDikte = TAORKenmerken.CorpusWandDikte Index: vhDeploy/Deploy20181109xTaorZijkantLogosUpdate.cls.xml =================================================================== diff -u --- vhDeploy/Deploy20181109xTaorZijkantLogosUpdate.cls.xml (revision 0) +++ vhDeploy/Deploy20181109xTaorZijkantLogosUpdate.cls.xml (revision 53810) @@ -0,0 +1,62 @@ + + + +vhDeploy.Deploy + + +%String +ZijkantLogo's toevoegen. + + + +1 + + + + +1 +LogoID:%String,PersonalityID:%String,KlantID:%String,Naam:%String,Referentie:%String,KostPrijs:%Decimal,IsGratis:%Boolean,IsActief:%Boolean,IsDefault:%Boolean +1 + + + + +1 +LogoID:%String +1 + + + + + +