- in StepJointNotch se 3 facce si chiama LapJoint

- in LapJoint -> MachineByMill, in lavorazione faccia inclinata, se utensile troppo più grande dell'originale si salta la lavorazione

LuaLibs/ProcessDrill.lua

@@ -642,8 +642,8 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
       local dStep = EgtGetMachiningParam( MCH_MP.STEP)
       local nNumStep = ceil( dDepth/dStep)
       local dRealStep = dDepth / nNumStep
-      -- Se nel penultimo step le punte si trovano più vicine del minimo ( MinDistX1X2 + Puntina centraggio H1 + puntina centraggio H2) ricalcolo facendo uno step in meno
-      if ( ( dLen / 2)  - ( dRealStep * (nNumStep - 1))) * 2 < ( 40 + 10 + 10) then
+      -- Se foro passante e nel penultimo step le punte si trovano più vicine del minimo ( MinDistX1X2 + Puntina centraggio H1 + puntina centraggio H2) ricalcolo facendo uno step in meno
+      if bOpen and ( nNumStep > 1) and ( ( dLen / 2)  - ( dRealStep * (nNumStep - 1))) * 2 < ( 40 + 10 + 10) then
          dRealStep = ceil( dDepth / (nNumStep - 1))
          EgtSetMachiningParam( MCH_MP.STEP, dRealStep)
          sMyWarn ='Warning in drill-double : step changed to ' .. tostring(dRealStep) .. 'mm'

LuaLibs/ProcessLapJoint.lua

@@ -3721,7 +3721,7 @@ local function MachineByMill( Proc, nPhase, nRawId, nPartId, b3Solid, tvtN, nBas
                EgtOutLog( sErr)
                return false, sErr
             else
-               sWarn = 'Warning : lapjoint chamfer angle machined with different tool'
+               sWarn = 'Warning : lapjoint angled face machined with different tool'
             end
          end
          -- recupero i dati dell'utensile
@@ -3732,6 +3732,15 @@ local function MachineByMill( Proc, nPhase, nRawId, nPartId, b3Solid, tvtN, nBas
                dTDiam = EgtTdbGetCurrToolParam( MCH_TP.DIAM) or dTDiam
             end
          end
+         -- se utensile troppo più grande dell'originale salto la lavorazione
+         if sTuuidPk and EgtTdbSetCurrTool( EgtTdbGetToolFromUUID( sTuuidPk) or '') then
+            local dTDiamOriginalTool = EgtTdbGetCurrToolParam( MCH_TP.DIAM) or 0
+            if dTDiam > 2 * dTDiamOriginalTool then
+               sWarn = 'Warning : lapjoint angled face skipped (no compatible tool)'
+               EgtOutLog( sWarn)
+               return true, sWarn
+            end
+         end
          -- Calcolo uso faccia
          local nFaceUse = BL.GetNearestParalOpposite( tDimAndRef[1][3]:getVersZ())
          -- inserisco la lavorazione di fresatura
@@ -7477,7 +7486,7 @@ function ProcessLapJoint.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
    end
    -- se lunghezza richiede spezzatura
    if ( Proc.Box:getDimX() > BD.LONGCUT_MAXLEN) or
-      ( Proc.Box:getDimX() > 0.7 * b3Solid:getDimX() and Proc.Box:getDimX() > BD.LONGCUT_ENDLEN) or
+      ( Proc.Box:getDimX() > 0.7 * b3Solid:getDimX() and ( b3Solid:getDimX() > ( BD.LEN_VERY_SHORT_PART or BD.LEN_SHORT_PART))) or
       ( ( nForceUseBladeOnNotContinueFace and nForceUseBladeOnNotContinueFace > 0) and ( Proc.Box:getDimX() > ( BD.LEN_SHORT_PART or 1000))) then
       -- una faccia
       if Proc.Fct == 1 then

LuaLibs/ProcessStepJointNotch.lua

@@ -13,6 +13,7 @@ local Fbs = require( 'FacesBySaw')
 local DC = require( 'DiceCut')
 local Cut = require( 'ProcessCut')
 local Topology = require( 'FeatureTopology')
+local LapJoint = require( 'ProcessLapJoint')
 
 EgtOutLog( ' ProcessStepJointNotch started', 1)
 
@@ -49,7 +50,7 @@ function ProcessStepJointNotch.Classify( Proc)
    -- numero delle facce
    local nFacetCnt = EgtSurfTmFacetCount( Proc.Id)
    -- gestisco solo 2 o 4 facce
-   if nFacetCnt ~= 2 and nFacetCnt ~= 4 and nFacetCnt ~= 6 and nFacetCnt ~= 8 then
+   if nFacetCnt ~= 2 and nFacetCnt ~= 3 and nFacetCnt ~= 4 and nFacetCnt ~= 6 and nFacetCnt ~= 8 then
       return false, false
    end
    -- verifico le normali delle facce
@@ -583,6 +584,9 @@ end
 ---------------------------------------------------------------------
 -- Applicazione della lavorazione
 function ProcessStepJointNotch.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
+   if Proc.Fct == 3 then
+      return LapJoint.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
+   end
    -- esecuzione eventuale smusso
    -- ottengo anche il flag che indica che la feature è larga come la trave
    local bOkc, sErrC, nDiffWidth = MakeChamfer( Proc, nPhase, nRawId, nPartId, dOvmHead)