-- ProcessChamfer.lua by Egaltech s.r.l. 2018/04/12
-- Gestione calcolo profilo libero per Travi

-- Tabella per definizione modulo
local ProcessChamfer = {}

-- Include
require( 'EgtBase')
local BL = require( 'BeamLib')

EgtOutLog( ' ProcessChamfer started', 1)

-- Dati
local BD = require( 'BeamData')
local Millings = require( 'MillingData')

---------------------------------------------------------------------
local function FindMilling( sType)
   for i = 1, #Millings do
      local Milling = Millings[i]
      if Milling.Type == sType then
         return i, Milling.Name
      end   
   end
   return 0
end

---------------------------------------------------------------------
-- Riconoscimento della feature
function ProcessChamfer.Identify( Proc)
   return ( ( Proc.Grp == 3 or Proc.Grp == 4)  and  Proc.Prc == 36)
end

---------------------------------------------------------------------
-- Applicazione della lavorazione
function ProcessChamfer.Make( Proc, nPhase, nRawId, nPartId)
   -- recupero la lavorazione
   local nMill, sMilling = FindMilling( 'Chamfer')
   if not sMilling then
      local sErr = 'Error on process ' .. tostring( Proc.Id) .. ' milling not found in library'
      EgtOutLog( sErr)
      return false, sErr
   end
   -- inserisco la lavorazione
   local sName = 'Chm_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
   local nMchId = EgtAddMachining( sName, sMilling)
   if not nMchId then
      local sErr = 'Error adding machining ' .. sName .. '-' .. sMilling
      EgtOutLog( sErr)
      return false, sErr
   end
   -- aggiungo geometria
   EgtSetMachiningGeometry( {{ Proc.Id, 0}})
   -- eseguo
   if not EgtApplyMachining( true, false) then
      local _, sErr = EgtGetLastMachMgrError()
      EgtSetOperationMode( nMchId, false)
      return false, sErr
   end
   return true
end   

---------------------------------------------------------------------
return ProcessChamfer