Patch level :4.0 nopatch

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :corretti errori di compilazione dovuti a compilatore nuovo


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

cg/cg3600.cpp

@@ -231,7 +231,8 @@ long TMastrino::succ(long rec, tipo_riga_mastrino tipo) const
 long TMastrino::pred(long rec, tipo_riga_mastrino tipo) const
 {
   if (rec > items()) rec = items();
-  for (long i = rec-1; i >= 0; i--)
+  long i;
+  for (i = rec-1; i >= 0; i--)
   {
     if (row(i).tipo() == tipo)
       break;
@@ -1245,7 +1246,8 @@ XI_OBJ* TGrid_control::find_column(short cid) const
 {
   int num;
   XI_OBJ** column = xi_get_member_list(_obj, &num);
-  for (int i = num-1; i >= 0; i--) 
+  int i;
+  for (i = num-1; i >= 0; i--) 
   {
     if (column[i]->cid == cid)
       break;
@@ -1259,7 +1261,8 @@ XI_OBJ* TGrid_control::find_column(const char* head) const
   XI_OBJ** column = xi_get_member_list(_obj, &num);
   
   TString80 text;
-  for (int i = num-1; i >= 0; i--) 
+  int i;
+  for (i = num-1; i >= 0; i--) 
   { 
     xi_get_text(column[i], text.get_buffer(), text.size());
     if (text == head)

cg/cg4301.cpp

@@ -116,8 +116,8 @@ bool TLiquidazione_app::recalc_all()
             "Si desidera eseguirlo?")))
             _recalc = ever;
        }         
-       
-       for (int m = 1; m <= _month; m++)   // fino a 13 compreso
+       int m;
+       for (m = 1; m <= _month; m++)   // fino a 13 compreso
          if (is_month_plain(m) || _recalc == ever)
          {               
            if (_prind->iscancelled()) break;
@@ -1636,19 +1636,19 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
           tab->put("S5", tipoiva);              
       
           // art 40 c. 5/6/8 per VA7.
-          real i,v;
+          real r,v;
           TToken_string kr(tab->get("S0"),'!'); 
-          i = real(kr.get(0)) + va7i;
+          r = real(kr.get(0)) + va7i;
           v = real(kr.get(1)) + va7v;
-          kr.add(i.string(), 0);
+          kr.add(r.string(), 0);
           kr.add(v.string(), 1);
           tab->put("S0",kr);
                            
           // fatture in ritardo                     
           TToken_string fr(tab->get("S1"),'!'); 
-          i = real(fr.get(0)) + rti;
+          r = real(fr.get(0)) + rti;
           v = real(fr.get(1)) + rtv;
-          fr.add(i.string(), 0);
+          fr.add(r.string(), 0);
           fr.add(v.string(), 1);
           tab->put("S1",fr);
       
@@ -1656,9 +1656,9 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
           // non cannare la stampa dei registri; contengono anche
           // tutti i non incassati (vedi definizione di bool nonimp)
           TToken_string cs(tab->get("S2"),'!'); 
-          i = real(cs.get(0)) + csi;
+          r = real(cs.get(0)) + csi;
           v = real(cs.get(1)) + csv;
-          cs.add(i.string(), 0);
+          cs.add(r.string(), 0);
           cs.add(v.string(), 1);
           tab->put("S2",cs);
         

cg/cg4302.cpp

@@ -148,7 +148,8 @@ void TLiquidazione_app::add_ventilation(real iva, real howmuch,
                                         const char* codiva, const char* other)
 {
   _VentItem* vi = NULL;
-  for (int i = 0; i < _vent_arr.items(); i++)
+  int i;
+  for (i = 0; i < _vent_arr.items(); i++)
   {
     vi = (_VentItem*)&_vent_arr[i];
     if (vi->_codiva == codiva)
@@ -168,8 +169,8 @@ void TLiquidazione_app::add_vendite(int month, const char* codreg,
                                     int tipodet, const real& r)
 {
   _VendItem* vi = NULL;
-  
-  for (int i = 0; i < _vend_arr.items(); i++)
+  int i;
+  for (i = 0; i < _vend_arr.items(); i++)
   {
     vi = (_VendItem*)&_vend_arr[i];
     if (vi->_codreg == codreg && vi->_month == month && vi->_tipodet == tipodet)
@@ -191,8 +192,8 @@ void TLiquidazione_app::add_corrisp(int month, const char* codreg, const real& r
 {
   _CorrItem* ci = NULL;
   const int nitems = _corr_arr.items();
-  
-  for (int i = 0; i < nitems; i++)
+  int i;
+  for (i = 0; i < nitems; i++)
   {
     ci = (_CorrItem*)&_corr_arr[i];
     if (ci->_codreg == codreg && ci->_month == month &&
@@ -439,34 +440,31 @@ bool TLiquidazione_app::look_pem(TTable & pem, int codreg)
 
 	key.format("%04d%02d", atoi((const char *) _year), codreg);
   pem.put("CODTAB", key);
-  pem.read();
-  if (!pem.good())
+  bool ok = pem.read() == NOERR;
+  if (!ok)
   {
     pem.zero();
 	  pem.put("CODTAB", key);
-    pem.write();
+    ok = pem.write() == NOERR;
   }
   return ok;
 }
 
 bool TLiquidazione_app::look_pom(int m, const char* a, bool create)
 {
-  bool ok = FALSE;
-
   _pom->zero();
   (*_pom_codatt) = format("%6s", a);
   (*_pom_mese)   = format("%02d",m);
   (*_pom_anno)   = _year;
 
-  TString s = _pom->get("CODTAB");
-  _pom->read();
-  ok = _pom->good();
+  const TString16 s = _pom->get("CODTAB");
+  bool ok = _pom->read() == NOERR;
   
   if (!ok && create)
   {
     _pom->zero();
     _pom->put("CODTAB",s);
-    _pom->write();
+    ok = _pom->write() == NOERR;
   }
   return ok;
 }

cg/cg5300.cpp

@@ -487,15 +487,14 @@ int TParaliq_app::read(TMask& m)
   
 	TCursor cur(&relpla, "", 1, &pla, &pla);
 	const TRecnotype items = cur.items();
-  int i = 0;
 
   init_array(m, FALSE);                     // Carica tutti i codici attivita'
 	cur.freeze();
-  for (cur = 0L; cur.pos() < items; ++cur, i++)
+  for (cur = 0L; cur.pos() < items; ++cur)
   {
     tt = pla.get("CODTAB").mid(9,5);    // codice attivita'   
-
-    for (int i = 0; i < sf.items(); i++)  // Cerca riga corrispondente sullo sheet
+    int i;
+    for (i = 0; i < sf.items(); i++)  // Cerca riga corrispondente sullo sheet
       if (tt == sf.row(i).get(0)) break; 
     
     tt.add(pla.get("S7"));              // tipo attivita'