Modifiche varie per corezione errori di contabilita'

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

cg/cg6700.cpp

@@ -1332,7 +1332,7 @@ bool TRic_ListaMov::cerca_tipopag_codpag(TString& codpag, int tipopag)
    
   for (int i = 0; !rpg.eof(); rpg.next(), i++)
   { 
-    dep.format("%-4s%d", (const char*) codpag, i);
+    dep.format("%-s%3d", (const char*) codpag, i);
     
     rpg.zero();
     rpg.put("CODTAB", dep);
@@ -1548,7 +1548,7 @@ void TRic_ListaMov::descrizione_pagamento(TString& descr,int tipopag,TString& ul
     
     for (int i = 0; !rpg.eof(); rpg.next(), i++)
     {
-      dep.format("%-4s%d", (const char*) codpag, i);
+      dep.format("%-s%3d", (const char*) codpag, i);
     
       rpg.zero();
       rpg.put("CODTAB", dep);
@@ -3095,20 +3095,20 @@ void TRic_ListaMov::setta_intestazione()
 
   if (_intestaSC)
   {
-    sep << "Ditta  " << get_firm();
+    sep1 << "Ditta  " << get_firm();
-    sep << " " << ragsoc;
+    sep1 << " " << ragsoc;
-    sep.left_just(198);
+    sep1.left_just(198);
   
-    set_header (soh++, (const char*) sep);
+    set_header (soh++, (const char*) sep1);
   
-    sep = "";
+    sep1 = "";
-    sep << "Data @< Pag. @#";
+    sep1 << "Data @< Pag. @#";
   
-    sep.right_just(193);
+    sep1.right_just(193);
-    sep.overwrite ("LISTA DI CONTROLLO MOVIMENTI DI SALDACONTO");
+    sep1.overwrite ("LISTA DI CONTROLLO MOVIMENTI DI SALDACONTO");
-    set_header (soh++, (const char*)sep);
+    set_header (soh++, (const char*)sep1);
-    sep.fill('-');
+    sep1.fill('-');
-    set_header (soh++, (const char *) sep);
+    set_header (soh++, (const char *) sep1);
   }
   else
   {

cg/cg6800b.uml

@@ -6,6 +6,7 @@ BUTTON DLG_SAVEREC 10 2
 BEGIN
 PROMPT -15 -1 "~Registra"
 MESSAGE EXIT,K_SAVE
+PICTURE BMP_SAVEREC
 END
 
 BUTTON DLG_CANCEL 10 2

cg/cg6800c.uml

@@ -6,6 +6,7 @@ BUTTON DLG_SAVEREC 10 2
 BEGIN
 PROMPT -15 -1 "~Registra"
 MESSAGE EXIT,K_SAVE
+PICTURE BMP_SAVEREC
 END
 
 BUTTON DLG_CANCEL 10 2

cg/cg6801.cpp

@@ -34,7 +34,7 @@ bool TDitta_ric::set()
     return FALSE;
   }
 
-  _dittaric = msk->get_int(F_CODDITTA);
+  _dittaric = msk->get_long(F_CODDITTA);
   set_firm(_dittaric);
   
   if (!esegui_controlli()) 

cg/cg6804.cpp

@@ -61,6 +61,7 @@ bool TVar_sc::create()
   rp.sheet_mask().set_handler(DLG_DELREC, elimina_partita);
   
   _registrato = FALSE;
+  _aperti     = FALSE;
   
   dispatch_e_menu (BAR_ITEM(1));
 
@@ -78,9 +79,12 @@ bool TVar_sc::destroy()
   delete _scad;
   delete _pagsca;                          
 //  delete _tab_reg;   
+  if (_aperti)
+  {
     delete _tpart;
     delete _tscad;
     delete _tpagsca;
+  }
   
   return TApplication::destroy();
 }                                
@@ -100,6 +104,7 @@ void TVar_sc::apri_temp_file()
   _tpart     = new TIsamtempfile(LF_PARTITE, tmppart, 0);
   _tscad     = new TIsamtempfile(LF_SCADENZE, tmpscad, 0);
   _tpagsca   = new TIsamtempfile(LF_PAGSCA, tmppagsca, 0); 
+  _aperti = TRUE;
 }
 
 void TVar_sc::leggi_record_controllo()

cg/cg6804.h

@@ -28,7 +28,7 @@ class TVar_sc : public TApplication
   TTransfer_file   _tras_file;
   TMask*           _msk, *_mask;
                                                       
-  bool     _registrato;
+  bool     _registrato,_aperti;
   TString  _control_rec,_trasf,_std,_numpart,_tmcf;
   long     _dittaric,_sottoc;
   int      _gruppo,_conto,_anno,_nriga,_tm_caus;    

cg/cg6804b.uml

@@ -6,6 +6,7 @@ BUTTON DLG_SAVEREC 10 2
 BEGIN
   PROMPT -13 -1 "~Registra"
   MESSAGE EXIT,K_SAVE
+  PICTURE BMP_SAVEREC
 END
 
 BUTTON DLG_CANCEL 10 2

cg/cg6804d.uml

@@ -6,6 +6,7 @@ BUTTON DLG_SAVEREC 10 2
 BEGIN
   PROMPT -13 -1 "~Registra"
   MESSAGE EXIT,K_SAVE
+  PICTURE BMP_SAVEREC
 END
 
 BUTTON DLG_CANCEL 10 2

cg/cg6804e.uml

@@ -6,6 +6,7 @@ BUTTON DLG_SAVEREC 10 2
 BEGIN
   PROMPT -13 -1 "~Registra"
   MESSAGE EXIT,K_SAVE  
+  PICTURE BMP_SAVEREC
 END
 
 BUTTON DLG_CANCEL 10 2

cg/cg6804f.uml

@@ -4,6 +4,7 @@ BUTTON DLG_OK 8 2
 BEGIN
   PROMPT -13 -1 "~Conferma"
   MESSAGE EXIT,K_SAVE               
+  PICTURE BMP_SAVEREC
 END
 
 BUTTON DLG_DELREC 8 2

cg/cg6900.cpp

@@ -1897,6 +1897,14 @@ int cg6900 (int argc, char* argv[])
       delete a;
     }         
     break;
+    case 'C':
+    {   
+      TCanc_file_invio* a = new TCanc_file_invio;       
+      a->run(argc, argv,"Eliminazione file invio");
+      delete a;
+    }         
+    break;
+
     default:
     break;
   }

cg/cg6900.h

@@ -38,6 +38,7 @@
 
 #include "cg6901.h"   
 #include "cg6903.h"  
+#include "cg6905.h"
 #include "cglib04.h"
 
 class TInv_cont : public TApplication

cg/cg6905.cpp

@@ -0,0 +1,39 @@
+#include "cg6905.h"
+
+bool TCanc_file_invio::create()
+{
+  TApplication::create();
+
+  dispatch_e_menu (BAR_ITEM(1));
+
+  return TRUE;
+}
+
+bool TCanc_file_invio::destroy()
+{
+  return TApplication::destroy();
+}
+
+bool TCanc_file_invio::set()
+{ 
+  TString marker;
+  
+  _tras_file.remove_all(FALSE);
+  
+  marker = firm2dir(0);
+  marker << "\\marker";
+  
+  fremove(marker);
+  
+  message_box("Eliminazione file di lavoro dell' invio terminata");
+               
+  return FALSE;
+}
+
+bool TCanc_file_invio::menu(MENU_TAG m)
+{  
+  if (m == BAR_ITEM(1))  
+    return set();
+    
+  return FALSE;
+}

cg/cg6905.h

@@ -0,0 +1,21 @@
+// Ripristino flag invio PN e IVA
+
+#include <applicat.h>  
+#include <isam.h>
+#include <urldefid.h> 
+
+#include "cglib04.h"
+
+class TCanc_file_invio : public TApplication
+{
+  TTransfer_file  _tras_file;
+  
+public:
+  virtual bool create();
+  virtual bool destroy();
+  virtual bool menu(MENU_TAG m);
+  
+  bool    set();
+  
+  TCanc_file_invio() {}
+};

cg/cglib04.cpp

@@ -2917,7 +2917,11 @@ void TTransfer_file::new_key(TString& key, int tipo, TString& buffer)
   n_key << key.mid(2,6);
   n_key << key.mid(8,2);
   n_key << buffer.mid(26,2); 
-  n_key << buffer.mid(28,7);
+  TString app;                            // Modifica del 06-09-96 relativa all'allineamento
+  app = buffer.mid(28,7); 
+  app.trim();                             // del numero di riferimento partita che per i file
+  app.format("%-7s", (const char*) app);  // temporanei deve essere sempre a sinistra 
+  n_key << app;                           // indipendentemente da quello che c'e' sul trasfer
   n_key << buffer.mid(35,2);
   n_key << key.mid(10,3);
   
@@ -3530,6 +3534,14 @@ bool TTransfer_file::fcopytemp_PC(const char* orig, const char* dest)
       fclose(o);
     }
     
+    if (trec == "B1" || trec == "B2" || trec == "B3")
+    {
+      TString app = buffer.mid(19,7);   
+      app.trim();                            // Modifica del 06-09-96 relativa all'allineamento
+      app.format("%-7s", (const char*) app); // del numero di riferimento partita che per i file
+      buffer.overwrite(app,19);              // temporanei deve essere sempre a sinistra
+    }                                        // indipendentemente da quello che c'e' sul trasfer
+      
     if (trec == "W1")
       write_testata_causali(buffer);