update x test recupero program name MAIN

CncLib/CNC/CNC.FANUC/CNC.FANUC.vb

@@ -1524,6 +1524,33 @@ Namespace CNC
 
     End Function
 
+    Public Function getPrgNameMain() As Char()
+      ' RIFERIMENTO: 
+      '...
+
+      Dim nPathIdx As Integer
+      Dim nReturn As Integer
+
+      Dim prgName As Char()
+      prgName = ""
+
+      'leggo il numero del processo attivo
+      nPathIdx = GetActivePath()
+
+      If Is30Series Then
+
+        ' leggo tutto!!!
+        nReturn = Focas1.cnc_pdf_rdmain(nLibHandle(nPathIdx), prgName)
+
+        If F_CheckRetError_Cnc(nReturn, "cnc_pdf_rdmain CNC.FANUC.CncLib") Then
+          Throw New NcException("ERR cnc_pdf_rdmain CNC.FANUC.CncLib")
+        End If
+      End If
+
+      Return prgName
+
+    End Function
+
     Public Function getPrgName() As Focas1.ODBEXEPRG
       ' RIFERIMENTO: 
       '...
@@ -1543,6 +1570,7 @@ Namespace CNC
         ' leggo tutto!!!
         nReturn = Focas1.cnc_exeprgname(nLibHandle(nPathIdx), prgName)
 
+
         If F_CheckRetError_Cnc(nReturn, "cnc_exeprgname CNC.FANUC.CncLib") Then
           Throw New NcException("ERR cnc_exeprgname CNC.FANUC.CncLib")
         End If

IOB-WIN/IobFanuc.cs

@@ -290,6 +290,20 @@ namespace IOB_WIN
       {
         lg.Error(exc, "Errore in getPrgName");
       }
+      // se in test butto fuori nUOVA versione prgName...
+      if(utils.CRB("enableTest"))
+      {
+        // recupero NUOVO prgName...
+        try
+        {
+          string nomeMain = utils.purgedChar2String(FANUC_ref.getPrgNameMain());
+          lg.Info("PROG_MAIN: {0}", nomeMain);
+        }
+        catch(Exception exc)
+        {
+          lg.Error(exc, "Eccezione in recupero PRG NAME MAIN");
+        }
+      }
       return prgName;
     }
 

IOB-WIN/Readme/ToDo.txt

@@ -19,4 +19,18 @@ OK  - gestione dei segnali ballerini (BITMASK!)
      - F001.0: ALARM_PRESENT
      - F001.7: CN_READY / POWER_ON
      - STL000.5: AUTO (vers 1)
-     - STL000.7: AUTO (vers 2)
+     - STL000.7: AUTO (vers 2)
+
+
+FINIRE SISTEMAZIONE JETCO:
+ - install servers
+ - install DB
+ - conf acquisitore togliendo parti abbozzate x contapezzi/fineciclo
+ - part program name
+
+CREARE NUOVO SW (o configurazione? o ramo alternativo a develop?) x mapping INIZIALE della macchina... ad esempio
+ - si colelga a ns server
+ - chiede cosa deve fare (es mappa memorie D da 0 a 9999)
+ - effettua testing e poi fa upload risultati
+ - il ns sw fa i check/controlli modifica
+in questo modo ad esmepio possiamo cercare i contapezzi, i segnali ceh cambiano con il fineciclo nelle aree Y, i contatori STANDARD nelle memorie D, ...

IOB-WIN/utils.cs

@@ -106,7 +106,7 @@ namespace IOB_WIN
       }
     }
     /// <summary>
-    /// COnverte un array di caratteri in una stringa valida (ovvero SOLO numeri/lettere)
+    /// Converte un array di caratteri in una stringa valida (ovvero SOLO numeri/lettere)
     /// </summary>
     /// <param name="input"></param>
     /// <returns></returns>