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
+
+
+
+
+
+