Feature/SideMillOnL20:

- Per L20 implementata forzatura utilizzo fresa di lato tramite parametro Q04

LuaLibs/ProcessFreeContour.lua

@@ -858,9 +858,6 @@ function ProcessFreeContour.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
    if Proc.Prc == 70 then
       Q_DEPTH_CHAMFER = 'Q01'
       Q_DIM_STRIP = 'Q02'
-   elseif Proc.Prc == 30 then
-      Q_DEPTH_CHAMFER = 'Q01'
-      Q_DIM_STRIP = 'Q02'
    end
    -- recupero la tipologia
    local bPocket = ( EgtGetInfo( Proc.Id, 'PCKT', 'i') == 1)

LuaLibs/ProcessLapJoint.lua

@@ -57,6 +57,7 @@
 -- 2022/09/27 Aggiunta gestione SCC per svuotature con TURN (solo dopo applicazione lavorazione).
 -- 2022/10/20 In MakeByChainOrSaw modificato check per trovare la faccia adiacente sul lato più lungo.
 -- 2022/12/12 Default 1000 per BD.MIN_LEN_LAMELLO. In MachineByMill migliorata ricerca utensile e gestione inversione in funzione del lato di lavoro.
+-- 2022/12/16 Implementato parametro Q_SIDE_ROUGH_TOOL anche per L20
 
 -- Tabella per definizione modulo
 local ProcessLapJoint = {}
@@ -140,6 +141,7 @@ local function AssignQIdent( Proc)
       Q_DEPTH_CHAMFER       = 'Q01' -- d
       Q_USE_MILL            = 'Q02' -- i
       Q_USE_ROUGH_TOOL      = 'Q03' -- i
+      Q_SIDE_ROUGH_TOOL     = 'Q04' -- i
       Q_BORE_ON_CORNER      = 'Q06' -- i  
    elseif ( Proc.Grp == 3 or Proc.Grp == 4)  and  Proc.Prc == 25 then
       Q_BORE_ON_CORNER      = 'Q01' -- i  
@@ -5599,7 +5601,7 @@ function ProcessLapJoint.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
    local nForceUseBladeOnNotContinueFace
    -- se ho attivo la lama e ho la feature 30, verifico i parametri Q propri della feature
    if bUseBlade then
-      if Proc.Prc == 30 then
+      if Proc.Prc == 30 or Proc.Prc == 20 then
          local nBladeAntisplint = EgtGetInfo( Proc.Id, Q_ANTISPLINT_TYPE, 'i') or 0
          local nUseRoughToolOnSide = EgtGetInfo( Proc.Id, Q_SIDE_ROUGH_TOOL, 'i') or 0
          nForceUseBladeOnNotContinueFace = EgtGetInfo( Proc.Id, Q_BLADE_ON_ALONG_FACE, 'i') or 0 

LuaLibs/ProcessRidgeLap.lua

@@ -10,7 +10,6 @@ local BL = require( 'BeamLib')
 local Fbs = require( 'FacesBySaw')
 local Cut = require( 'ProcessCut')
 local DC = require( 'DiceCut')
-local FreeContour = require( 'ProcessFreeContour')
 
 EgtOutLog( ' ProcessRidgeLap started', 1)
 
@@ -27,10 +26,8 @@ end
 ---------------------------------------------------------------------
 -- Classificazione della feature
 function ProcessRidgeLap.Classify( Proc, b3Raw)
-   -- se forzato utilizzo fresa non ruoto la trave
-   local bForceSideMill = ( EgtGetInfo( Proc.Id, 'Q04', 'd') or 0) > 0
-   -- se PF con testa da sotto oppure forzato utilizzo fresa, ammessa qualunque orientazione
-   if ( BD.C_SIMM and BD.DOWN_HEAD) or bForceSideMill then
+   -- se PF con testa da sotto, ammessa qualunque orientazione
+   if BD.C_SIMM and BD.DOWN_HEAD then
       return true, false
    end
    -- Se più corta del limite si può fare anche da sotto
@@ -140,68 +137,59 @@ function ProcessRidgeLap.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
          if not bOk then return bOk, sErr end
       end
    end
-   -- se forzato utilizzo fresa richiamo la freecontour
-   local bForceSideMill = EgtGetInfo( Proc.Id, 'Q04', 'd') == 1 or
-                        ( EgtGetInfo( Proc.Id, 'Q04', 'd') == 2 and abs( vtN[vFaceOrd[3]]:getY()) < 0.1) or
-                        ( EgtGetInfo( Proc.Id, 'Q04', 'd') == 3 and abs( vtN[vFaceOrd[3]]:getY()) < 0.1 and vtN[vFaceOrd[3]]:getZ() < 0.1)
-   if bForceSideMill then
-      bOk, sErr = FreeContour.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
-      if not bOk then return bOk, sErr end
+   -- recupero gruppo per geometria addizionale
+   local nAddGrpId = BL.GetAddGroup( nPartId)
+   if not nAddGrpId then
+      local sErr = 'Error : missing AddGroup'
+      EgtOutLog( sErr)
+      return false, sErr
+   end
+   -- se esistono faccia interna ed intermedia, verifico se richiedono taglio a cubetti
+   local vCuts = {}
+   if vFaceOrd[2] ~= 0 and vFaceOrd[3] ~= 0 then
+      vCuts = DC.GetDice( nAddGrpId, b3Solid, ptC[vFaceOrd[3]], vtN[vFaceOrd[3]], false, ptC[vFaceOrd[2]], vtN[vFaceOrd[2]])
+   end
+   if #vCuts > 0 then
+      -- sistemo posizione nel DB e nome
+      for i = 1, #vCuts do
+         for j = 1, #vCuts[i] do
+            EgtSetName( vCuts[i][j], 'AddCut_' .. tostring( Proc.Id))
+            EgtSetInfo( vCuts[i][j], 'TASKID', Proc.TaskId)
+         end
+      end
+      -- calcolo riferimenti per facce inclinate
+      local vtRef = Vector3d( vtN[vFaceOrd[3]])
+      local vtRef2 = EgtIf( bHead, X_AX(), -X_AX())
+      -- eseguo
+      for i = 1, #vCuts do
+         local nOrthoOpposite
+         if i % 2 == 1 then
+            nOrthoOpposite = BL.GetNearestOrthoOpposite( vtRef)
+         else
+            nOrthoOpposite = BL.GetNearestOrthoOpposite( vtRef2)
+         end
+         -- lavoro la faccia
+         for j = 1, #vCuts[i] do
+            local bOk, sErr = Fbs.MakeOne( vCuts[i][j], 0, sCutting, dSawDiam, nOrthoOpposite, dVzLimDwnUp, 0, BD.CUT_SIC, 0, 0, 0, nil, b3Raw)
+            if not bOk then
+               return bOk, sErr
+            end
+         end
+      end
    else
-      -- recupero gruppo per geometria addizionale
-      local nAddGrpId = BL.GetAddGroup( nPartId)
-      if not nAddGrpId then
-         local sErr = 'Error : missing AddGroup'
-         EgtOutLog( sErr)
-         return false, sErr
+      -- taglio sulla faccia interna
+      if vFaceOrd[2] ~= 0 then
+         -- inserisco la lavorazione
+         local nOrthoOpposite = BL.GetNearestOrthoOpposite( vtN[vFaceOrd[3]])
+         local bOk, sErr = Fbs.MakeOne( Proc.Id, vFaceOrd[2] - 1, sCutting, dSawDiam, nOrthoOpposite, dVzLimDwnUp, 0, BD.CUT_SIC, 0, 0, 0, nil, b3Raw)
+         if not bOk then return bOk, sErr end
       end
-      -- se esistono faccia interna ed intermedia, verifico se richiedono taglio a cubetti
-      local vCuts = {}
-      if vFaceOrd[2] ~= 0 and vFaceOrd[3] ~= 0 then
-         vCuts = DC.GetDice( nAddGrpId, b3Solid, ptC[vFaceOrd[3]], vtN[vFaceOrd[3]], false, ptC[vFaceOrd[2]], vtN[vFaceOrd[2]])
-      end
-      if #vCuts > 0 then
-         -- sistemo posizione nel DB e nome
-         for i = 1, #vCuts do
-            for j = 1, #vCuts[i] do
-               EgtSetName( vCuts[i][j], 'AddCut_' .. tostring( Proc.Id))
-               EgtSetInfo( vCuts[i][j], 'TASKID', Proc.TaskId)
-            end
-         end
-         -- calcolo riferimenti per facce inclinate
-         local vtRef = Vector3d( vtN[vFaceOrd[3]])
-         local vtRef2 = EgtIf( bHead, X_AX(), -X_AX())
-         -- eseguo
-         for i = 1, #vCuts do
-            local nOrthoOpposite
-            if i % 2 == 1 then
-               nOrthoOpposite = BL.GetNearestOrthoOpposite( vtRef)
-            else
-               nOrthoOpposite = BL.GetNearestOrthoOpposite( vtRef2)
-            end
-            -- lavoro la faccia
-            for j = 1, #vCuts[i] do
-               local bOk, sErr = Fbs.MakeOne( vCuts[i][j], 0, sCutting, dSawDiam, nOrthoOpposite, dVzLimDwnUp, 0, BD.CUT_SIC, 0, 0, 0, nil, b3Raw)
-               if not bOk then
-                  return bOk, sErr
-               end
-            end
-         end
-      else
-         -- taglio sulla faccia interna
-         if vFaceOrd[2] ~= 0 then
-            -- inserisco la lavorazione
-            local nOrthoOpposite = BL.GetNearestOrthoOpposite( vtN[vFaceOrd[3]])
-            local bOk, sErr = Fbs.MakeOne( Proc.Id, vFaceOrd[2] - 1, sCutting, dSawDiam, nOrthoOpposite, dVzLimDwnUp, 0, BD.CUT_SIC, 0, 0, 0, nil, b3Raw)
-            if not bOk then return bOk, sErr end
-         end
-         -- taglio sulla faccia intermedia
-         if vFaceOrd[3] ~= 0 then
-            -- inserisco la lavorazione
-            local nOrthoOpposite = BL.GetNearestOrthoOpposite( EgtIf( bHead, X_AX(), -X_AX()))
-            local bOk, sErr = Fbs.MakeOne( Proc.Id, vFaceOrd[3] - 1, sCutting, dSawDiam, nOrthoOpposite, dVzLimDwnUp, 0, BD.CUT_SIC, 0, 0, 0, nil, b3Raw)
-            if not bOk then return bOk, sErr end
-         end
+      -- taglio sulla faccia intermedia
+      if vFaceOrd[3] ~= 0 then
+         -- inserisco la lavorazione
+         local nOrthoOpposite = BL.GetNearestOrthoOpposite( EgtIf( bHead, X_AX(), -X_AX()))
+         local bOk, sErr = Fbs.MakeOne( Proc.Id, vFaceOrd[3] - 1, sCutting, dSawDiam, nOrthoOpposite, dVzLimDwnUp, 0, BD.CUT_SIC, 0, 0, 0, nil, b3Raw)
+         if not bOk then return bOk, sErr end
       end
    end
    -- aggiornamento ingombro di testa o coda