In Process e BatchProcess forzato flag bCalcBestPieceUnloadPosition a true per calcolo prerotazioni in attesa della gestione completa da parte di Aedifica

BatchProcessNew.lua

@@ -201,13 +201,16 @@ elseif BEAM.FLAG == 8 then
 elseif BEAM.FLAG == 9 then
    sFlag = 'GET_TOPOLOGY'
 elseif BEAM.FLAG == 10 then
-   sFlag = 'QUICK_VERIFY'
+   sFlag = 'FLIP_ROT'
 else
    sFlag = 'FLAG='..tostring( BEAM.FLAG)
 end
 local sLog = 'BatchProcess : ' .. BEAM.FILE .. ', ' .. BEAM.MACHINE .. ', ' .. sFlag
 EgtOutLog( sLog)
 
+-- TODO forzatura calcolo con prerotazioni. Cancellare dopo che è stata aggiunta la gestione corretta
+local bCalcBestPieceUnloadPosition = true or BEAM.FLAG == 10
+
 -- Dati dei file
 -- TODO spostare a quando flag ~= 6 e 9
 local sDir, sTitle = EgtSplitPath( BEAM.FILE)
@@ -502,7 +505,7 @@ if bToProcess then
       end
       
       -- Sistemo le travi nel grezzo
-      local bPbOk, sPbErr = BeamExec.ProcessBeams( dRawW, dRawH, dRawL, dOvmHead, nil, PARTS, BEAM.FLAG ~= 6, BEAM.FLAG == 10)
+      local bPbOk, sPbErr = BeamExec.ProcessBeams( dRawW, dRawH, dRawL, dOvmHead, nil, PARTS, BEAM.FLAG ~= 6, bCalcBestPieceUnloadPosition)
       if not bPbOk then
          BEAM.ERR = 18
          BEAM.MSG = sPbErr
@@ -573,7 +576,7 @@ if bToProcess then
          PARTS[i].dHeight = PARTS[i].b3Part:getDimZ()
          PARTS[i].bSquareSection = abs( PARTS[i].dWidth - PARTS[i].dHeight) < 100 * GEO.EPS_SMALL
          PARTS[i].nIndexInParts = i
-         PARTS[i].CombinationList = BeamExec.GetAvailableCombinations( PARTS[i], BEAM.FLAG == 10)
+         PARTS[i].CombinationList = BeamExec.GetAvailableCombinations( PARTS[i], bCalcBestPieceUnloadPosition)
          PARTS[i].SplittingPoints = BeamLib.GetPartSplittingPoints( PARTS[i])
          PARTS[i].NotClampableLength = { STD = { dHead = 0, dTail = 0}, SIDE = { dHead = 0, dTail = 0}, DOWN = { dHead = 0, dTail = 0}}
 
@@ -621,8 +624,8 @@ if bToProcess then
 
    -- Lavoro le features
    if not GetDataConfig() then return end
-   BeamExec.GetProcessings( PARTS, BEAM.FLAG == 10)
-   BeamExec.GetCombinationMatrix( PARTS, BEAM.FLAG == 10)
+   BeamExec.GetProcessings( PARTS, bCalcBestPieceUnloadPosition)
+   BeamExec.GetCombinationMatrix( PARTS, bCalcBestPieceUnloadPosition)
    BeamExec.ProcessMachinings( PARTS)
    local sOutput = ''