From d3bf4659236df53b0048ea328da1e8e4467c2b0a Mon Sep 17 00:00:00 2001 From: "andrea.villa" Date: Tue, 13 Jan 2026 09:11:38 +0100 Subject: [PATCH] STR0002 e STR0010 non vengono eseguite se ostacolano il pinzaggio --- Strategies/Standard/STR0002/STR0002.lua | 8 ++++++++ Strategies/Standard/STR0010/STR0010.lua | 8 ++++++++ 2 files changed, 16 insertions(+) diff --git a/Strategies/Standard/STR0002/STR0002.lua b/Strategies/Standard/STR0002/STR0002.lua index e1c1f8a..94c9153 100644 --- a/Strategies/Standard/STR0002/STR0002.lua +++ b/Strategies/Standard/STR0002/STR0002.lua @@ -494,12 +494,20 @@ function STR0002.Make( bAddMachining, Proc, Part, CustomParameters) Strategy.Result = {} Strategy.Result.dTimeToMachine = 0 + -- se la lavorazione ostacola il pinzaggio, non posso farla if not IsTopologyOk( Proc) then local sErr = 'Feature '.. Proc.idFeature .. ' : strategy ' .. StrategyLib.Config.sStrategyId .. ' not implemented' EgtOutLog( sErr) Strategy.Result = FeatureLib.GetStrategyResultNotApplicable( sErr) return false, Strategy.Result end + -- se la lavorazione ostacola il pinzaggio, non posso farla, serve una lavorazioen che lasci il testimone + if MachiningLib.IsFeatureHinderingClamping( Proc, Part) then + local sErr = 'Feature '.. Proc.idFeature .. ' : strategy ' .. StrategyLib.Config.sStrategyId .. ' not applicable ( Feature hinders clamping)' + EgtOutLog( sErr) + Strategy.Result = FeatureLib.GetStrategyResultNotApplicable( sErr) + return false, Strategy.Result + end local bAreAllMachiningsAdded = true local dFeatureVolume = Proc.dVolume diff --git a/Strategies/Standard/STR0010/STR0010.lua b/Strategies/Standard/STR0010/STR0010.lua index 48efe24..15ee988 100644 --- a/Strategies/Standard/STR0010/STR0010.lua +++ b/Strategies/Standard/STR0010/STR0010.lua @@ -187,6 +187,14 @@ function STR0010.Make( bAddMachining, Proc, Part, CustomParameters) end end + -- se la lavorazione ostacola il pinzaggio, non posso farla, serve una lavorazioen che lasci il testimone + if MachiningLib.IsFeatureHinderingClamping( Proc, Part) then + local sErr = 'Feature '.. Proc.idFeature .. ' : strategy ' .. StrategyLib.Config.sStrategyId .. ' not applicable ( Feature hinders clamping)' + EgtOutLog( sErr) + Strategy.Result = FeatureLib.GetStrategyResultNotApplicable( sErr) + return false, Strategy.Result + end + -- volume della feature local dFeatureVolume = Proc.dVolume