Index: BL/PR/GA/TB/tmpDev2.mac.rou =================================================================== diff -u -r670 -r724 --- BL/PR/GA/TB/tmpDev2.mac.rou (.../tmpDev2.mac.rou) (revision 670) +++ BL/PR/GA/TB/tmpDev2.mac.rou (.../tmpDev2.mac.rou) (revision 724) @@ -451,13 +451,13 @@ // BENELUX handels met korting, i.e. met klantinfo New HandelVKPrijs,KPrijsData,HandelVKPrijs - If (sDomVERW="MBHO")||(sDomVERW="HFLB")||(sDomVERW="KISCH")||(sDomVERW="RAEM") { + If (sDomVERW="MBHO")||(sDomVERW="HFLB")||(sDomVERW="HFLE")||(sDomVERW="KISCH")||(sDomVERW="RAEM") { Set KPrijsData=$$KLANTPR^KPRIJS(KLNrPrs,GenPRNr,$G(%NoSa),$J(KPrijsVH,0,2)) Set HandelVKPrijs=$J($$$HandelLijstPrijs(KPrijsData)*KLReductie,0,2) // Als de "HandelVKPrijs met KLKorting" kleiner dan de HandelAKPrijs, dan wordt de KLKorting volledig ongedaan gemaakt. If HandelVKPrijs<$$$HandelAankoopPrijs(KPrijsData) { Set HandelVKPrijs=$$$HandelLijstPrijs(KPrijsData) } } - Quit:(sDomVERW="MBHO")||(sDomVERW="HFLB")||(sDomVERW="KISCH")||(sDomVERW="RAEM") HandelVKPrijs + Quit:(sDomVERW="MBHO")||(sDomVERW="HFLB")||(sDomVERW="HFLE")||(sDomVERW="KISCH")||(sDomVERW="RAEM") HandelVKPrijs // Niet-BENELUX handels (met en zonder korting , i.e. met en zonder klantinfo) Set VerwMarge=$CASE(sDomVERW, "HEIN":$$$MargeHEIN, "LMC":$$$MargeLMC, "SFS":$$bfwGeefPrijsFactorVoorSFS(pdlNietMee,GeldigeActiesVoorOrder), :1) Index: csp/vhisie/TBX/BuildRef/tmpDev.mac.rou =================================================================== diff -u -r718 -r724 --- csp/vhisie/TBX/BuildRef/tmpDev.mac.rou (.../tmpDev.mac.rou) (revision 718) +++ csp/vhisie/TBX/BuildRef/tmpDev.mac.rou (.../tmpDev.mac.rou) (revision 724) @@ -144,7 +144,7 @@ If 'blnNoAccess Do . Set %blnBuildRef=1 . Set DataOpt=$G(%request.Data("DATAOPT",1)) - . Set DataOptOut=$$OPTIMADecryptData^cspBasis.TBX.DecodeURL.tmpDev(DataOpt,.tmpAr,$S(sDomVERW="SFS":"SFS", sDomVERW="MBHO":"MBHO", sDomVERW="HFLB":"HFLB", sDomVERW="KISCH":"KISCH", sDomVERW="RAEM":"RAEM", 1:"LMC")) + . Set DataOptOut=$$OPTIMADecryptData^cspBasis.TBX.DecodeURL.tmpDev(DataOpt,.tmpAr,$S(sDomVERW="SFS":"SFS", sDomVERW="MBHO":"MBHO", sDomVERW="HFLB":"HFLB", sDomVERW="HFLE":"HFLE", sDomVERW="KISCH":"KISCH", sDomVERW="RAEM":"RAEM", 1:"LMC")) . Kill %blnBuildRef Set tmpTaal=$G(tmpAr("Taal")) Set:(tmpTaal?1(1"N",1"F",1"E",1"D")) Taal=tmpTaal @@ -186,7 +186,7 @@ . ;If $L($G(%request.Data("DATAOPT",1))) Do . If $L(DataOpt) Do .. Set DataOptCheck=DataOpt - .. Set EncDataOptOut=$$OPTIMAEncryptData^cspBasis.TBX.DecodeURL.tmpDev(DataOpt,$S(sDomVERW="SFS":"SFS", sDomVERW="MBHO":"MBHO", sDomVERW="HFLB":"HFLB", sDomVERW="KISCH":"KISCH", sDomVERW="RAEM":"RAEM", 1:"LMC")) + .. Set EncDataOptOut=$$OPTIMAEncryptData^cspBasis.TBX.DecodeURL.tmpDev(DataOpt,$S(sDomVERW="SFS":"SFS", sDomVERW="MBHO":"MBHO", sDomVERW="HFLB":"HFLB", sDomVERW="HFLE":"HFLE", sDomVERW="KISCH":"KISCH", sDomVERW="RAEM":"RAEM", 1:"LMC")) .. ;Set EncDataOptOut=$system.Encryption.Base64Decode($TR(EncDataOptOut,"_-","+=")) .. If blnKeySteps Do ophOPTIMAIntermediates(DataOpt,sDomVERW) . ;New Page,UrlTaal Index: APPS/TBXWeb/impl/VHEPNOrderHandler.cls.xml =================================================================== diff -u -r712 -r724 --- APPS/TBXWeb/impl/VHEPNOrderHandler.cls.xml (.../VHEPNOrderHandler.cls.xml) (revision 712) +++ APPS/TBXWeb/impl/VHEPNOrderHandler.cls.xml (.../VHEPNOrderHandler.cls.xml) (revision 724) @@ -74,10 +74,13 @@ Set lbMailTo = $LB("OV_TBX_ANON@vanhoecke.be") } - // Tijdelijk voor HFLB (hafele.be) + // Tijdelijk voor HFLB (hafele.be) en HFLE (hafele.nl) If ..Requester="HFLB" { Set lbMailTo=$LB("OV_TBX_HFLB@vanhoecke.be") } + If ..Requester="HFLE" { + Set lbMailTo=$LB("OV_TBX_HFLB@vanhoecke.be") + } If lbMailTo="" { Set lbMailTo = $LB("""OV_TBX_MGR"" ") Index: APPS/TBXWeb/TBXContext.cls.xml =================================================================== diff -u -r721 -r724 --- APPS/TBXWeb/TBXContext.cls.xml (.../TBXContext.cls.xml) (revision 721) +++ APPS/TBXWeb/TBXContext.cls.xml (.../TBXContext.cls.xml) (revision 724) @@ -740,7 +740,7 @@ De button voor het dupliceren van een order/offerte tonen. %Boolean