Patch level : 10.0

Files correlati     : fe0.exe fe0100a.msk
Ricompilazione Demo : [ ]
Commento            :
Aggiunta possibilità di annullamento e sostituzuione invio precedente


git-svn-id: svn://10.65.10.50/branches/R_10_00@22524 c028cbd2-c16b-5b4b-a496-9718f37d4682

fe/fe0100.cpp

@@ -457,6 +457,7 @@ protected:
   bool controlla_mov(TRectype& mrec) const;
   bool azzera_alleg(TAssoc_array& manuali) const;
   void collega_variazioni() const;
+  const TString& primo_contratto() const;
 
 public:
   TRecnotype genera_alleg();
@@ -1223,21 +1224,23 @@ bool TDati_rilevanti_msk::send_alleg()
   }
 
   TDati_rilevanti_set recset(anno);
-  recset.add_header(*this);
+  const int tipologia = recset.add_header(*this);
 
-  const int tot = data.items();
+  if (tipologia != 2) // Invio i record tranne che in caso di annullamento
-  if (tot > 0)
   {
-    TProgind pi(tot, TR("Generazione file per Agenzia delle Entrate"));
+    const int tot = data.items();
-    for (int a = 0; a < tot; a++)
+    if (tot > 0)
     {
-      if (!pi.addstatus(1))
+      TProgind pi(tot, TR("Generazione file per Agenzia delle Entrate"));
-        break;
+      for (int a = 0; a < tot; a++)
-      if (send_all || !data[a].get_int(ALL_IGNORA))
+      {
-        send_rec(data[a], recset);
+        if (!pi.addstatus(1))
+          break;
+        if (send_all || !data[a].get_int(ALL_IGNORA))
+          send_rec(data[a], recset);
+      }
     }
   }
-
   recset.add_footer();
   recset.sort();
   bool done = recset.save_as(temp);
@@ -1511,6 +1514,20 @@ bool TDati_rilevanti_msk::check_rows(bool show_error)
   return ok;
 }
 
+const TString& TDati_rilevanti_msk::primo_contratto() const
+{
+  const TSheet_field& s = sfield(F_RIGHE);
+  const int c = s.cid2index(A_CONTRATTO);
+  FOR_EACH_SHEET_ROW(s, r, row)
+  {
+    const char* cc = row->get(c);
+    if (cc && *cc > ' ')
+      return get_tmp_string() = cc;
+  }
+  return EMPTY_STRING;
+}
+
+
 bool TDati_rilevanti_msk::save_if_dirty()
 {
   bool done = true;
@@ -1525,10 +1542,11 @@ bool TDati_rilevanti_msk::save_if_dirty()
 
 void TDati_rilevanti_msk::enable_buttons()
 {
+  TSheet_field& s = sfield(F_RIGHE);
   const int anno = get_int(F_ANNO);
   const bool good_year = anno >= 2010;
   const bool def = get_bool(F_DEFINITIVO);
-  const bool full_rows = !sfield(F_RIGHE).empty();
+  const bool full_rows = good_year && !s.empty();
 
   bool one_sent = false; // Ho spedito almeno un movimento in definitivo
   if (good_year)
@@ -1540,6 +1558,7 @@ void TDati_rilevanti_msk::enable_buttons()
     one_sent = recset.move_first();
   }
 
+  enable(DLG_COPY, full_rows && get_long(F_CODCF) > 0 && primo_contratto().full());
   enable(DLG_CANCEL, full_rows);
   enable(DLG_SAVEREC, _sheet_dirty);
   enable(DLG_EXPORT, full_rows);
@@ -1667,6 +1686,40 @@ bool TDati_rilevanti_msk::on_field_event(TOperable_field& o, TField_event e, lon
       }
     }
     break;
+  case DLG_COPY:
+    if (e == fe_button)
+    {
+      TString80 contratto1 = primo_contratto();
+      contratto1.trim();
+      if (contratto1.not_empty() && 
+          yesno_box("Si desidera inserire il contratto '%s' nelle righe che ne sono prive?", (const char*)contratto1))
+      {
+        const TContratto contr(get(F_TIPOCF)[0], get_long(F_CODCF), contratto1);
+        const int modpag = contr.modalita_pagamento();
+
+        TSheet_field& s = sfield(F_RIGHE);
+        const int f = s.cid2index(A_FORZATA);
+        const int c = s.cid2index(A_CONTRATTO);
+        const int n = s.cid2index(A_NUMRETT);
+        const int m = s.cid2index(A_MODPAG);
+        TString80 contratto;
+        TString16 numdoc;
+        FOR_EACH_SHEET_ROW(s, r, row)
+        {
+          row->get(n, numdoc);
+          row->get(c, contratto);
+          if (numdoc.blank() && contratto.blank())
+          {
+            row->add("X", f);
+            row->add(modpag, m);
+            row->add(contratto1, c);
+            s.enable_cell(r, c);
+          }
+        }
+        s.force_update();
+      }
+    }
+    break;
   case F_OUTFOLDER:
     if (e == fe_init && o.empty())
     {
@@ -1796,3 +1849,4 @@ int fe0100(int argc, char* argv[])
   app.run(argc, argv, TR("Gestione dati rilevanti"));
   return 0;
 }
+

fe/fe0100a.h

@@ -19,6 +19,10 @@
 #define F_INTER_COFI 322
 #define F_INTER_CAF  323
 
+#define F_TIPOLOGIA  330
+#define F_PROTELE    331
+#define F_PROTDOC    332
+
 #define F_RIGHE      300
 
 #define A_RIGA       101

fe/fe0100a.uml

@@ -30,6 +30,12 @@ BEGIN
   PICTURE TOOL_RECALC
 END
 
+BUTTON DLG_COPY 2 2
+BEGIN
+  PROMPT 1 3 "+Contratto"
+  PICTURE TOOL_COPY
+END
+
 BUTTON DLG_EXPORT 2 2
 BEGIN
   PROMPT 1 4 "Excel"
@@ -246,6 +252,36 @@ BEGIN
   PROMPT 2 10 "Data dell'impegno alla trasmissione "
 END
 
+GROUPBOX DLG_NULL 78 5
+BEGIN
+  PROMPT 1 12 "@bAnnullamento o sostituzione"
+END
+
+LIST F_TIPOLOGIA 1 15
+BEGIN
+  PROMPT 2 13 "Tipologia invio                      " 
+  ITEM "0|Normale"
+    MESSAGE DISABLE,F_PROTELE|DISABLE,F_PROTDOC
+  ITEM "1|Sostitutivo"
+    MESSAGE ENABLE,F_PROTELE|ENABLE,F_PROTDOC
+  ITEM "2|Annullamento"
+    MESSAGE ENABLE,F_PROTELE|ENABLE,F_PROTDOC
+END
+
+STRING F_PROTELE 17
+BEGIN
+  PROMPT 2 14 "Protocollo da sostituire o annullare "
+  FLAGS "U"
+  CHECKTYPE REQUIRED
+END
+
+STRING F_PROTDOC 6
+BEGIN
+  PROMPT 2 15 "Protocollo documento                 "
+  FLAGS "U"
+  CHECKTYPE REQUIRED
+END
+
 ENDPAGE
 
 ENDMASK

fe/fe0300.cpp

@@ -58,18 +58,21 @@ void TSomma_spesometro_msk::elabora(const TString_array& infiles, const TFilenam
   }
 
   TDati_rilevanti_set outset(anno);
-  outset.add_header(*this);
+  const int tipologia = outset.add_header(*this);
   
-  FOR_EACH_ARRAY_ROW(infiles, r, row) if (row2fname(*row, n))
+  if (tipologia != 2) // Invio i record solo quando non si tratta di annullamento
   {
-    const int len = outset.record_length();
+    FOR_EACH_ARRAY_ROW(infiles, r, row) if (row2fname(*row, n))
-    ifstream s(n, ios::binary);
-    TString row(len);
-    while (!s.eof())
     {
-      s.read(row.get_buffer(), len);
+      const int len = outset.record_length();
-      if (row[0] != '0' && row[0] != '9')
+      ifstream s(n, ios::binary);
-        outset.new_rec(row);
+      TString row(len);
+      while (!s.eof())
+      {
+        s.read(row.get_buffer(), len);
+        if (row[0] != '0' && row[0] != '9')
+          outset.new_rec(row);
+      }
     }
   }
 

fe/felib.cpp

@@ -449,11 +449,20 @@ const TVariant& TDati_rilevanti_set::get_field(const TAS400_column_info& ci) con
   return TAS400_recordset::get_field(ci);
 }
 
-void TDati_rilevanti_set::add_header(const TMask& msk, int num_inv, int tot_inv)
+int TDati_rilevanti_set::add_header(const TMask& msk, int num_inv, int tot_inv)
 {
   const TAnagrafica ditta(LF_NDITTE, prefix().get_codditta());
 
   new_rec("0");
+
+  const int tipologia = msk.get_int(F_TIPOLOGIA);
+  set(4, tipologia);
+  if (tipologia > 0)
+  {
+    set(5, msk.get(F_PROTELE));
+    set(6, msk.get(F_PROTDOC));
+  }
+
   set(7, ditta.codice_fiscale());
   set(8, ditta.partita_IVA());
 
@@ -492,6 +501,8 @@ void TDati_rilevanti_set::add_header(const TMask& msk, int num_inv, int tot_inv)
   {
     set(25, TDate()); // Svuota data impegno
   }
+
+  return tipologia;
 }
 
 void TDati_rilevanti_set::add_footer()

fe/felib.h

@@ -87,7 +87,7 @@ public:
   bool set(unsigned int n, int v)             { return set_val(n, long(v)); }
   bool set(unsigned int n, const real& v)     { return set_val(n, v); }
   bool set(unsigned int n, const TDate& v)    { return set_val(n, v); }
-  void add_header(const TMask& msk, int num_inv = 1, int tot_inv = 1);
+  int add_header(const TMask& msk, int num_inv = 1, int tot_inv = 1);
   void add_footer();
   bool split(const TFilename& name, const TRecnotype maxalleg = 15000);
   int anno() const { return _anno; }