DataWall :

- in LapJoint correzione lav.ni SideMill quando più profonde che larghe.
This commit is contained in:
DarioS
2021-11-29 17:25:02 +01:00
parent 49b66e38c2
commit f7bba936ca
+7 -6
View File
@@ -1,9 +1,10 @@
-- WProcessLapJoint.lua by Egaltech s.r.l. 2021/11/10
-- WProcessLapJoint.lua by Egaltech s.r.l. 2021/11/29
-- Gestione calcolo mezzo-legno per Pareti
-- 2021/08/27 DS Se tre o più facce con flag PCKT=1 forzo svuotatura con fresa (per Variant).
-- 2021/08/29 DS Se svuotatura di fianco setto flag per farla dopo i tagli.
-- 2021/09/03 DS Se due facce con sottosquadra ora si restituisce mesaaggio di errore.
-- 2021/10/05 FM Gestione lavorazioni SideMill con creazione gola passaggio gambo utensile
-- 2021/11/29 DS Correzione lav.ni SideMill quando più profonde che larghe.
-- Tabella per definizione modulo
local WPL = {}
@@ -1347,7 +1348,7 @@ local function MakeByMill( Proc, nFacet, nOthFac, nRawId, b3Raw, dSideDist)
-- eseguo
if not EgtApplyMachining( true, false) then
local _, sErr = EgtGetLastMachMgrError()
EgtRemoveOperation( nMchFId)
EgtSetOperationMode( nMchFId, false)
return false, sErr
end
return true
@@ -1614,7 +1615,7 @@ local function MakeSideGrooveByMill( Proc, nFacet, nRawId, b3Raw, sCustomMach, d
-- eseguo
if not EgtApplyMachining( true, false) then
local _, sErr = EgtGetLastMachMgrError()
EgtRemoveOperation( nMchFId)
EgtSetOperationMode( nMchFId, false)
return false, sErr
end
end
@@ -1721,7 +1722,7 @@ local function MakeSideGrooveByMill( Proc, nFacet, nRawId, b3Raw, sCustomMach, d
-- eseguo
if not EgtApplyMachining( true, false) then
local _, sErr = EgtGetLastMachMgrError()
EgtRemoveOperation( nMchFId)
EgtSetOperationMode( nMchFId, false)
return false, sErr
end
-- verifico se devo lavorare anche la seconda faccia basandomi sul valore dell'angolo interno
@@ -1828,7 +1829,7 @@ local function MakeSideGrooveByMill( Proc, nFacet, nRawId, b3Raw, sCustomMach, d
-- eseguo
if not EgtApplyMachining( true, false) then
local _, sErr = EgtGetLastMachMgrError()
EgtRemoveOperation( nMchFId)
EgtSetOperationMode( nMchFId, false)
return false, sErr
end
end
@@ -2104,7 +2105,7 @@ local function MakeTwoFaces( Proc, nRawId, b3Raw)
-- faccia orizzontale
local nFacet = EgtIf( vtN:getZ() >= WD.NZ_MINA, nFacInd, nFacInd2)
-- faccia verticale
local nFacetVert = EgtIf( nFacet == nFacInd, nFacInd2, nFacet)
local nFacetVert = EgtIf( nFacet == nFacInd, nFacInd2, nFacInd)
local vtNV = EgtSurfTmFacetNormVersor( Proc.Id, nFacetVert, GDB_ID.ROOT)
-- per evitare errori in casi di pezzi molto stretti, verifico le distanze in base alla direzione della faccia
-- local dSideDist = min( abs( ptMid:getX() - b3Raw:getMin():getX()), abs( ptMid:getX() - b3Raw:getMax():getX()),