Patch level :

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
cg2100k.uml     Tolta ultima riga commentata
cg2102.cpp      Sosotituito TConto con TBill
cg2105.cpp      Riga vuota
cg4301.cpp      aggiunto cast a real in una somma di stringa+real
                metodo TProrata_item::flag() in TProrata_item::previous_ok()
cg4400.cpp      Corretto data.ok in data.ok()
cg4600.cpp      Migliorati messaggi d'errore
cg4600a.uml     Aggiunto ADD RUN


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

cg/cg2100k.uml

@@ -50,4 +50,6 @@ END
 
 ENDPAGE
 
-ENDMASK
+ENDMASK
+
+

cg/cg2102.cpp

@@ -822,7 +822,7 @@ void TPrimanota_application::generazione_righe_cg(int r)
 
 int TPrimanota_application::crea_somma_spese(TImporto& imp)
 {
-  TConto cassa; causale().bill(2, cassa);
+  TBill cassa; causale().bill(2, cassa);
   const TString desc(causale().desc_agg(2));
   imp.swap_section(); imp.normalize();
   const int r = set_cgs_row(-1, imp, cassa, desc, 'L');

cg/cg2105.cpp

@@ -849,11 +849,10 @@ bool TGame_mask::partite_notify(TSheet_field& partite, int r, KEY k)
     const bool changing_row = gm._riga_partite != r;
     if (!changing_row)
       return TRUE;
-      
-    main_app().begin_wait();  
-    
     gm._riga_partite = r;
     
+    TWait_cursor hourglass;
+    
     TSheet_field& sheet = gm.scadenze();
     sheet.destroy(-1, FALSE);                               // Azzera righe
 
@@ -1024,7 +1023,7 @@ bool TGame_mask::partite_notify(TSheet_field& partite, int r, KEY k)
               tot_val += sl;
             }  
           }  
-        }
+        }          // Fine ciclo sulle rate della fattura
       }
       
       TRecord_array& unas = game->unassigned();
@@ -1100,9 +1099,7 @@ bool TGame_mask::partite_notify(TSheet_field& partite, int r, KEY k)
     if (sheet.items() > 0)
       sheet.select(0, TRUE);
     else  
-      sheet.force_update(); 
+      sheet.force_update();   
-      
-    main_app().end_wait();  
   }   
   
   if (k == K_INS)

cg/cg4301.cpp

@@ -1375,16 +1375,16 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
         // art 40 c. 5/6/8 per VA7.
         real i,v;
         TToken_string kr(tab->get("S0"),'!'); 
-        i = kr.get(0) + va7i;
+        i = real(kr.get(0)) + va7i;
-        v = kr.get(1) + va7v;
+        v = real(kr.get(1)) + va7v;
         kr.add(i.string(), 0);
         kr.add(v.string(), 1);
         tab->put("S0",kr);
                            
         // fatture in ritardo                     
         TToken_string fr(tab->get("S1"),'!'); 
-        i = fr.get(0) + rti;
+        i = real(fr.get(0)) + rti;
-        v = fr.get(1) + rtv;
+        v = real(fr.get(1)) + rtv;
         fr.add(i.string(), 0);
         fr.add(v.string(), 1);
         tab->put("S1",fr);
@@ -1393,8 +1393,8 @@ 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 = cs.get(0) + csi;
+        i = real(cs.get(0)) + csi;
-        v = cs.get(1) + csv;
+        v = real(cs.get(1)) + csv;
         cs.add(i.string(), 0);
         cs.add(v.string(), 1);
         tab->put("S2",cs);
@@ -1479,7 +1479,7 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
       const real& previous = _prorata.previous();
       bool b = TRUE;
 
-      if (!_prorata.flag() || (previous == current && _prorata.flag())) // Se le percentuali sono uguali 
+      if (!_prorata.previous_ok() || (previous == current && _prorata.previous_ok())) // Se le percentuali sono uguali 
         b = FALSE;                                                      // o non esiste la tabella prec. 
                                                                         // considera tutto sull'anno corrente
                                       
@@ -1568,7 +1568,7 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
     _plm->put("R12", _prorata.current());  // per comodita' in stampa
     _plm->put("B0",  "X");       // calcolato (invalidato dalla primanota)
     // Setta il flag di stampa errore: se siamo oltre 1997 e non esiste tabella anno prec e vi sono docs con tale riferimento
-    _plm->put("B1",  !_prorata.flag() && acquisti_iva_annoprec != ZERO && year_int > 1997);
+    _plm->put("B1",  !_prorata.previous_ok() && acquisti_iva_annoprec != ZERO && year_int > 1997);
     _pom->put("R9",  acq_ies);
     _pom->put("R10", acq_ies_iva);  
     _pum->put("R8",  acq_pint);

cg/cg4400.cpp

@@ -812,7 +812,7 @@ bool TStampa_registri_app::mask_data (TMask_field& f, KEY k)
         return FALSE;
       }
     if (f.dlg() == A_DATA)
-      if (data.ok)
+      if (data.ok())
       {
         if ( data.day() == 31 && data.month() == 12 )
           f.mask().show (TIPO_RIEPILOGATIVO);
@@ -3495,6 +3495,7 @@ bool TStampa_registri_app::stampa_riepilogo(int m)
       if (vect.items() > 0)
       {
         stampato = TRUE;
+        TPrintrow row;
         row.reset();
         printer().print(row);
         row.put("Registro iva:", 0);

cg/cg4600.cpp

@@ -333,45 +333,40 @@ bool TApertura_chiusura::mask_dataap (TMask_field& f, KEY k)
 
 bool TApertura_chiusura::mask_distinti (TMask_field& f, KEY k)
 {
-  int idg,idc,ids,idg1,idc1,ids1;
-
   if (k == K_ENTER)
   {
-    idg = 108;
+    const TMask& m = f.mask();
-    idc = 109;
+    short idg = 108;
-    ids = 110;
+    short idc = 109;
+    short ids = 110;
 
     for (int i = 0; i < 7; i++)
     {
-      int  g = f.mask().get_int(idg);
+      const int  g = m.get_int(idg);
-      int  c = f.mask().get_int(idc);
+      const int  c = m.get_int(idc);
-      long s = f.mask().get_long(ids);
+      const long s = m.get_long(ids);
       
-      idg1 = idg;
+      short idg1 = idg;
-      idc1 = idc;
+      short idc1 = idc;
-      ids1 = ids;
+      short ids1 = ids;
       
       for (int j = i+1; j < 7; j++)
       {
-        idg1 = idg1 + 3;
+        idg1 += 3;
-        idc1 = idc1 + 3;
+        idc1 += 3;
-        ids1 = ids1 + 3;
+        ids1 += 3;
         
-        int  gruppo = f.mask().get_int(idg1);
+        int  gruppo = m.get_int(idg1);
-        int  conto  = f.mask().get_int(idc1);
+        int  conto  = m.get_int(idc1);
-        long sottoc = f.mask().get_long(ids1);
+        long sottoc = m.get_long(ids1);
         
         if ((g == gruppo)&&(c == conto)&&(s == sottoc))
-        {
+          return f.error_box("Il sottoconto della riga %d e' ripetuto alla riga %d.", i+1, j+1);
-          f.warning_box("Nessun sottoconto puo' essere ripetuto!");
-          return FALSE;
-        }
       }
       
-      idg = idg + 3;
+      idg += 3;
-      idc = idc + 3;
+      idc += 3;
-      ids = ids + 3;
+      ids += 3;    
-      
     }   
   }
   return TRUE;

cg/cg4600a.uml

@@ -32,7 +32,8 @@ BEGIN
   DISPLAY "Descrizione @50" DESCR
   OUTPUT F_CHIUSURA CODCAUS
   INPUT  CODCAUS F_CHIUSURA
-  CHECKTYPE REQUIRED  
+  CHECKTYPE REQUIRED
+  ADD RUN CG0 -4
 END
 
 STRING F_APERTURA 3
@@ -41,9 +42,10 @@ BEGIN
   HELP "Codice causale che genera il movimento di apertura"
   USE LF_CAUSALI KEY 1 SELECT MOVAP="A"
   FLAGS "UZ"
+  INPUT  CODCAUS F_APERTURA
   COPY DISPLAY F_CHIUSURA
   OUTPUT F_APERTURA CODCAUS
-  INPUT  CODCAUS F_APERTURA
+  ADD RUN CG0 -4
 END
 
 DATE F_DATAAP