Index: WS/EC/Winkelkar/WinkelkarService.cls.xml =================================================================== diff -u -r29059 -r32438 --- WS/EC/Winkelkar/WinkelkarService.cls.xml (.../WinkelkarService.cls.xml) (revision 29059) +++ WS/EC/Winkelkar/WinkelkarService.cls.xml (.../WinkelkarService.cls.xml) (revision 32438) @@ -13,15 +13,31 @@ http://www.vanhoecke.be/EC/Winkelkar + +APPS.EC.Winkelkar.impl.WinkelkarServiceUtils +1 + + + +1 + + + Applicatie:APPS.common.dto.Applicatie="",WinkelkarID:%String APPS.EC.Winkelkar.dto.Winkelkar 1 @@ -36,10 +52,15 @@ $$$chkIsObject(Applicatie) $$$chkValidateObject(Applicatie) - + Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetKlant(KlantID) + #dim PartijID As DOM.common.PartijID = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantPartijID(KlantID) - Quit ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().MaakWinkelkar(Applicatie, PartijID,..GeefPersonalityID()) + #dim Winkelkar As APPS.EC.Winkelkar.dto.Winkelkar = ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().MaakWinkelkar(Applicatie, PartijID,..GeefPersonalityID()) + + Do ..Utils.CorrigeerWinkelkar(Winkelkar) + + Quit Winkelkar ]]> @@ -52,7 +73,12 @@ $$$chkRequiredParameter(LijnID) Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetWinkelkar(WinkelkarID) - Quit ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().VerwijderLijn(WinkelkarID, LijnID) + + #dim Winkelkar As APPS.EC.Winkelkar.dto.Winkelkar = ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().VerwijderLijn(WinkelkarID, LijnID) + + Do ..Utils.CorrigeerWinkelkar(Winkelkar) + + Quit Winkelkar ]]> @@ -69,7 +95,12 @@ $$$chkValidateObject(IngegevenKenmerken) Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetWinkelkar(WinkelkarID) - Quit ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().VoegToeMaatwerkEnGeefWinkelkarTerug(WinkelkarID, GroepNaam, IngegevenKenmerken, Aantal, .ProjectReferentie) + + #dim Winkelkar As APPS.EC.Winkelkar.dto.Winkelkar = ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().VoegToeMaatwerkEnGeefWinkelkarTerug(WinkelkarID, GroepNaam, IngegevenKenmerken, Aantal, .ProjectReferentie) + + Do ..Utils.CorrigeerWinkelkar(Winkelkar) + + Quit Winkelkar ]]> @@ -108,7 +139,12 @@ $$$chkRequiredParameter(WinkelkarID) Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetWinkelkar(WinkelkarID) - Quit ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().MaakLeegWinkelkar(WinkelkarID) + + #dim Winkelkar As APPS.EC.Winkelkar.dto.Winkelkar = ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().MaakLeegWinkelkar(WinkelkarID) + + Do ..Utils.CorrigeerWinkelkar(Winkelkar) + + Quit Winkelkar ]]> @@ -121,7 +157,12 @@ $$$chkRequiredParameter(LijnID) Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetWinkelkar(WinkelkarID) - Quit ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().GeefLijn(WinkelkarID,LijnID) + + #dim Lijn As APPS.EC.Winkelkar.dto.Lijn = ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().GeefLijn(WinkelkarID, LijnID) + + Do ..Utils.CorrigeerLijn(Lijn) + + Quit Lijn ]]> @@ -134,7 +175,12 @@ $$$chkRequiredParameter(LijnID) Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetWinkelkar(WinkelkarID) - Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().DupliceerLijn(WinkelkarID,LijnID) + + #dim Lijn As APPS.EC.Winkelkar.dto.Lijn = ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().DupliceerLijn(WinkelkarID, LijnID) + + Do ..Utils.CorrigeerLijn(Lijn) + + Quit Lijn ]]> @@ -147,7 +193,7 @@ $$$chkRequiredParameter(Aantal) Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetWinkelkar(WinkelkarID) - Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().WijzigLijnAantal(WinkelkarID,LijnID,Aantal) + Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().WijzigLijnAantal(WinkelkarID, LijnID, Aantal) ]]> @@ -163,9 +209,8 @@ $$$chkIsObject(IngegevenKenmerken) $$$chkValidateObject(IngegevenKenmerken) - Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetWinkelkar(WinkelkarID) - Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().WijzigMaatwerkLijn(WinkelkarID,LijnID,IngegevenKenmerken,Aantal,GroepNaam,ProjectReferentie) + Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWinkelkarService().WijzigMaatwerkLijn(WinkelkarID, LijnID, IngegevenKenmerken, Aantal, GroepNaam, ProjectReferentie) ]]> @@ -175,8 +220,9 @@