DataWall :
- modifiche per nailing.
This commit is contained in:
@@ -1763,8 +1763,10 @@ local function MakeByNail( Proc, nRawId, b3Raw)
|
||||
local vtExtr = EgtCurveExtrusion( AuxId, GDB_RT.GLOB)
|
||||
local b3Aux = EgtGetBBoxGlob( AuxId, GDB_BB.STANDARD)
|
||||
local bToolInv = ( vtExtr:getZ() < -0.1)
|
||||
local nCntData = EgtGetInfo( Proc.Id, 'CNT_DATA', 'i') or 0
|
||||
local dCntPar = EgtGetInfo( Proc.Id, 'CNT_PAR', 'd') or 100
|
||||
-- recupero la lavorazione
|
||||
local sNailing = WM.FindNailing( 11)
|
||||
local sNailing = WM.FindNailing( nCntData)
|
||||
if not sNailing then
|
||||
local sErr = 'Error : nailing not found in library'
|
||||
EgtOutLog( sErr)
|
||||
@@ -1791,6 +1793,8 @@ local function MakeByNail( Proc, nRawId, b3Raw)
|
||||
EgtSetMachiningParam( MCH_MP.DEPTH, 10)
|
||||
-- assegno lato di lavoro
|
||||
EgtSetMachiningParam( MCH_MP.WORKSIDE, MCH_MILL_WS.CENTER)
|
||||
-- assegno parametro a note utente
|
||||
EgtSetMachiningParam( MCH_MP.USERNOTES, 'Par='..dCntPar..';')
|
||||
-- eseguo
|
||||
if not EgtApplyMachining( true, false) then
|
||||
local _, sErr = EgtGetLastMachMgrError()
|
||||
|
||||
Reference in New Issue
Block a user