- In STR0015:

- Corretta creazione faccia per sgrossare con lama
      - Corretto riconoscimento EdgeCorner da lavorare
      - Altre modifiche minori
- In FeatureLib aggiunto un nuovo indice completamento
- In BCS STR0009 è stata sostituita dalla STR0015
- In BCS lettura parametri Q per feature tipo intestatura, feature che lavoreranno con STR0015
This commit is contained in:
andrea.villa
2025-09-26 15:18:49 +02:00
parent 5f663d3362
commit 45bfcdbcfc
3 changed files with 166 additions and 100 deletions
+26 -9
View File
@@ -367,13 +367,15 @@ local function GetStrategies_Essetre( Proc)
---------------------------------------------------------------------
-- Feature : Front Profile (0-100)
elseif ID.IsFrontProfile( Proc) then
Strategies = { { sStrategyId = 'STR0015'}}
---------------------------------------------------------------------
-- Feature : Head Concave Profile (0-101)
elseif ID.IsHeadConcaveProfile( Proc) then
Strategies = { { sStrategyId = 'STR0015'}}
---------------------------------------------------------------------
-- Feature : Head Convex Profile (0-102)
elseif ID.IsHeadConvexProfile( Proc) then
Strategies = { { sStrategyId = 'STR0009'}}
Strategies = { { sStrategyId = 'STR0015'}}
---------------------------------------------------------------------
-- Feature : Head Cambered Profile (0-103)
elseif ID.IsHeadCamberedProfile( Proc) then
@@ -381,10 +383,11 @@ local function GetStrategies_Essetre( Proc)
---------------------------------------------------------------------
-- Feature : Round Arch (0-104)
elseif ID.IsRoundArch( Proc) then
Strategies = { { sStrategyId = 'STR0009'}}
Strategies = { { sStrategyId = 'STR0015'}}
---------------------------------------------------------------------
-- Feature : Head Profile (0-106)
elseif ID.IsHeadProfile( Proc) then
Strategies = { { sStrategyId = 'STR0015'}}
---------------------------------------------------------------------
-- Feature : Sphere (0-107)
elseif ID.IsSphere( Proc) then
@@ -479,6 +482,15 @@ local function GetParameters_Essetre( Proc, sStrategyIdToGet)
local sDrillingMode = EgtIf( bDrillFromOneSide, 'PREFER_ONE', 'AUTO')
table.insert( Parameters, { sName = 'sDrillingMode', sValue = sDrillingMode, sType = 's'})
--###---###---###---###---###---###---###---###---###---###---###---###---###--
-- Feature : Front Profile (0-100)
elseif ID.IsFrontProfile( Proc) then
local dDepthChamfer = EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q01', 'd') or 0
local dOverMaterial = EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q02', 'd') or 0
local bOnlyChamfer = ( EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q03', 'd') or 0) == 1
table.insert( Parameters, { sName = 'dDepthChamfer' , sValue = dDepthChamfer, sType = 'd'})
table.insert( Parameters, { sName = 'bOnlyChamfer' , sValue = bOnlyChamfer, sType = 'b'})
table.insert( Parameters, { sName = 'dOverMaterial' , sValue = dOverMaterial, sType = 'd'})
--###---###---###---###---###---###---###---###---###---###---###---###---###--
-- Feature : Head Concave Profile (0-101)
elseif ID.IsHeadConcaveProfile( Proc) then
local dDepthChamfer = EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q01', 'd') or 0
@@ -502,12 +514,7 @@ local function GetParameters_Essetre( Proc, sStrategyIdToGet)
local sUpperFaceStrategy = EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q01', 's') or '' -- Q01 = forza fresa
sUpperFaceStrategy = EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q02', 's') or sUpperFaceStrategy or 'AUTO' -- Q02 = forza lama (se entrambi attivi comanda la lama)
table.insert( Parameters, { sName = 'sUpperFaceStrategy' , sValue = sUpperFaceStrategy, sType = 's'})
local dDepthChamfer = EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q03', 'd') or 0
--TODO RIMUOVERE!!!!
dDepthChamfer = 3
local dOverMaterial = EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q04', 'd') or 0
local bOnlyChamfer = ( EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q05', 'd') or 0) == 1
table.insert( Parameters, { sName = 'dDepthChamfer' , sValue = dDepthChamfer, sType = 'd'})
@@ -518,10 +525,19 @@ local function GetParameters_Essetre( Proc, sStrategyIdToGet)
elseif ID.IsRoundArch( Proc) then
local dDepthChamfer = EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q03', 'd') or 0
local dOverMaterial = EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q01', 'd') or 0
local dStripWidth = ( EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q02', 'd') or 0) == 1
local dStripWidth = ( EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q02', 'd') or 0)
table.insert( Parameters, { sName = 'dDepthChamfer' , sValue = dDepthChamfer, sType = 'd'})
table.insert( Parameters, { sName = 'dStripWidth' , sValue = dStripWidth, sType = 'b'})
table.insert( Parameters, { sName = 'dOverMaterial' , sValue = dOverMaterial, sType = 'd'})
--###---###---###---###---###---###---###---###---###---###---###---###---###--
-- Feature : Head Profile (0-106)
elseif ID.IsHeadProfile( Proc) then
local dDepthChamfer = EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q01', 'd') or 0
local dOverMaterial = EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q02', 'd') or 0
local bOnlyChamfer = ( EgtGetInfo( Proc.id or GDB_ID.NULL, 'Q03', 'd') or 0) == 1
table.insert( Parameters, { sName = 'dDepthChamfer' , sValue = dDepthChamfer, sType = 'd'})
table.insert( Parameters, { sName = 'bOnlyChamfer' , sValue = bOnlyChamfer, sType = 'b'})
table.insert( Parameters, { sName = 'dOverMaterial' , sValue = dOverMaterial, sType = 'd'})
end
-------------------------------------------------------------------------------
@@ -614,7 +630,8 @@ local function GetTools_Essetre( Proc, sMachiningCategory)
end
elseif ID.IsDovetailMortise( Proc) then
TagList = { 'DtMortise'}
elseif ID.IsHeadConcaveProfile( Proc) or ID.IsHeadConvexProfile( Proc) or ID.IsHeadCamberedProfile( Proc) or ID.IsRoundArch( Proc) or ID.IsHeadProfile( Proc) then
elseif ID.IsFrontProfile( Proc) or ID.IsHeadConcaveProfile( Proc) or ID.IsHeadConvexProfile( Proc) or
ID.IsHeadCamberedProfile( Proc) or ID.IsRoundArch( Proc) or ID.IsHeadProfile( Proc) then
if sMachiningCategory == 'MillingFinish' then
TagList = { 'Prof_end'}
end