DataWall :

- in lavorazione Outline, FreeContour e Aperture aggiunta gestione lavorazione con fresa parti non tagliate con lama.
2020-06-29 14:10:42 +00:00
parent f800eab2ab
commit 96e3d29fb9
2 changed files with 159 additions and 55 deletions
@@ -377,19 +377,24 @@ else
   while nPartId do
      local nCutId = EgtGetInfo( nPartId, 'CUTID')
      if nCutId then
-         local nProcId = EgtGetFirstInGroup( EgtGetFirstNameInGroup( nPartId, 'Processings') or GDB_ID.NULL)
-         while nProcId do
-            local bIsFea = EgtExistsInfo( nProcId, 'GRP') and EgtExistsInfo( nProcId, 'PRC')
-            local nTaskId = EgtGetInfo( nProcId, 'TASKID')
-            if bIsFea and nTaskId then
-               WALL.ERR = 0
-               WALL.MSG = '---'
-               WALL.ROT = 0
-               WALL.CUTID = nCutId
-               WALL.TASKID = nTaskId
-               WriteErrToLogFile( WALL.ERR, WALL.MSG, WALL.ROT, WALL.CUTID, WALL.TASKID)
+         local LayerId = {}
+         LayerId[1] = EgtGetFirstNameInGroup( nPartId, 'Outline')
+         LayerId[2] = EgtGetFirstNameInGroup( nPartId, 'Processings')
+         for nInd = 1, #LayerId do
+            local nProcId = EgtGetFirstInGroup( LayerId[nInd] or GDB_ID.NULL)
+            while nProcId do
+               local bIsFea = EgtExistsInfo( nProcId, 'GRP') and EgtExistsInfo( nProcId, 'PRC')
+               local nTaskId = EgtGetInfo( nProcId, 'TASKID')
+               if bIsFea and nTaskId then
+                  WALL.ERR = 0
+                  WALL.MSG = '---'
+                  WALL.ROT = 0
+                  WALL.CUTID = nCutId
+                  WALL.TASKID = nTaskId
+                  WriteErrToLogFile( WALL.ERR, WALL.MSG, WALL.ROT, WALL.CUTID, WALL.TASKID)
+               end
+               nProcId = EgtGetNext( nProcId)
            end
-            nProcId = EgtGetNext( nProcId)
         end
      end
      nPartId = EgtGetNextPart( nPartId)