Patch level :4.0 800

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :errore con { e && su tutte le maschere!!!!
Corretto problema sulla conversione!


git-svn-id: svn://10.65.10.50/trunk@15676 c028cbd2-c16b-5b4b-a496-9718f37d4682

ba/ba1100.cpp

@@ -373,7 +373,6 @@ bool TManutenzione_app::create() // initvar e arrmask
     if (_superprassi)
     {
       _browse->add_button(DLG_CONVERT, BR("~Converti", 9), K_F7);
-//			_browse->add_button(DLG_INSFILE, BR("~Inserisci", 9), K_F6);
 			if (is_power_station())
         _browse->add_button(DLG_ADDFILE, BR("~Aggiungi", 9), K_F8);
       TButton_field& butt = ((TMask*)_browse)->add_button(DLG_OTHERFILE, 0, BR("A~ltri", 9), 0, -1, 9, 2, "", 0, 0);
@@ -1279,7 +1278,6 @@ void TManutenzione_app::load_des(const int maxfdir)
   if (standard) // carica eventuali nuove descrizioni ed il nuovo livello archivi
   {
      // Cerca in RECDESC i files f[nnn].dir
-     ifstream infile;
      TString ws;
      TFilename fn;
      TDir td,new_dir;
@@ -1291,11 +1289,10 @@ void TManutenzione_app::load_des(const int maxfdir)
      
      if (fexist(fn))
      {
+       ifstream infile(fn);
        long fl;
-       infile.open(fn);
        infile >> fl;
        if (fl > flags) flags = fl;
-       infile.close();
      }
      
      // scandisce *.dir in RECDESC
@@ -1310,8 +1307,13 @@ void TManutenzione_app::load_des(const int maxfdir)
      for (int n = 0; n < totfiles; n++)
      {
        fn = list.row(n);
-       infile.open(fn);
+       if (fn == "recdesc/f159.dir")
-       infile >> td;
+         int cazzo = n;
+       if (fn.exist())
+       {
+         ifstream infile(fn);
+         infile >> td;
+       }
        ln = td.num();
        const bool is_new = ln > last_newln; // memorizza l'ultimo record scritto come nuovo
        if (is_new) // aggiunge i files che mancano
@@ -1328,8 +1330,6 @@ void TManutenzione_app::load_des(const int maxfdir)
        td.put(ln,_nordir,_sysdirop);
        if (is_new)
          tr.put(ln);
-       infile.close();
-       //unlink(fn);
      } 
 
      d.eod() = (long)last_newln;

ba/ba1100a.uml

@@ -40,7 +40,7 @@ BEGIN
   PROMPT 2 5 "Record usati "
   HELP "Numero di record utilizzati"
   WARNING "Numero di record errato"
-  NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=#FLD_EOX)}
+  NUM_EXPR (#THIS_FIELD>=0)&&(#THIS_FIELD<=#FLD_EOX)
   FLAGS "DR"
   GROUP 1
 END
@@ -60,7 +60,7 @@ BEGIN
   PROMPT 30 6 "Dimensione  "
   HELP "Dimensione da assegnare al file"
   WARNING "Dimensione non corretta"
-  NUM_EXPR {#THIS_FIELD>=#FLD_EOD}
+  NUM_EXPR (#THIS_FIELD>=#FLD_EOD)
   FLAGS "DR"
 END
 

ba/ba1100d.uml

@@ -122,7 +122,7 @@ BEGIN
   PROMPT 2 5 "Decimali    "
   FLAGS "UR"
   HELP "Decimali del campo"
-  NUM_EXPR {(#FLD_TIPO!=4)||(#THIS_FIELD+2<=#FLD_LEN)}
+  NUM_EXPR ((#FLD_TIPO!=4)||(#THIS_FIELD+2<=#FLD_LEN))
   WARNING "Numero di decimali errato"
 END
 

ba/ba2100f.uml

@@ -60,7 +60,7 @@ END
 NUMBER F_X 3
 BEGIN
 PROMPT 24 3 "Colonna "
-NUM_EXPR {#F_X <= #F_NUMCOL}
+NUM_EXPR (#F_X<=#F_NUMCOL)
 WARNING "Il numero di colonna deve essere minore del numero di colonne totali"
 HELP "Colonna in cui stampare"
 END

ba/ba3300a.uml

@@ -284,7 +284,7 @@ BEGIN
   PROMPT 2 14 "Numero pagina iniziale "
   HELP "Numero della prima pagina da numerare"
   FLAGS "R"
-  NUM_EXPR {#THIS_FIELD >= 0}
+  NUM_EXPR (#THIS_FIELD>=0)
   WARNING "Numero pagina iniziale errato: non puo' essere negativo"
 END
 
@@ -293,7 +293,7 @@ BEGIN
   PROMPT 42 14 "Numero pagina finale "
   HELP "Numero dell'ultima pagina da numerare"
   FLAGS "R"
-  NUM_EXPR {#THIS_FIELD>=(#F_NPAGINI+2)}
+  NUM_EXPR (#THIS_FIELD>=(#F_NPAGINI+2))
   WARNING "Numero pagina finale errato: deve essere maggiore o uguale a quello iniziale + 2"
 END
 

ba/ba3600a.uml

@@ -103,7 +103,7 @@ NUMBER F_MESEDA 2
 BEGIN
   PROMPT 8 14 "dal :   mese   "
   HELP "Primo mese di cui stampare i movimenti"
-  NUM_EXPR {(#THIS_FIELD >= 1) && (#THIS_FIELD <= 12)}
+  NUM_EXPR ((#THIS_FIELD >= 1)&&(#THIS_FIELD <= 12))
 END
 
 NUMBER F_ANNODA 4
@@ -116,7 +116,7 @@ NUMBER F_MESEA 2
 BEGIN
   PROMPT 8 15 "al  :   mese   "
   HELP "Ultimo mese di cui stampare i movimenti"
-  NUM_EXPR {(#THIS_FIELD >= 1) && (#THIS_FIELD <= 12)}
+  NUM_EXPR ((#THIS_FIELD >= 1)&&(#THIS_FIELD <= 12))
 END
 
 NUMBER F_ANNOA 4
@@ -174,7 +174,7 @@ NUMBER F_STAMPA_MESE 2
 BEGIN
   PROMPT 4 11 "Stampa mese                           "
   HELP "Mese di cui effettuare la stampa"
-  NUM_EXPR {(#THIS_FIELD >= #F_STAMPA_MESEG) && (#THIS_FIELD <= 12)}   
+  NUM_EXPR ((#THIS_FIELD >= #F_STAMPA_MESEG)&&(#THIS_FIELD <= 12))   
   WARNING "Il mese da stampare deve essere maggiore o uguale all'ultimo mese di stampa indicato sulla tabella del libro unico selezionato"
   CHECKTYPE REQUIRED
 END

ba/ba3601a.uml

@@ -35,7 +35,7 @@ NUMBER F_MESEDA 2
 BEGIN
   PROMPT 3 4 "Dal mese      "
   HELP "Primo mese di cui stampare i movimenti"
-  NUM_EXPR {(#THIS_FIELD >= 1) && (#THIS_FIELD <= 12)}     
+  NUM_EXPR ((#THIS_FIELD >= 1)&&(#THIS_FIELD <= 12))     
   CHECKTYPE REQUIRED
   WARNING "Il valore deve essere compreso tra 1 e 12"
 END
@@ -44,7 +44,7 @@ NUMBER F_MESEA 2
 BEGIN
   PROMPT 28 4 "Al mese            "
   HELP "Ultimo mese di cui stampare i movimenti"
-  NUM_EXPR {(((#THIS_FIELD >= 1) && (#THIS_FIELD <= 12)) && (#THIS_FIELD >= #F_MESEDA))}
+  NUM_EXPR ((((#THIS_FIELD >= 1)&&(#THIS_FIELD <= 12))&&(#THIS_FIELD >= #F_MESEDA)))
   CHECKTYPE REQUIRED
   WARNING "Il valore deve essere compreso tra 1 e 12 ed essere maggiore o uguale al mese di partenza"
 END

ba/ba4300a.uml

@@ -452,7 +452,7 @@ NUMBER FLD_GD2_MESIREDD 3
 BEGIN
   PROMPT 45 6 "Mesi produzione reddito "
   FIELD LF_NDITTE->MESIREDD
-  NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)}
+  NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=12))
   FLAGS "R"
   HELP "Numero di mesi di produzione reddito"
   WARNING "Numero di mesi non corretto"

ba/ba4600a.uml

@@ -184,7 +184,7 @@ BEGIN
   FLAGS "R"
   HELP "Percentuale delle azioni possedute dal socio"
   WARNING "Percentuale quote non corretta"
-  NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)}
+  NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=100))
 END
 
 NUMBER FLD_SC1_PERCAZREDD 7 3
@@ -194,7 +194,7 @@ BEGIN
   FLAGS "R"
   HELP "Reddito derivante da quote aziendali"
   WARNING "Percentuale quote non corretta"
-  NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)}
+  NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=100))
 END
 
 NUMBER FLD_SC1_PERCAZPERD 7 3
@@ -204,7 +204,7 @@ BEGIN
   FLAGS "R"
   HELP "Perdita derivante da quote aziendali"
   WARNING "Percentuale quote non corretta"
-  NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)}
+  NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=100))
 END
 
 LIST LST_SC1_RICQUAL 28
@@ -375,7 +375,7 @@ BEGIN
   FLAGS "R"
   HELP "Numero di mesi lavorati ex art.120 comma 1"
   WARNING "N.ro di mesi non corretto"
-  NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)}
+  NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=12))
 END
 
 NUMBER FLD_SC2_MLAV120C2 2
@@ -385,7 +385,7 @@ BEGIN
   FLAGS "R"
   HELP "Numero di mesi lavorati ex art.120 comma 2"
   WARNING "N.ro di mesi non corretto"
-  NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)}
+  NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=12))
 END
 
 TEXT DLG_NULL

ba/batbinl.uml

@@ -88,7 +88,7 @@ BEGIN
   PROMPT 1 4 "Numero pagina finale registro unico    "
   FIELD PAGFIN
   FLAGS "UR"
-  NUM_EXPR {#THIS_FIELD>=#F_PINI_LU}
+  NUM_EXPR (#THIS_FIELD>=#F_PINI_LU)
   CHECKTYPE REQUIRED
   WARNING "Inserire un numero di pagina superiore a quella iniziale"
 END

ba/batbvid.uml

@@ -79,7 +79,7 @@ BEGIN
   FLAGS "R"
   CHECKTYPE REQUIRED  
   WARNING "Specificare un numero di pagina superiore a quella iniziale"
-  NUM_EXPR {(#THIS_FIELD>=#F_PAGDA)}
+  NUM_EXPR ((#THIS_FIELD>=#F_PAGDA))
 END
 
 ENDPAGE