diff --git a/LuaLibs/ProcessLapJoint.lua b/LuaLibs/ProcessLapJoint.lua
index 51f2833..ed06d87 100644
--- a/LuaLibs/ProcessLapJoint.lua
+++ b/LuaLibs/ProcessLapJoint.lua
@@ -3408,7 +3408,11 @@ local function MakePocket( Proc, nPartId, b3Solid, ptPs, tvtN, nFaceRef, sMchFin
          end
       end
    end
+   -- eventuale massima elevazione imposta dall'utente
+   local dMaxElev = EgtGetInfo( Proc.Id, Q_MAX_ELEVATION, 'd')
+   if dMaxElev and dMaxElev < 1 then dMaxElev = nil end
    -- se elevazione superiore a massimo affondamento della fresa, riduco opportunamente
+   dElev = dMaxElev or dElev
    local sWarn
    local dDepth = dElev
    if dElev > dMaxDepth + 10 * GEO.EPS_SMALL then
@@ -3419,11 +3423,7 @@ local function MakePocket( Proc, nPartId, b3Solid, ptPs, tvtN, nFaceRef, sMchFin
       EgtOutLog( sWarn)
    end
    -- imposto elevazione e dichiaro non si generano sfridi per VMill
-   -- eventuale massima elevazione imposta dall'utente
-   local dMaxElev = EgtGetInfo( Proc.Id, Q_MAX_ELEVATION, 'd')
-   if dMaxElev and dMaxElev < 1 then dMaxElev = nil end
-   dMaxElev = dMaxElev or dElev
-   local sNotes = 'MaxElev=' .. EgtNumToString( dMaxElev, 1) .. ';'
+   local sNotes = 'MaxElev=' .. EgtNumToString( dElev, 1) .. ';'
    sNotes = sNotes .. 'VMRS=0;'
    if bOpenOutRaw then
       sNotes = sNotes .. 'OpenOutRaw=1;'