Index: APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBepaler/SFSPrijsFactorBepaler.cls.xml =================================================================== diff -u -r32966 -r33203 --- APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBepaler/SFSPrijsFactorBepaler.cls.xml (.../SFSPrijsFactorBepaler.cls.xml) (revision 32966) +++ APPS/EC/Winkelkar/WinkelkarService/impl/PrijsBepaler/SFSPrijsFactorBepaler.cls.xml (.../SFSPrijsFactorBepaler.cls.xml) (revision 33203) @@ -23,6 +23,16 @@ 2.25 + +%Decimal +2.2 + + + +%Decimal +2.36 + + DOM.EC.Winkelkar.Actie.MaatwerkActieDefinitieObjectRepository 1 Index: BL/PR/GA/TB/tmpDev2.mac.rou =================================================================== diff -u -r32974 -r33203 --- BL/PR/GA/TB/tmpDev2.mac.rou (.../tmpDev2.mac.rou) (revision 32974) +++ BL/PR/GA/TB/tmpDev2.mac.rou (.../tmpDev2.mac.rou) (revision 33203) @@ -350,9 +350,11 @@ #define MargeMBHO 1 // MargeKISCH=1 , berekening via LijstPrijs --> geen #define MargeKISCH 1 - // Marges voor SFS : vanaf 01/11/2013 is er een onderscheid tussen TBX met/zonder CorpusProfielen : + /* + // Zie klasse APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBepaler.SFSPrijsFactorBepaler #define MargeSFSxMetCP 2.2 #define MargeSFSxZonderCP 2.36 + */ New KPrijsVH,LPrs,VKPrs,VerwMarge,KLNrPrs,PrPiece,GenPRNr,IsBeursUser,IsAnonymousUser New D,Q,U @@ -469,12 +471,12 @@ New PrijsFactorSFS If GeldigeActiesVoorOrder.Count()>0 { // Voorlopig wordt niet gecontroleerd welke de actieve actie is, want er is slechts ��n aanwezig, nl. "CP gratis" - Set PrijsFactorSFS=$$$MargeSFSxZonderCP + Set PrijsFactorSFS=##class(APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBepaler.SFSPrijsFactorBepaler).%GetParameter("TBXLadeZonderGeleiders") } Else { - Set PrijsFactorSFS=$$$MargeSFSxMetCP + Set PrijsFactorSFS=##class(APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBepaler.SFSPrijsFactorBepaler).%GetParameter("TBXLadeMetGeleiders") If (pdlNietMee["NMCP") { - Set PrijsFactorSFS=$$$MargeSFSxZonderCP + Set PrijsFactorSFS=##class(APPS.EC.Winkelkar.WinkelkarService.impl.PrijsBepaler.SFSPrijsFactorBepaler).%GetParameter("TBXLadeZonderGeleiders") } } Quit PrijsFactorSFS