diff --git a/Designing/WinProject.lua b/Designing/WinProject.lua
index 5d7b983..30dd059 100644
--- a/Designing/WinProject.lua
+++ b/Designing/WinProject.lua
@@ -245,6 +245,32 @@ local function WinCalculate_AddHardware()
 end
 _G.WinCalculate_AddHardware = WinCalculate_AddHardware
 
+----------------------------------------------------------------------------------
+local function WinCalculate_AddHardwareByGroupId()
+   -- ricavo l'id geometrico dell'area a partire dal numero
+   local vStack = { EgtGetFirstNameInGroup( GDB_ID.ROOT, WIN_AREA .. '*')}
+   local nAreaId
+   local i = 1
+   while vStack[i] do
+      local nAreaNbr = EgtGetInfo( vStack[i], WIN_AREA_NBR, 'i') or -1
+      if nAreaNbr == WDG.AREANBR then
+         nAreaId = vStack[i]
+         break
+      else
+         -- ricerco nelle sue sottoaree
+         local vChildren = EgtGetNameInGroup( vStack[i], WIN_AREA .. '*')
+         vStack = EgtJoinTables( vStack, vChildren)
+      end
+      i = i + 1
+   end
+   
+   -- se trovata calcolo la ferramenta
+   if nAreaId then
+      WDG.HARDWAREKIT_LIST, WDG.HARDWAREPOSITION_LIST, WDG.HARDWAREOPTION_LIST = WinCalculate.AddHardware( nAreaId, WDG.CALC_MACHINING, WDG.CALC_HARDWARELIST, WDG.CALC_POSITIONLIST, WDG.CALC_OPTIONLIST)
+   end
+end
+_G.WinCalculate_AddHardwareByGroupId = WinCalculate_AddHardwareByGroupId
+
 ----------------------------------------------------------------------------------
 local function WinCalculate_AddAccessories()
    WinCalculate.AddAccessories( WDG.FRAMEID, WDG.DRAW)