diff --git a/cg/cg2100.cpp b/cg/cg2100.cpp
index d5bdbcf44..ccbb61e9c 100755
--- a/cg/cg2100.cpp
+++ b/cg/cg2100.cpp
@@ -13,9 +13,9 @@
 
 
 TPrimanota_application::TPrimanota_application()
-                 : _rel(NULL), _lastreg(0), _mode(0), _iva(nessuna_iva)
+: _rel(NULL), _lastreg(0), _mode(0), _iva(nessuna_iva)
 {
- memset(_msk, 0, sizeof(_msk));
+  memset(_msk, 0, sizeof(_msk));
 }
 
 
@@ -29,72 +29,73 @@ TMask* TPrimanota_application::load_mask(int n)
   
   switch (n)
   {
- case 0: 
-   m->set_handler(F_NUMREG, num_handler);
-   m->set_handler(F_CODCAUS, caus_query_handler);
-   m->set_handler(F_DATAREG, datareg_handler);
-   m->set_handler(F_DATACOMP, datacomp_handler);
-   {
-     TConfig c(CONFIG_STUDIO, "cg");
-     const bool dr = c.get_bool("PoCuDr");              // Scelta primo campo col focus
-     m->first_focus(dr ? F_DATAREG : F_CODCAUS);
-   }
+  case 0: 
+    m->set_handler(F_NUMREG, num_handler);
+    m->set_handler(F_CODCAUS, caus_query_handler);
+    m->set_handler(F_DATAREG, datareg_handler);
+    m->set_handler(F_DATACOMP, datacomp_handler);
+  {
+    TConfig c(CONFIG_STUDIO, "cg");
+    const bool dr = c.get_bool("PoCuDr");              // Scelta primo campo col focus
+    m->first_focus(dr ? F_DATAREG : F_CODCAUS);
+  }
     break;
- case 1: 
-   m->set_handler(F_VISVAL, visval_handler);
-   m->set_handler(F_DESCR, descr_handler);
-   break;
- case 2:
-   m->set_handler(F_CODREG, reg_handler);
-   m->set_handler(F_CLIENTE, clifo_handler);
-   m->set_handler(F_FORNITORE, clifo_handler);
-   m->set_handler(F_TOTALE, totale_handler);
-   m->set_handler(F_RITFIS, ritfis_handler);
-   m->set_handler(F_RITSOC, ritsoc_handler);
-   m->set_handler(F_VISVAL, visval_handler);
-   m->set_handler(F_OCCASEDIT, occas_handler);
-   m->set_handler(F_SOLAIVA, solaiva_handler);
-   m->set_handler(F_SHEETIVA, iva_handler);
-   {
-     TSheet_field& is = (TSheet_field&)m->field(F_SHEETIVA);
-     is.set_notify(iva_notify);
-     is.sheet_mask().set_handler(101, imponibile_handler);
-     is.sheet_mask().set_handler(102, codiva_handler);
-     is.sheet_mask().set_handler(103, imposta_handler);
-     is.sheet_mask().set_handler(108, conto_handler);
-     is.sheet_mask().set_handler(109, suspended_handler);
-     is.sheet_mask().set_handler(209, suspended_handler);
-     is.sheet_mask().set_handler(309, suspended_handler);
-    }  
-   break;
- case 3:
-   m->set_handler(O_CODICE, occas_code_handler);
-   break;  
- default:
-   CHECKD(0, "Che cavolo di maschera e' la ", n);
-   break;  
+  case 1: 
+    m->set_handler(F_VISVAL, visval_handler);
+    m->set_handler(F_DESCR, descr_handler);
+    break;
+  case 2:
+    m->set_handler(F_CODREG, reg_handler);
+    m->set_handler(F_CLIENTE, clifo_handler);
+    m->set_handler(F_FORNITORE, clifo_handler);
+    m->set_handler(F_TOTALE, totale_handler);
+    m->set_handler(F_RITFIS, ritfis_handler);
+    m->set_handler(F_RITSOC, ritsoc_handler);
+    m->set_handler(F_VISVAL, visval_handler);
+    m->set_handler(F_OCCASEDIT, occas_handler);
+    m->set_handler(F_SOLAIVA, solaiva_handler);
+    m->set_handler(F_SHEETIVA, iva_handler);
+  {
+    TSheet_field& is = (TSheet_field&)m->field(F_SHEETIVA);
+    is.set_notify(iva_notify);
+    TMask& ism = is.sheet_mask();
+    ism.set_handler(101, imponibile_handler);
+    ism.set_handler(102, codiva_handler);
+    ism.set_handler(104, imposta_handler);
+    ism.set_handler(108, conto_handler);
+    ism.set_handler(109, suspended_handler);
+    ism.set_handler(209, suspended_handler);
+    ism.set_handler(309, suspended_handler);
+  }  
+    break;
+  case 3:
+    m->set_handler(O_CODICE, occas_code_handler);
+    break;  
+  default:
+    CHECKD(0, "Che cavolo di maschera e' la ", n);
+    break;  
   }
   if (n == 1 || n == 2)
   {
-   m->set_handler(F_DATAREG, datareg_handler);
-   m->set_handler(F_DATACOMP, datacomp_handler);
-   m->set_handler(F_CODCAUS, caus_modify_handler);
-   m->set_handler(F_SHEETCG, cg_handler);
-   {
-     TSheet_field& cg = (TSheet_field&)m->field(F_SHEETCG);                                                      
-     cg.set_notify(cg_notify);
-     TMask& cgm = cg.sheet_mask();
-     cgm.set_handler(101, dareavere_handler);
-     cgm.set_handler(102, dareavere_handler);
-     cgm.set_handler(105, suspended_handler);
-     cgm.set_handler(106, suspended_handler);
-     cgm.set_handler(206, suspended_handler);
-     cgm.set_handler(306, suspended_handler);
-     cgm.set_handler(112, suspended_handler);
-     cgm.set_handler(113, suspended_handler);
-     cgm.set_handler(213, suspended_handler);
-     cgm.set_handler(313, suspended_handler);
-   } 
+    m->set_handler(F_DATAREG, datareg_handler);
+    m->set_handler(F_DATACOMP, datacomp_handler);
+    m->set_handler(F_CODCAUS, caus_modify_handler);
+    m->set_handler(F_SHEETCG, cg_handler);
+  {
+    TSheet_field& cg = (TSheet_field&)m->field(F_SHEETCG);                                                      
+    cg.set_notify(cg_notify);
+    TMask& cgm = cg.sheet_mask();
+    cgm.set_handler(101, dareavere_handler);
+    cgm.set_handler(102, dareavere_handler);
+    cgm.set_handler(105, suspended_handler);
+    cgm.set_handler(106, suspended_handler);
+    cgm.set_handler(206, suspended_handler);
+    cgm.set_handler(306, suspended_handler);
+    cgm.set_handler(112, suspended_handler);
+    cgm.set_handler(113, suspended_handler);
+    cgm.set_handler(213, suspended_handler);
+    cgm.set_handler(313, suspended_handler);
+  } 
   }
   
   return _msk[n] = m;
@@ -103,25 +104,25 @@ TMask* TPrimanota_application::load_mask(int n)
 
 bool TPrimanota_application::user_create()
 {
- _tabcom = new TLocalisamfile(LF_TABCOM);
- _tab = new TLocalisamfile(LF_TAB);
- _caus = new TLocalisamfile(LF_CAUSALI);
- _rcaus = new TLocalisamfile(LF_RCAUSALI);
- _clifo = new TLocalisamfile(LF_CLIFO);
- _pcon = new TLocalisamfile(LF_PCON);
- _attiv = new TLocalisamfile(LF_ATTIV);
- _saldo = new TLocalisamfile(LF_SALDI);
- _comuni = new TLocalisamfile(LF_COMUNI);
- _occas = new TLocalisamfile(LF_OCCAS);
- _nditte = new TLocalisamfile(LF_NDITTE);
+  _tabcom = new TLocalisamfile(LF_TABCOM);
+  _tab = new TLocalisamfile(LF_TAB);
+  _caus = new TLocalisamfile(LF_CAUSALI);
+  _rcaus = new TLocalisamfile(LF_RCAUSALI);
+  _clifo = new TLocalisamfile(LF_CLIFO);
+  _pcon = new TLocalisamfile(LF_PCON);
+  _attiv = new TLocalisamfile(LF_ATTIV);
+  _saldo = new TLocalisamfile(LF_SALDI);
+  _comuni = new TLocalisamfile(LF_COMUNI);
+  _occas = new TLocalisamfile(LF_OCCAS);
+  _nditte = new TLocalisamfile(LF_NDITTE);
 
- _rel = new TMovimentoPN;
- _rel->lfile()->last();
- _lastreg = _rel->lfile()->get_long(MOV_NUMREG);  // Init last registration number
+  _rel = new TMovimentoPN;
+  _rel->lfile()->last();
+  _lastreg = _rel->lfile()->get_long(MOV_NUMREG);  // Init last registration number
 
- set_search_field(F_NUMREG);                      // Set field for default search
+  set_search_field(F_NUMREG);                      // Set field for default search
 
- return TRUE;
+  return TRUE;
 }
 
 
@@ -132,19 +133,19 @@ bool TPrimanota_application::user_destroy()
   if (_msk[1] != NULL) delete _msk[1];
   if (_msk[0] != NULL) delete _msk[0];
 
- delete _rel;
- delete _nditte;
- delete _occas;
+  delete _rel;
+  delete _nditte;
+  delete _occas;
   delete _comuni;
   delete _saldo;
   delete _attiv;
- delete _pcon;
- delete _clifo;
- delete _rcaus;
- delete _caus;
- delete _tab;
- delete _tabcom;
- return TRUE;
+  delete _pcon;
+  delete _clifo;
+  delete _rcaus;
+  delete _caus;
+  delete _tab;
+  delete _tabcom;
+  return TRUE;
 }
 
 // Legge la causale di codice cod ed il relativo registro dell'anno year
@@ -156,112 +157,112 @@ bool TPrimanota_application::read_caus(const char* cod, int year)
   {
     TMask& m = *load_mask(_iva == nessuna_iva ? 1 : 2);
 
-   TEdit_field& nd = (TEdit_field&)m.field(F_NUMDOC);  // Numero documento obbligatorio?
-   nd.check_type(_causale.num_doc() ? CHECK_REQUIRED : CHECK_NORMAL);
+    TEdit_field& nd = (TEdit_field&)m.field(F_NUMDOC);  // Numero documento obbligatorio?
+    nd.check_type(_causale.num_doc() ? CHECK_REQUIRED : CHECK_NORMAL);
 
-   TEdit_field& dd = (TEdit_field&)m.field(F_DATADOC); // Data documento obbligatoria?
-   dd.check_type(_causale.data_doc() ? CHECK_REQUIRED : CHECK_NORMAL);
- }
+    TEdit_field& dd = (TEdit_field&)m.field(F_DATADOC); // Data documento obbligatoria?
+    dd.check_type(_causale.data_doc() ? CHECK_REQUIRED : CHECK_NORMAL);
+  }
   return ok;
 } 
-    
-    
+
+
 bool TPrimanota_application::changing_mask(int mode)
 {
- if (mode == MODE_QUERY)
-  return _mode != MODE_QUERY;
+  if (mode == MODE_QUERY)
+    return _mode != MODE_QUERY;
 
- TipoIVA oliva = _iva;
+  TipoIVA oliva = _iva;
 
- _iva = nessuna_iva;
- 
+  _iva = nessuna_iva;
+  
   TString16 causale;
-//  TString16 registro;
+  //  TString16 registro;
   int annoes = 0, annoiva = 0;
 
- switch (mode)
- {
- case MODE_INS:
-  annoes = _msk[0]->get_int(F_ANNOES);
-  annoiva = _msk[0]->get_int(F_ANNOIVA);
-  causale = _msk[0]->get(F_CODCAUS);
+  switch (mode)
+  {
+  case MODE_INS:
+    annoes = _msk[0]->get_int(F_ANNOES);
+    annoiva = _msk[0]->get_int(F_ANNOIVA);
+    causale = _msk[0]->get(F_CODCAUS);
     read_caus(causale, annoiva);
-  break;
- case MODE_MOD:
-  annoes  = _rel->lfile()->get_int("ANNOES");
-  annoiva = _rel->lfile()->get_int("ANNOIVA");
-  causale = _rel->lfile()->get("CODCAUS");
-  giornale().read(annoes);
-//  registro = _rel->lfile()->get("REG");
-//   _causale.read(causale, 0);
-//   _causale.reg().read(registro, annoiva);
+    break;
+  case MODE_MOD:
+    annoes  = _rel->lfile()->get_int("ANNOES");
+    annoiva = _rel->lfile()->get_int("ANNOIVA");
+    causale = _rel->lfile()->get("CODCAUS");
+    giornale().read(annoes);
+    //  registro = _rel->lfile()->get("REG");
+    //   _causale.read(causale, 0);
+    //   _causale.reg().read(registro, annoiva);
     read_caus(causale, annoiva);
-  break;
- default:
-  break;
- }
+    break;
+  default:
+    break;
+  }
   _iva = _causale.iva();
   
- return _mode == MODE_QUERY || _iva != oliva;
+  return _mode == MODE_QUERY || _iva != oliva;
 }
 
 
 TMask* TPrimanota_application::get_mask(int mode)
 {
- _mode = mode;
- const int m = (mode == MODE_QUERY) ? 0 : (iva() == nessuna_iva ? 1 : 2);
- return load_mask(m);
+  _mode = mode;
+  const int m = (mode == MODE_QUERY) ? 0 : (iva() == nessuna_iva ? 1 : 2);
+  return load_mask(m);
 }
 
 
 void TPrimanota_application::init_mask(TMask& m)
 {
- fill_sheet(m);
-                                 
+  fill_sheet(m);
+  
   // Show/Hide campi valuta: F_VALUTA, F_CAMBIO, F_VISVAL (GROUP 3)
   m.send_key(K_SHIFT+K_CTRL+(_causale.valuta() ? 's' : 'h'), -3);
   m.set(F_VISVAL, _causale.valuta() ? "X" : " ");
   
- if (_iva != nessuna_iva)
- {
-/* 
-  TString16 fil; fil = "I0="; fil << (_iva == iva_acquisti ? '2' : '1');
-  TEdit_field& f = (TEdit_field&)m.field(F_CODREG);
-  f.browse()->cursor()->filter(fil);
-*/
-  const int g = (_iva == iva_acquisti) ? 2 : 1;
-  m.send_key(K_SHIFT+K_CTRL+'s', -g);  // if iva_vendite show group 1
-  m.send_key(K_SHIFT+K_CTRL+'h', g-3); //                hide group 2
-  
-  const bool intra = _causale.intra();
-   m.show(F_CORRLIRE, intra);
-   
-   const bool corrval = intra && _causale.corrval();
-   m.show(F_CORRVALUTA, corrval);
- }
+  if (_iva != nessuna_iva)
+  {
+    /* 
+       TString16 fil; fil = "I0="; fil << (_iva == iva_acquisti ? '2' : '1');
+       TEdit_field& f = (TEdit_field&)m.field(F_CODREG);
+       f.browse()->cursor()->filter(fil);
+       */
+    const int g = (_iva == iva_acquisti) ? 2 : 1;
+    m.send_key(K_SHIFT+K_CTRL+'s', -g);  // if iva_vendite show group 1
+    m.send_key(K_SHIFT+K_CTRL+'h', g-3); //                hide group 2
+    
+    const bool intra = _causale.intra();
+    m.show(F_CORRLIRE, intra);
+    
+    const bool corrval = intra && _causale.corrval();
+    m.show(F_CORRVALUTA, corrval);
+  }
 
- m.disable(DLG_NEWREC);
+  m.disable(DLG_NEWREC);
 }
 
 
 void TPrimanota_application::init_query_mode(TMask& m)
 {
- m.enable(DLG_NEWREC);
+  m.enable(DLG_NEWREC);
 }
 
 
 void TPrimanota_application::fill_sheet(TMask& m) const
 {
- TSheet_field& cgs = (TSheet_field&)m.field(F_SHEETCG);
- for (int r = cgs.items(); r < 16; r++)
-  cgs.row(r);
+  TSheet_field& cgs = (TSheet_field&)m.field(F_SHEETCG);
+  for (int r = cgs.items(); r < 16; r++)
+    cgs.row(r);
 
- if (_iva != nessuna_iva)
- {
-  TSheet_field& ivas = (TSheet_field&)m.field(F_SHEETIVA);
-  for (r = ivas.items(); r < 16; r++) ivas.row(r);
-  ivas.enable_column(4, _iva == iva_acquisti);
- }
+  if (_iva != nessuna_iva)
+  {
+    TSheet_field& ivas = (TSheet_field&)m.field(F_SHEETIVA);
+    for (r = ivas.items(); r < 16; r++) ivas.row(r);
+    ivas.enable_column(4, _iva == iva_acquisti);
+  }
 }
 
 
@@ -269,352 +270,352 @@ void TPrimanota_application::fill_sheet(TMask& m) const
 // Certified 100%
 const char* TPrimanota_application::get_next_key()
 {
- return format("%d|%ld", F_NUMREG, _lastreg+1);
+  return format("%d|%ld", F_NUMREG, _lastreg+1);
 }
 
 
 void TPrimanota_application::init_insert_mode(TMask& m)
 {
- m.set(F_DATAREG, _msk[0]->get(F_DATAREG));
- m.set(F_DATACOMP, _msk[0]->get(F_DATACOMP));
- m.set(F_ANNOES, _msk[0]->get(F_ANNOES));
- m.set(F_ANNOIVA, _msk[0]->get(F_ANNOIVA));
- occas_mask().reset();
+  m.set(F_DATAREG, _msk[0]->get(F_DATAREG));
+  m.set(F_DATACOMP, _msk[0]->get(F_DATACOMP));
+  m.set(F_ANNOES, _msk[0]->get(F_ANNOES));
+  m.set(F_ANNOIVA, _msk[0]->get(F_ANNOIVA));
+  occas_mask().reset();
 
- init_mask(m);
- _saldi.reset();                        // Inizializza saldi
- _saldi.set_movprovv(_rel->lfile()->get_char("PROVVIS") > ' ' ? TRUE : FALSE);
- _saldi.set_movap(_causale.apertura());
- _saldi.set_anno_es(m.get_int(F_ANNOES));
- _saldi.set_num_ulmov(m.get_long(F_NUMREG));
- _saldi.set_data_ulmov(TDate(m.get(F_DATAREG)));
+  init_mask(m);
+  _saldi.reset();                        // Inizializza saldi
+  _saldi.set_movprovv(_rel->lfile()->get_char("PROVVIS") > ' ' ? TRUE : FALSE);
+  _saldi.set_movap(_causale.apertura());
+  _saldi.set_anno_es(m.get_int(F_ANNOES));
+  _saldi.set_num_ulmov(m.get_long(F_NUMREG));
+  _saldi.set_data_ulmov(TDate(m.get(F_DATAREG)));
 
- if (_iva != nessuna_iva)
- {    
-   const long protiva = causale().reg().protocol();
-   m.set(F_PROTIVA, protiva+1);
- 
-   TMask_field& vv = m.field(F_VISVAL);       
+  if (_iva != nessuna_iva)
+  {    
+    const long protiva = causale().reg().protocol();
+    m.set(F_PROTIVA, protiva+1);
+    
+    TMask_field& vv = m.field(F_VISVAL);       
     if (vv.active() && vv.get() == "X")                // Se e' un movimento in valuta
-   { 
-     const bool ok = m.field(F_VALUTA).on_key(K_F9);  // Richiedi valuta
-     vv.set(ok ? "X" : " ");               
-     if (ok) vv.on_hit();                             // Cambia decimali
+    { 
+      const bool ok = m.field(F_VALUTA).on_key(K_F9);  // Richiedi valuta
+      vv.set(ok ? "X" : " ");               
+      if (ok) vv.on_hit();                             // Cambia decimali
     }  
   }  
 
- if (m.get(F_CODCAUS).empty()) return;
-                      
+  if (m.get(F_CODCAUS).empty()) return;
+  
   TString80 desc;                    
- for (int i = 1; i < _causale.size(); i++)
- {
-  TRectype* rcaus = (TRectype*)_causale.objptr(i);
-  if (rcaus == NULL) continue;        // Evita eventuali righe nulle
-
-  const int nriga = rcaus->get_int(RCA_NRIGA);
-  if (nriga < 1) continue;            // Considera solo righe reali (non riempimenti)
-
-  TConto tc; _causale.bill(nriga, tc);
-  if (tc.conto() < 1) continue;       // Considera solo conti validi
-
-  desc = rcaus->get(RCA_DESC);
-
-  if (iva() == nessuna_iva)
+  for (int i = 1; i < _causale.size(); i++)
   {
-   set_cgs_row(-1,ZERO,tc,desc,' ');
-  }
-  else
-  {
-   if (nriga == 3 || nriga == 4 || nriga == 8 || nriga == 9)
-    continue;       // Conti per IVA detraibile e non, ritenute sociali e fiscali
+    TRectype* rcaus = (TRectype*)_causale.objptr(i);
+    if (rcaus == NULL) continue;        // Evita eventuali righe nulle
 
-   const bool rigaiva = rcaus->get_bool(RCA_RIGAIVA);
-   if (nriga == 2 || (nriga >= 5 && nriga <= 7) || rigaiva)
-   {
-     const TString16 codiva(rcaus->get(RCA_CODIVA));
-     set_ivas_row(-1,codiva,tc,desc);
-   }
-   else
-   {
-    const char tipo = nriga < 2 ? 'T' : ' ';
-    set_cgs_row(-1,ZERO,tc,desc,tipo);
-    
-    if (nriga == 1 && tc.tipo() > ' ' && tc.sottoconto() > 0)
-      m.set(tc.tipo() == 'C' ? F_CLIENTE : F_FORNITORE, tc.sottoconto());
-   }
+    const int nriga = rcaus->get_int(RCA_NRIGA);
+    if (nriga < 1) continue;            // Considera solo righe reali (non riempimenti)
+
+    TConto tc; _causale.bill(nriga, tc);
+    if (tc.conto() < 1) continue;       // Considera solo conti validi
+
+    desc = rcaus->get(RCA_DESC);
+
+    if (iva() == nessuna_iva)
+    {
+      set_cgs_row(-1,ZERO,tc,desc,' ');
+    }
+    else
+    {
+      if (nriga == 3 || nriga == 4 || nriga == 8 || nriga == 9)
+        continue;       // Conti per IVA detraibile e non, ritenute sociali e fiscali
+
+      const bool rigaiva = rcaus->get_bool(RCA_RIGAIVA);
+      if (nriga == 2 || (nriga >= 5 && nriga <= 7) || rigaiva)
+      {
+        const TString16 codiva(rcaus->get(RCA_CODIVA));
+        set_ivas_row(-1,codiva,tc,desc);
+      }
+      else
+      {
+        const char tipo = nriga < 2 ? 'T' : ' ';
+        set_cgs_row(-1,ZERO,tc,desc,tipo);
+        
+        if (nriga == 1 && tc.tipo() > ' ' && tc.sottoconto() > 0)
+          m.set(tc.tipo() == 'C' ? F_CLIENTE : F_FORNITORE, tc.sottoconto());
+      }
+    }
   }
- }
 }
 
 
 void TPrimanota_application::init_modify_mode(TMask& m)
 {
- init_mask(m);
+  init_mask(m);
 }
 
 
 bool TPrimanota_application::get_conto(int r, TConto& c) const
 {
- const TRectype& cg = _rel->cg(r);
- c.set(cg.get_int("GRUPPO"), cg.get_int("CONTO"),
-    cg.get_long("SOTTOCONTO"), cg.get_char("TIPOC"));
- return c.ok();
+  const TRectype& cg = _rel->cg(r);
+  c.set(cg.get_int("GRUPPO"), cg.get_int("CONTO"),
+        cg.get_long("SOTTOCONTO"), cg.get_char("TIPOC"));
+  return c.ok();
 }
 
 
 int TPrimanota_application::read(TMask& m)
 {
- m.autoload(_rel);
+  m.autoload(_rel);
+  
+  if (_iva != nessuna_iva)
+  { 
+    const TString16 occode(_rel->lfile()->get("OCFPI"));
+    occas_mask().set(O_CODICE, occode);
     
- if (_iva != nessuna_iva)
- { 
-   const TString16 occode(_rel->lfile()->get("OCFPI"));
-   occas_mask().set(O_CODICE, occode);
- 
-  const char clifo = toupper(m.get(F_CLIFO)[0]);
+    const char clifo = toupper(m.get(F_CLIFO)[0]);
 
-  if (_iva == iva_acquisti && clifo == 'C')
-   error_box("Registrazione di acquisto attribuita ad un cliente"); else
-  if (_iva == iva_vendite && clifo == 'F')
-   error_box("Registrazione di vendita attribuita ad un fornitore");
+    if (_iva == iva_acquisti && clifo == 'C')
+      error_box("Registrazione di acquisto attribuita ad un cliente"); else
+        if (_iva == iva_vendite && clifo == 'F')
+          error_box("Registrazione di vendita attribuita ad un fornitore");
 
-  if (_iva == iva_vendite)
-  {
-   TEdit_field& f = (TEdit_field&)m.field(F_CLIENTE);
-   f.check_type(clifo == 'C' ? CHECK_REQUIRED : CHECK_NORMAL);
+    if (_iva == iva_vendite)
+    {
+      TEdit_field& f = (TEdit_field&)m.field(F_CLIENTE);
+      f.check_type(clifo == 'C' ? CHECK_REQUIRED : CHECK_NORMAL);
+    }
   }
- }
 
- TSheet_field& cgs = (TSheet_field&)m.field(F_SHEETCG);
- cgs.reset();
- 
- _saldi.reset(); // Azzera saldi
- _saldi.set_movprovv(_rel->lfile()->get_char("PROVVIS") > ' ' ? TRUE : FALSE);
- _saldi.set_movap(_causale.apertura());
- _saldi.set_anno_es(m.get_int(F_ANNOES));
- _saldi.set_num_ulmov(m.get_long(F_NUMREG));
- _saldi.set_data_ulmov((TDate)m.get(F_DATAREG));
+  TSheet_field& cgs = (TSheet_field&)m.field(F_SHEETCG);
+  cgs.reset();
+  
+  _saldi.reset(); // Azzera saldi
+  _saldi.set_movprovv(_rel->lfile()->get_char("PROVVIS") > ' ' ? TRUE : FALSE);
+  _saldi.set_movap(_causale.apertura());
+  _saldi.set_anno_es(m.get_int(F_ANNOES));
+  _saldi.set_num_ulmov(m.get_long(F_NUMREG));
+  _saldi.set_data_ulmov((TDate)m.get(F_DATAREG));
 
- TToken_string riga(180);
+  TToken_string riga(180);
 
- for (int i = 0; i < _rel->cg_items(); i++)
- {
-  TRectype& r = _rel->cg(i);
-  riga.cut(0);                                 // Vuota la riga
+  for (int i = 0; i < _rel->cg_items(); i++)
+  {
+    TRectype& r = _rel->cg(i);
+    riga.cut(0);                                 // Vuota la riga
 
-  const real im(r.get_real("IMPORTO"));
-  const char sezione = toupper(r.get_char("SEZIONE"));
-  const int rcontr = r.get_int("RCONTR") -1;
+    const real im(r.get_real("IMPORTO"));
+    const char sezione = toupper(r.get_char("SEZIONE"));
+    const int rcontr = r.get_int("RCONTR") -1;
 #ifdef DBG
-  if (rcontr < -1 || rcontr >= _rel->cg_items() || rcontr == i)
-   error_box("La riga %d non puo' avere per contropartita la %d", i+1, rcontr+1);
+    if (rcontr < -1 || rcontr >= _rel->cg_items() || rcontr == i)
+      error_box("La riga %d non puo' avere per contropartita la %d", i+1, rcontr+1);
 #endif
-  const bool dare =  sezione == 'D';
-  riga.add(dare ? im.string() : " ");          // Dare 101
-  riga.add(dare ? " " : im.string());          // Avere 102
+    const bool dare =  sezione == 'D';
+    riga.add(dare ? im.string() : " ");          // Dare 101
+    riga.add(dare ? " " : im.string());          // Avere 102
 
-  TConto conto;   get_conto(i, conto);
-  riga.add(conto.string(0x3));                 // Conto 103-107
-  if (conto.ok())
-   _saldi.aggiorna(conto, im, sezione, FALSE);
+    TConto conto;   get_conto(i, conto);
+    riga.add(conto.string(0x3));                 // Conto 103-107
+    if (conto.ok())
+      _saldi.aggiorna(conto, im, sezione, FALSE);
     
     riga.add("");                                // Codice descrizione 108
-  riga.add(r.get("DESCR"));                    // Descrizione riga 109
+    riga.add(r.get("DESCR"));                    // Descrizione riga 109
 
-  if (rcontr >= 0 && rcontr < _rel->cg_items())
-  {
-   get_conto(rcontr, conto);
-   riga.add(conto.string(0x3));               // Contropartita 110-114
+    if (rcontr >= 0 && rcontr < _rel->cg_items())
+    {
+      get_conto(rcontr, conto);
+      riga.add(conto.string(0x3));               // Contropartita 110-114
+    }
+    else riga.add(" | | | | ");
+
+    const char* tipo = r.get("ROWTYPE");         // Tipo di riga 115
+    riga.add(tipo);
+
+    cgs.row(i) = riga;
+    disable_cgs_cells(i, *tipo);
   }
-  else riga.add(" | | | | ");
 
-  const char* tipo = r.get("ROWTYPE");         // Tipo di riga 115
-  riga.add(tipo);
-
-  cgs.row(i) = riga;
-  disable_cgs_cells(i, *tipo);
- }
-
- if (_iva == nessuna_iva) 
-   return _rel->status();
- 
- const bool solaiva = i == 0;
- m.set(F_SOLAIVA, solaiva ? "X" : " ");
- m.field(F_SOLAIVA).on_hit();
+  if (_iva == nessuna_iva) 
+    return _rel->status();
   
- TSheet_field& ivas = (TSheet_field&)m.field(F_SHEETIVA);
- ivas.reset();
+  const bool solaiva = i == 0;
+  m.set(F_SOLAIVA, solaiva ? "X" : " ");
+  m.field(F_SOLAIVA).on_hit();
+  
+  TSheet_field& ivas = (TSheet_field&)m.field(F_SHEETIVA);
+  ivas.reset();
 
- for (i = 0; i < _rel->iva_items(); i++)
- {
-  TRectype& r = _rel->iva(i);
-  riga.cut(0);
-
-  riga.add(r.get("IMPONIBILE"));       // Imponibile 101
-  riga.add(r.get("CODIVA"));           // IVA        102
-  riga.add(r.get("IMPOSTA"));          // Imposta    103
-  riga.add(r.get("TIPOCR"));           // C/R        104
-  riga.add(r.get("TIPODET"));          // Detrazione 105
-
-  int rigaimp = solaiva ? 0 : r.get_int("RIGAIMP");
-  if (rigaimp > 0)
+  for (i = 0; i < _rel->iva_items(); i++)
   {
-   const int r = rigaimp-1;
-   if (r < cgs.items())
-   {
-    TToken_string& s = cgs.row(r);
-    riga.add(s.get(2));              // Tipo conto 106
-    for (int i = 0; i < 4; i++)
-     riga.add(s.get());             // Gruppo|Conto|Sottoconto|Descrizione
-   }
-   else
-   {
-    error_box("Riga imponibile %d errata nella riga iva %d", rigaimp, i+1);
-    rigaimp = 0;
-   }
+    TRectype& r = _rel->iva(i);
+    riga.cut(0);
+
+    riga.add(r.get("IMPONIBILE"));       // Imponibile 101
+    riga.add(r.get("CODIVA"));           // IVA        102
+    riga.add(r.get("TIPODET"));          // Detrazione 103
+    riga.add(r.get("IMPOSTA"));          // Imposta    104
+    riga.add(r.get("TIPOCR"));           // C/R        105
+
+    int rigaimp = solaiva ? 0 : r.get_int("RIGAIMP");
+    if (rigaimp > 0)
+    {
+      const int r = rigaimp-1;
+      if (r < cgs.items())
+      {
+        TToken_string& s = cgs.row(r);
+        riga.add(s.get(2));              // Tipo conto 106
+        for (int i = 0; i < 4; i++)
+          riga.add(s.get());             // Gruppo|Conto|Sottoconto|Descrizione
+      }
+      else
+      {
+        error_box("Riga imponibile %d errata nella riga iva %d", rigaimp, i+1);
+        rigaimp = 0;
+      }
+    }
+    if (rigaimp < 1) riga.add(" | | | | ");
+    ivas.row(i) = riga;
   }
-  if (rigaimp < 1) riga.add(" | | | | ");
-  ivas.row(i) = riga;
- }
 
   TMask_field& vv = m.field(F_VISVAL);
   if (vv.active()) vv.on_hit();
 
- return _rel->status();
+  return _rel->status();
 }
 
 
 
 void TPrimanota_application::mask2rel(const TMask& m)
 {
- _rel->lfile()->zero();
- m.autosave(_rel);
- 
- const long numreg = m.get_long(F_NUMREG);
- const TDate datareg(m.get(F_DATAREG));
- const int annoes = (int) m.get_long(F_ANNOES);
+  _rel->lfile()->zero();
+  m.autosave(_rel);
+  
+  const long numreg = m.get_long(F_NUMREG);
+  const TDate datareg(m.get(F_DATAREG));
+  const int annoes = (int) m.get_long(F_ANNOES);
 
- _saldi.set_movprovv(m.get_bool(F_PROVVISORIO));
- _saldi.set_movap(_causale.apertura());
- _saldi.set_anno_es(annoes);
+  _saldi.set_movprovv(m.get_bool(F_PROVVISORIO));
+  _saldi.set_movap(_causale.apertura());
+  _saldi.set_anno_es(annoes);
 
- _rel->destroy_rows();                  // Destroy all records
- cgs_pack();                            // Destroy all null rows
+  _rel->destroy_rows();                  // Destroy all records
+  cgs_pack();                            // Destroy all null rows
 
- TArray& rows = cgs().rows_array();
+  TArray& rows = cgs().rows_array();
   int cur = 1;                      
 
- // Controlla se e' un movimento con righe contabili
- if (iva() == nessuna_iva || !m.get_bool(F_SOLAIVA))  
- for (int i = 0; i < rows.items(); i++)
- {
-  TToken_string& row = (TToken_string&)rows[i];
+  // Controlla se e' un movimento con righe contabili
+  if (iva() == nessuna_iva || !m.get_bool(F_SOLAIVA))  
+    for (int i = 0; i < rows.items(); i++)
+    {
+      TToken_string& row = (TToken_string&)rows[i];
 
-  TRectype &r = _rel->cg(cur-1);
-  r.zero();
-  r.put("NUMREG", numreg);
-  r.put("ANNOES", annoes);
-  r.put("DATAREG", datareg);
-  r.put("NUMRIG", cur);
+      TRectype &r = _rel->cg(cur-1);
+      r.zero();
+      r.put("NUMREG", numreg);
+      r.put("ANNOES", annoes);
+      r.put("DATAREG", datareg);
+      r.put("NUMRIG", cur);
 
-  char sezione = 'D';
+      char sezione = 'D';
 
-  const char* n = row.get(0);
-  real val0(n);    // Dare
-  n = row.get();
-  real val1(n);    // Avere
+      const char* n = row.get(0);
+      real val0(n);    // Dare
+      n = row.get();
+      real val1(n);    // Avere
 
-  if (val0.is_zero())
-  {
-   sezione = 'A';
-   val0 = val1;
-  }
+      if (val0.is_zero())
+      {
+        sezione = 'A';
+        val0 = val1;
+      }
 
-  r.put("IMPORTO", val0);               // Importo
-  r.put("SEZIONE", sezione);            // Sezione
+      r.put("IMPORTO", val0);               // Importo
+      r.put("SEZIONE", sezione);            // Sezione
 
-  const TConto conto(row, -1, 0x3);
-  if (conto.ok())
-   _saldi.aggiorna(conto, val0, sezione, TRUE);
+      const TConto conto(row, -1, 0x3);
+      if (conto.ok())
+        _saldi.aggiorna(conto, val0, sezione, TRUE);
 
-  r.put("TIPOC", conto.tipo());         // Conto
-  r.put("GRUPPO", conto.gruppo());
-  r.put("CONTO", conto.conto());
-  r.put("SOTTOCONTO", conto.sottoconto());
-    
-    row.get();                            // Codice descrizione
-  r.put("DESCR", row.get());            // Descrizione riga
-
-  int rcontr = 0;                       // Riga contropartita
-  const TConto contro(row, -1, 0x3);    // Conto contropartita
-  if (contro.ok())
-  {
-   rcontr = bill2contr(contro, sezione)+1;
-   if (rcontr < 1)
-   {
-    warning_box("La riga contabile %d non ha una contropartita", cur);
-    rcontr = 0;
-   }
-  }
-  r.put("RCONTR", rcontr);    // Contropartita
-  r.put("ROWTYPE", row.get());
-  cur++;
- }
-
- if (_iva == nessuna_iva) return;
+      r.put("TIPOC", conto.tipo());         // Conto
+      r.put("GRUPPO", conto.gruppo());
+      r.put("CONTO", conto.conto());
+      r.put("SOTTOCONTO", conto.sottoconto());
       
-  int err = ~NOERR;    
- if (m.get_bool(F_OCCASIONALE)) 
- {
-   TRelation occas(LF_OCCAS);
-   const TMask& om = occas_mask();
-   om.autosave(&occas);
-   
-   err = occas.write();
-   if (err == _isreinsert)
-     err = occas.rewrite();
+      row.get();                            // Codice descrizione
+      r.put("DESCR", row.get());            // Descrizione riga
+
+      int rcontr = 0;                       // Riga contropartita
+      const TConto contro(row, -1, 0x3);    // Conto contropartita
+      if (contro.ok())
+      {
+        rcontr = bill2contr(contro, sezione)+1;
+        if (rcontr < 1)
+        {
+          warning_box("La riga contabile %d non ha una contropartita", cur);
+          rcontr = 0;
+        }
+      }
+      r.put("RCONTR", rcontr);    // Contropartita
+      r.put("ROWTYPE", row.get());
+      cur++;
+    }
+
+  if (_iva == nessuna_iva) return;
   
-   if (err == NOERR)
+  int err = ~NOERR;    
+  if (m.get_bool(F_OCCASIONALE)) 
+  {
+    TRelation occas(LF_OCCAS);
+    const TMask& om = occas_mask();
+    om.autosave(&occas);
+    
+    err = occas.write();
+    if (err == _isreinsert)
+      err = occas.rewrite();
+    
+    if (err == NOERR)
       _rel->lfile()->put("OCFPI", occas_mask().get(O_CODICE));
     else
       error_box("Errore di scrittura sul file dei clienti/fornitori occasionali: %d", err);  
   }
   if (err) _rel->lfile()->zero("OCFPI");
   
- TArray& irows = ivas().rows_array();
- cur = 1;
- for (int i = 0; i < irows.items(); i++)
- {
-  TToken_string& row = (TToken_string&)irows[i];
-  if (row.empty_items())
-   continue;
+  TArray& irows = ivas().rows_array();
+  cur = 1;
+  for (int i = 0; i < irows.items(); i++)
+  {
+    TToken_string& row = (TToken_string&)irows[i];
+    if (row.empty_items())
+      continue;
 
-  TRectype &r = _rel->iva(cur-1);
-  r.zero();
-  r.put("ANNOES", annoes);
-  r.put("NUMREG", numreg);
-  r.put("NUMRIG", cur);
+    TRectype &r = _rel->iva(cur-1);
+    r.zero();
+    r.put("ANNOES", annoes);
+    r.put("NUMREG", numreg);
+    r.put("NUMRIG", cur);
 
-  const char* imponibile = row.get(0);
-  r.put("IMPONIBILE", imponibile);
-  r.put("CODIVA", row.get());
+    const char* imponibile = row.get(0);
+    r.put("IMPONIBILE", imponibile);
+    r.put("CODIVA", row.get());
 
-  const char* imposta = row.get();
-  r.put("IMPOSTA", imposta);
+    const char* imposta = row.get();
+    r.put("IMPOSTA", imposta);
 
-  r.put("TIPOCR", row.get());
-  r.put("TIPODET", row.get());
+    r.put("TIPOCR", row.get());
+    r.put("TIPODET", row.get());
 
-  const TConto c(row, -1, 0x1);
-  const int rimp = bill2pos(c, 'I')+1;
-  r.put("RIGAIMP", rimp);
-  cur++;
- } 
-         
- // Resetta il flag di calcolato sulla liquidazione IVA del mese di registrazione        
- const TDate d(m.get(F_DATAREG));
- TString16 chiave; chiave << d.year() << d.month();
- TTable lim("LIM");
+    const TConto c(row, -1, 0x1);
+    const int rimp = bill2pos(c, 'I')+1;
+    r.put("RIGAIMP", rimp);
+    cur++;
+  } 
+  
+  // Resetta il flag di calcolato sulla liquidazione IVA del mese di registrazione        
+  const TDate d(m.get(F_DATAREG));
+  TString16 chiave; chiave << d.year() << d.month();
+  TTable lim("LIM");
   lim.put("CODTAB", chiave);
   if (lim.read() == NOERR)
   {
@@ -633,35 +634,35 @@ int TPrimanota_application::write(const TMask& m)
   const long numreg = m.get_long(F_NUMREG);
   if (numreg > _lastreg) _lastreg = numreg;
 
- mask2rel(m);
- const int err = _rel->write(TRUE);
- if (err == NOERR)
- {
-  _saldi.registra();
-  const TString16 causimm(_causale.causale_inc_imm());
-  if (causimm.not_empty())
-    genera_incasso(causimm);
- } 
- return err;
+  mask2rel(m);
+  const int err = _rel->write(TRUE);
+  if (err == NOERR)
+  {
+    _saldi.registra();
+    const TString16 causimm(_causale.causale_inc_imm());
+    if (causimm.not_empty())
+      genera_incasso(causimm);
+  } 
+  return err;
 }
 
 
 int TPrimanota_application::rewrite(const TMask& m)
 {
- mask2rel(m);
- const int err = _rel->rewrite(TRUE);
- if (err == NOERR)
-  _saldi.registra();
- return err;
+  mask2rel(m);
+  const int err = _rel->rewrite(TRUE);
+  if (err == NOERR)
+    _saldi.registra();
+  return err;
 }
 
 
 bool TPrimanota_application::remove()
 {
- const bool ok = TRelation_application::remove();
- if (ok)
-  _saldi.registra();
- return ok;
+  const bool ok = TRelation_application::remove();
+  if (ok)
+    _saldi.registra();
+  return ok;
 }
 
 
@@ -686,7 +687,7 @@ void TPrimanota_application::genera_incasso(const char* causimm)
   if (m.run() == K_SAVE)
   {
     TMovimentoPN inc;                  // Nuovo movimento di incasso immediato
-  
+    
     TRectype r(_rel->cg(0));           // Copia la prima riga contabile
     m.autosave(&inc);
     
@@ -703,16 +704,16 @@ void TPrimanota_application::genera_incasso(const char* causimm)
     inc.cg(0) = r;
 
     TConto conto; caus.bill(2, conto);            // Conto della seconda riga della causale
-  
-  r.put("TIPOC", conto.tipo());            
-  r.put("GRUPPO", conto.gruppo());
-  r.put("CONTO", conto.conto());
-  r.put("SOTTOCONTO", conto.sottoconto());
+    
+    r.put("TIPOC", conto.tipo());            
+    r.put("GRUPPO", conto.gruppo());
+    r.put("CONTO", conto.conto());
+    r.put("SOTTOCONTO", conto.sottoconto());
 
     r.put("NUMRIG", 2);
     r.put("SEZIONE", sez);
     inc.cg(1) = r;
- 
+    
     while (inc.write() == _isreinsert)            // In caso di riscrittura
       inc.lfile()->put("NUMREG", ++_lastreg);     // Incrementa numero registrazione
   }