EgtExecutor :

- aggiunta Exe e Lua SpecialUpdateDisposition.

EXE_MachMgr.cpp

@@ -1940,6 +1940,16 @@ ExeSpecialApplyDisposition( int nId, bool bRecalc)
    return pMachMgr->DispositionSpecialApply( nId, bRecalc) ;
 }
 
+//-----------------------------------------------------------------------------
+bool
+ExeSpecialUpdateDisposition( int nId)
+{
+   IMachMgr* pMachMgr = GetCurrMachMgr() ;
+   VERIFY_MACHMGR( pMachMgr, false)
+  // aggiorno assi macchina e collegamento con precedente della disposizione indicata
+   return pMachMgr->DispositionSpecialUpdate( nId) ;
+}
+
 //-----------------------------------------------------------------------------
 //   Lavorazioni
 //-----------------------------------------------------------------------------

LUA_MachMgr.cpp

@@ -2153,6 +2153,21 @@ LuaSpecialApplyDisposition( lua_State* L)
    return 1 ;
 }
 
+//-------------------------------------------------------------------------------
+static int
+LuaSpecialUpdateDisposition( lua_State* L)
+{
+  // 1 parametro : nId
+   int nId ;
+   LuaCheckParam( L, 1, nId)
+   LuaClearStack( L) ;
+  // aggiorno assi macchina e collegamento con precedente della disposizione indicata
+   bool bOk = ExeSpecialUpdateDisposition( nId) ;
+  // restituisco il risultato
+   LuaSetParam( L, bOk) ;
+   return 1 ;
+}
+
 //-------------------------------------------------------------------------------
 //    Machinings
 //-------------------------------------------------------------------------------
@@ -3366,6 +3381,7 @@ LuaInstallMachMgr( LuaMgr& luaMgr)
    // Dispositions 
    bOk = bOk && luaMgr.RegisterFunction( "EgtGetPhaseDisposition", LuaGetPhaseDisposition) ; 
    bOk = bOk && luaMgr.RegisterFunction( "EgtSpecialApplyDisposition", LuaSpecialApplyDisposition) ; 
+   bOk = bOk && luaMgr.RegisterFunction( "EgtSpecialUpdateDisposition", LuaSpecialUpdateDisposition) ; 
    // Machinings
    bOk = bOk && luaMgr.RegisterFunction( "EgtAddMachining", LuaAddMachining) ;
    bOk = bOk && luaMgr.RegisterFunction( "EgtCreateMachining", LuaCreateMachining) ;