DataWall :

- correzioni varie
- aggiunta gestione origini diverse da BtlInfo/REFPOS su tavola.

BatchProcess.lua

@@ -1,4 +1,4 @@
--- BatchProcess.lua by Egaltech s.r.l. 2021/07/08
+-- BatchProcess.lua by Egaltech s.r.l. 2021/07/28
 -- Gestione calcolo batch disposizione e lavorazioni per Pareti
 -- 2020/07/24 Nuvola di punti riferita allo Zero Tavola.
 -- 2020/10/28 Corretto spostamento pezzi per rotazioni (0 o 180) e inversioni( 0, 90, 180, o 270).
@@ -7,6 +7,7 @@
 -- 2021/03/06 La creazione del file ori si fa solo alla fine se non ci sono stati errori o se edit.
 -- 2021/03/08 Aggiunta gestione lavorazione su macchine per travi.
 -- 2021/04/09 Corretto spostamento pezzi per rotazioni e inversioni.
+-- 2021/07/28 Aggiunta scelta direzione di vista per modifica e simulazione.
 
 -- Intestazioni
 require( 'EgtBase')
@@ -199,7 +200,7 @@ if bToProcess then
    UpdateAuxData( sBtmFile)
 
    -- Recupero informazione se progetto o produzione
-   local bProj = ( EgtGetInfo( EgtGetFirstNameInGroup( GDB_ID.ROOT, 'BtlInfo'), 'PROJECT', 'i') == 1)
+   local bProj = ( EgtGetInfo( EgtGetFirstNameInGroup( GDB_ID.ROOT, 'BtlInfo') or GDB_ID.NULL, 'PROJECT', 'i') == 1)
 
    -- Dimensioni del pannello
    local dRawL = ( EgtGetInfo( EgtGetFirstNameInGroup( GDB_ID.ROOT, 'BtlInfo') or GDB_ID.NULL, 'PANELLEN', 'd') or 100)
@@ -611,9 +612,11 @@ if WALL.FLAG == 5 then
    EgtSetColor( nClCrvId, 'RED')
 end
 
--- Se modifica o simula, imposto la vista ISO 3d
+-- Se modifica o simula, imposto la vista ISO 3d opportuna
 if WALL.FLAG == 1 or WALL.FLAG == 2 then
-   EgtSetView( SCE_VD.ISO_SW, false)
+   local vView = { SCE_VD.ISO_NW, SCE_VD.ISO_SW, SCE_VD.ISO_NE, SCE_VD.ISO_SE}
+   local nV = min( max( WD.SIMUL_VIEW_DIR or 2, 1), 4)
+   EgtSetView( vView[nV], false)
 -- se cloud, imposto la vista TOP
 elseif WALL.FLAG == 5 then
    EgtSetView( SCE_VD.TOP, false)