Patch level : 10.0 109

Files correlati     :
Ricompilazione Demo : [ ]
Commento           :

Riportata la versione 3.2 1208


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

ce/ce3900.cpp

@@ -4,6 +4,12 @@
 #include <recarray.h>
 #include <reprint.h>
 
+#include "celib.h"
+
+#include "ce2101.h"
+#include "ce3.h"
+#include "ce3900.h"
+
 #include "../cg/cglib01.h"
 
 #include "ammce.h"
@@ -12,11 +18,6 @@
 #include "movam.h"
 #include "movce.h"
 #include "salce.h"
-#include "celib.h"
-
-#include "ce2101.h"
-#include "ce3.h"
-#include "ce3900.h"
 
 ////////////////////////////////////////////////////////
 //	MASCHERA
@@ -229,16 +230,17 @@ bool TStampa_sintetica_rep::get_usr_val(const TString& name, TVariant& var) cons
 		return true;
 	}
 
-	if (name == "#PERCAMM")	//percentuale ammortamento
+	if (name == "#PERCAMM")	// percentuale ammortamento
 	{
     real percamm;
-    const real valamm = _cespite.val_amm();
+    const real valamm = val_amm(_cespite.sal_ini());
     if (valamm > ZERO)
     {
       TVariant qamm, qammmv;
       get_usr_val("#QAMM", qamm);
       get_usr_val("#QAMMMV", qammmv);
       percamm = CENTO * (qamm.as_real() + qammmv.as_real()) / valamm;
+      percamm.round(1);
     }  
 		var = percamm;
 		return true;

ce/ce3900a.rep

@@ -197,13 +197,13 @@ MESSAGE ADD,F3.105
 MESSAGE ADD,F4.105</postscript>
   </field>
   <field x="145" type="Valuta" align="right" width="12" id="106" pattern="1" text="#########,@@">
-   <source>#CESSELIM</source>
+   <source>#CESSELIM+#QAMMMV</source>
    <postscript description="B1.106 POSTSCRIPT">MESSAGE ADD,F2.106
 MESSAGE ADD,F3.106
 MESSAGE ADD,F4.106</postscript>
   </field>
   <field x="158" type="Valuta" align="right" width="12" id="107" pattern="1" text="#########,@@">
-   <source>#104+#105-#106-#QAMMMV</source>
+   <source>#104+#105-#106</source>
    <postscript description="B1.107 POSTSCRIPT">MESSAGE ADD,F2.107
 MESSAGE ADD,F3.107
 MESSAGE ADD,F4.107</postscript>

cg/cg2100.cpp

@@ -1761,6 +1761,26 @@ void TPrimanota_application::ini2mask(TConfig& ini, TMask& msk, bool query)
         add_not_empty(row, 2, ini, SCAD_IMPORTOVAL);
         pag_notify(pag, i, K_ENTER);
       }
+
+      // In inserimento tento di riempire anche le scadenze
+      if (i == 0 && msk.insert_mode()) 
+      {
+        TString4 codpag = msk.get(F_CODPAG);
+        if (codpag.empty())
+        {
+          TToken_string key;
+          key = iva() == iva_acquisti ? "F" : "C";
+          key.add(ini.get(MOV_CODCF, "23"));
+          codpag = cache().get(LF_CLIFO, key, CLI_CODPAG); 
+        }
+        if (codpag.full())
+        {
+          msk.set(FS_RECALC, "X"); // Forza ricalcolo automatico
+          msk.set(F_CODPAG, codpag);
+          set_scadenze(msk);
+        }
+      }
+
       pagamento().set_sheet(pag);
     }
   }

cg/cg6900.cpp

@@ -18,8 +18,8 @@ TInv_cont::TInv_cont(char mov) : _scelta(toupper(mov))
 {
   switch (_scelta)
   {       
-  case 'S': _titolo = "Invio a Sistema"; break;
+  case 'S': _titolo = TR("Invio a Sistema"); break;
-  case 'P': _titolo = "Invio a PC"; break;    
+  case 'P': _titolo = TR("Invio a PC"); break;    
   default : break;
   }
 }
@@ -55,9 +55,9 @@ void TInv_cont::main_loop()
     
     TString uselab = _tras_file.ult_file();
     TString chiave = _tras_file.key();
-    msk->set(F_USELAB,   uselab);
+    msk->set(F_USELAB,  uselab);
-    msk->set(F_CHIAVE,   chiave);
+    msk->set(F_CHIAVE,  chiave);
-    msk->set(F_DATALIM,  _data.string());
+    msk->set(F_DATALIM, _data.string());
     msk->disable(F_DATALIM);
     
     if (_scelta == 'S' && _ditta > 9999)
@@ -91,7 +91,7 @@ void TInv_cont::main_loop()
     return;
   }
   
-  _dittaAS = msk->get_long(F_DITTAAS); //Se la ditta per l'invio ad AS non viene compilata perche' trattasi di invio a PC
+  _dittaAS = msk->get_long(F_DITTAAS);//Se la ditta per l'invio ad AS non viene compilata perche' trattasi di invio a PC
   if (_dittaAS == 0)                  //o perche' il codice e' di 4, gli assegno la ditta corrente. Nel caso di invio a
     _dittaAS = _ditta;                //PC non servirebbe il codice aggiuntivo, ma lo metto ugualmente per avere una situazione analoga
               

cg/cg6904.cpp

@@ -1105,7 +1105,7 @@ void TInv_cont::invio_righe_IVA()
 
 //    record.overwrite(_triva->get(RMI_CODCMS),118);
 //    record.overwrite(_triva->get(RMI_FASCMS),138);
-    record.overwrite(_triva->get(RMI_NAVP),148);
+    record.overwrite(_triva->get(RMI_NAVP),  148)
     
     _numrec_iva++;            
 

cg/cgtrc.ini

@@ -35,7 +35,7 @@
 #   1  10 Nome studio inviante
 #  11  14 Codice ditta inviante
 #  15  17 Numero progressivo di invio
-#  18  23 Data del trasferimento
+#  18  23 Data del trasferimento (AAMMGG)
 #  24  29 Numero totale di record trasferiti
 #  30  31 Numero totale dischetti
 #  32  33 Numero dischetto corrente