Improvement/Ticket#880: - Per SimpleScarf (T70) implementata forzatura utilizzo fresa di lato tramite parametro Q04. Nel caso, viene richiamata la FreeContour

LuaLibs/ProcessSimpleScarf.lua

@@ -2,6 +2,7 @@
 -- Gestione calcolo giunto Gerber per Travi
 -- 2022/06/10 Aggiunto il parametro dOvmTail per gestire sovramateriali in coda diversi da OVM_MID (sezioni alte e larghe)
 -- 2022/08/09 Ora se la feature ha meno di due facce viene richiamata la normale Cut.
+-- 2022/11/09 Aggiunta gestione parametro Q04 per forzare utilizzo fresa di lato e lavorare come FreeContour.
 
 -- Tabella per definizione modulo
 local ProcessSimpleScarf = {}
@@ -12,6 +13,7 @@ local BL = require( 'BeamLib')
 local Fbs = require( 'FacesBySaw')
 local DC = require( 'DiceCut')
 local Cut = require( 'ProcessCut')
+local FreeContour = require( 'ProcessFreeContour')
 
 EgtOutLog( ' ProcessSimpleScarf started', 1)
 
@@ -28,11 +30,13 @@ end
 ---------------------------------------------------------------------
 -- Classificazione della feature
 function ProcessSimpleScarf.Classify( Proc)
+   -- se forzato utilizzo fresa non ruoto la trave
+   local bForceSideMill = EgtGetInfo( Proc.Id, 'Q04', 'd') > 0
    -- verifico le normali delle facce
    local nFacetCnt = EgtSurfTmFacetCount( Proc.Id)
    for i = 1, nFacetCnt do
       local vtN = EgtSurfTmFacetNormVersor( Proc.Id, i-1, GDB_ID.ROOT)
-      if vtN:getZ() < - 0.5 and Proc.Box:getDimX() / abs( vtN:getZ()) > BD.MAX_DIM_DICE then
+      if vtN:getZ() < - 0.5 and Proc.Box:getDimX() / abs( vtN:getZ()) > BD.MAX_DIM_DICE and not bForceSideMill then
          return true, true
       end
    end
@@ -188,6 +192,12 @@ function ProcessSimpleScarf.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, dOvmT
    -- inserimento smussi
    local bOkc, sErrC = MakeChamfer( Proc, nPhase, nRawId, nPartId, dOvmHead)
    if not bOkc then return bOkc, sErrC end
+   -- se forzato utilizzo fresa richiamo la freecontour
+   local bForceSideMill = EgtGetInfo( Proc.Id, 'Q04', 'd') == 1 or EgtGetInfo( Proc.Id, 'Q04', 'd') == 2 or ( EgtGetInfo( Proc.Id, 'Q04', 'd') == 3 and vtN[vFaceOrd[3]]:getZ() < 0.1) 
+   if bForceSideMill then
+      bOk, sErr = FreeContour.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
+      return bOk, sErr
+   end
    -- recupero la lavorazione
    local sCutting = ML.FindCutting( 'HeadSide')
    if not sCutting then