DataWall :

- in FreeContour corretta gestione lama con utile insufficiente per affondamento richiesto.
This commit is contained in:
DarioS
2021-08-06 10:19:51 +02:00
parent 010b7bb54d
commit aaaddb9262
+6 -2
View File
@@ -1,4 +1,4 @@
-- ProcessFreeContour.lua by Egaltech s.r.l. 2021/01/08
-- ProcessFreeContour.lua by Egaltech s.r.l. 2021/08/06
-- Gestione calcolo profilo libero per Pareti
-- Tabella per definizione modulo
@@ -1620,6 +1620,7 @@ end
---------------------------------------------------------------------
local function MakeByCut( Proc, nRawId, b3Raw)
local sWarn = ''
-- ingombro del pezzo
local Ls = EgtGetFirstNameInGroup( Proc.PartId, 'Box')
local b3Solid = EgtGetBBoxGlob( Ls or GDB_ID.NULL, GDB_BB.STANDARD)
@@ -1652,6 +1653,9 @@ local function MakeByCut( Proc, nRawId, b3Raw)
local sCutting, dSawDiam, dSawThick, dSawMaxDepth = WM.FindCutting( 'Standard', dWidth)
if not sCutting then
sCutting, dSawDiam, dSawThick, dSawMaxDepth = WM.FindCutting( 'Standard')
sWarn = 'Warning : elevation bigger than max sawcut depth'
end
if not sCutting then
local sErr = 'Error : cutting not found in library'
EgtOutLog( sErr)
return false, sErr
@@ -1731,7 +1735,7 @@ local function MakeByCut( Proc, nRawId, b3Raw)
end
end
end
return true
return true, sWarn
end
---------------------------------------------------------------------