DataBeam :

- correzioni per tasche passanti
- varie piccole migliorie.
This commit is contained in:
Dario Sassi
2021-03-19 18:35:19 +00:00
parent 74915620c7
commit 681d9f0f71
4 changed files with 26 additions and 16 deletions
+5 -5
View File
@@ -115,7 +115,7 @@ function ProcessTenon.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
-- ingombro del pezzo
local b3Solid = EgtGetBBoxGlob( EgtGetFirstNameInGroup( nPartId, 'Box') 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
@@ -124,7 +124,7 @@ function ProcessTenon.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
local AuxId = EgtGetInfo( Proc.Id, 'AUXID', 'i')
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
@@ -134,7 +134,7 @@ function ProcessTenon.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
local bClosed = EgtCurveIsClosed( AuxId)
-- verifico che il tenone non sia orientato troppo verso il basso
if not VerifyOrientation( Proc, vtExtr, b3Raw) then
local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' Tenon from bottom impossible'
local sErr = 'Error : Tenon from bottom impossible'
EgtOutLog( sErr)
return false, sErr
end
@@ -164,7 +164,7 @@ function ProcessTenon.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
-- 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
@@ -234,7 +234,7 @@ function ProcessTenon.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
sMilling = ML.FindMilling( sMillType, dTenH) or ML.FindMilling( sMillType)
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