DataBeam :

- sistemata gestione smussi in ScarfJoint, SimpleScarf e StepJoint
- cominciata sistemazione messaggi (si toglie numero processo per TS3).
This commit is contained in:
Dario Sassi
2020-06-04 09:30:46 +00:00
parent 1baecd24e5
commit 8604483177
5 changed files with 235 additions and 52 deletions
+13 -13
View File
@@ -1,4 +1,4 @@
-- ProcessStepJointNotch.lua by Egaltech s.r.l. 2020/04/25
-- ProcessStepJointNotch.lua by Egaltech s.r.l. 2020/06/04
-- Gestione calcolo tacca a gradino per Travi
-- Tabella per definizione modulo
@@ -54,7 +54,7 @@ local function MachineByBlade( Proc, nPhase, nRawId, nPartId, dOvmHead, b3Solid,
-- recupero la lavorazione
local sCutting = ML.FindCutting( 'HeadSide')
if not sCutting then
local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' cutting not found in library'
local sErr = 'Error : cutting not found in library'
EgtOutLog( sErr)
return false, sErr
end
@@ -75,7 +75,7 @@ local function MachineByBlade( Proc, nPhase, nRawId, nPartId, dOvmHead, b3Solid,
-- recupero gruppo per geometria addizionale
local nAddGrpId = BL.GetAddGroup( nPartId)
if not nAddGrpId then
local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' missing AddGroup'
local sErr = 'Error : missing AddGroup'
EgtOutLog( sErr)
return false, sErr
end
@@ -143,7 +143,7 @@ local function MakePocket( Proc, nPartId, ptPs, vtN, nFaceRef, nDiffWidth, sMchF
end
local sPocketing = ML.FindPocketing( sMchFind, dDiamTool, dElev + dCollSic)
if not sPocketing then
local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' pocketing not found in library'
local sErr = 'Error : pocketing not found in library'
EgtOutLog( sErr)
return false, sErr
end
@@ -248,7 +248,7 @@ local function MachineByMill( Proc, nPhase, nRawId, nPartId, b3Solid, ptC, vtN,
end
if not sMilling then
local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' milling not found in library'
local sErr = 'Error : milling not found in library'
EgtOutLog( sErr)
return false, sErr
end
@@ -301,7 +301,7 @@ local function MakeTwoFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, nDiffWidth
local Ls = EgtGetFirstNameInGroup( nPartId, 'Box')
local b3Solid = EgtGetBBoxGlob( Ls or GDB_ID.NULL, GDB_BB.STANDARD)
if not b3Solid then
local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' part box not found'
local sErr = 'Error : part box not found'
EgtOutLog( sErr)
return false, sErr
end
@@ -341,7 +341,7 @@ local function MakeTwoFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, nDiffWidth
return bOk, sErr
end
else
local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' internal angle less than square angle'
local sErr = 'Error : internal angle less than square angle'
EgtOutLog( sErr)
return false, sErr
end
@@ -365,7 +365,7 @@ local function MakeFourFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, nDiffWidt
-- recupero gruppo per geometria addizionale
local nAddGrpId = BL.GetAddGroup( nPartId)
if not nAddGrpId then
local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' missing AddGroup'
local sErr = 'Error : missing AddGroup'
EgtOutLog( sErr)
return false, sErr
end
@@ -392,7 +392,7 @@ local function MakeChamfer( Proc, nPhase, nRawId, nPartId, dOvmHead)
local AuxId = EgtGetInfo( Proc.Id, 'AUXID', 'i') or 0
if AuxId then AuxId = AuxId + Proc.Id end
if not AuxId or ( EgtGetType( AuxId) & GDB_FY.GEO_CURVE) == 0 then
local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' missing profile geometry'
local sErr = 'Error : missing profile geometry'
EgtOutLog( sErr)
return false, sErr
end
@@ -437,13 +437,13 @@ local function MakeChamfer( Proc, nPhase, nRawId, nPartId, dOvmHead)
-- disabilito smusso se feature non sborda dalla trave almeno da un lato
if nTypePos == 1 then
local sWarn = 'Warning on process ' .. tostring( Proc.Id) .. ' skipped chamfer (feature smaller than beam)'
local sWarn = 'Warning : skipped chamfer (feature smaller than beam)'
EgtOutLog( sWarn)
return true, sWarn , nTypePos
end
-- salto lo smusso se sborda dal lato in Z- o una direzione diversa da Y e Z
if nTypePos >= 5 then
local sWarn = 'Warning on process ' .. tostring( Proc.Id) .. ' skipped chamfer (wrong side to apply)'
local sWarn = 'Warning : skipped chamfer (wrong side to apply)'
EgtOutLog( sWarn)
return true, sWarn, nTypePos
end
@@ -497,7 +497,7 @@ local function MakeChamfer( Proc, nPhase, nRawId, nPartId, dOvmHead)
-- recupero la lavorazione
local sMilling = ML.FindMilling( 'Mark')
if not sMilling then
local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' milling not found in library'
local sErr = 'Error : milling not found in library'
EgtOutLog( sErr)
return false, sErr
end
@@ -583,7 +583,7 @@ function ProcessStepJointNotch.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
if not bOk then return bOk, sErr end
-- altrimenti errore
else
local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' face number not allowed'
local sErr = 'Error : face number not allowed'
EgtOutLog( sErr)
return false, sErr
end