corretto errori MI6121, MI6123, MI6124, MI6141, MI6145, MI6151, MI3455

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

cg/cg1500.cpp

@@ -2934,6 +2934,8 @@ void CG1500_application::set_page(int file, int counter)
           if (_stampa_width == 132)
           { 
             set_row(r,"@1g%6ld",(const char*)_sottoconto);
+            if ((_saldo_dare != ZERO) || (_saldo_avere != ZERO) || (_mov_dare != ZERO) ||
+            	 (_mov_avere != ZERO) || (_saldofinale != ZERO))
             	set_row(r," %s",(const char*)udata);
             set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@99g%r@114g!@115g%r",_d,&_saldo_dare,
                     &_saldo_avere,&_mov_dare,&_mov_avere,&_saldofinale); 
@@ -2945,6 +2947,8 @@ void CG1500_application::set_page(int file, int counter)
           else if (app == 'D')
           {
             set_row(r,"@1g%6ld",(const char*)_sottoconto);
+            if ((_saldo_dare != ZERO) || (_saldo_avere != ZERO) || (_mov_dare != ZERO) ||
+            	 (_mov_avere != ZERO) || (_saldofinale != ZERO))
             	set_row(r," %s",(const char*)udata);
             set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@116g%r@148g!",_d,
                     &_saldo_dare,&_saldo_avere,&_mov_dare,&_mov_avere,&_saldofinale);
@@ -2954,6 +2958,8 @@ void CG1500_application::set_page(int file, int counter)
           else
           {
             set_row(r,"@1g%6ld",(const char*)_sottoconto);
+            if ((_saldo_dare != ZERO) || (_saldo_avere != ZERO) || (_mov_dare != ZERO) ||
+            	 (_mov_avere != ZERO) || (_saldofinale != ZERO))
             	set_row(r," %s",(const char*)udata);
             set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@132g%r@148g!",
                     _d,&_saldo_dare,&_saldo_avere,&_mov_dare,&_mov_avere,&_saldofinale);
@@ -3014,6 +3020,9 @@ void CG1500_application::set_page(int file, int counter)
             if (_stampa_width == 132)
             {       
               set_row(r,"@1g%6ld",(const char*)_sottoconto_succ);
+              if ((_saldoini_dare_succ != ZERO) || (_saldoini_avere_succ != ZERO) ||
+              		(_mov_dare_succ != ZERO) || (_mov_avere_succ != ZERO) || 
+              		(_saldofinale_succ != ZERO))
              		set_row(r," %s",(const char*)udata);
               set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@99g%r@114g!@115g%r",
                       _d,&_saldoini_dare_succ,&_saldoini_avere_succ,
@@ -3026,6 +3035,9 @@ void CG1500_application::set_page(int file, int counter)
             else if (app == 'D')
             {
               set_row(r,"@1g%6ld",(const char*)_sottoconto_succ);
+              if ((_saldoini_dare_succ != ZERO) || (_saldoini_avere_succ != ZERO) ||
+              		(_mov_dare_succ != ZERO) || (_mov_avere_succ != ZERO) || 
+              		(_saldofinale_succ != ZERO))
               	set_row(r," %s",(const char*)udata);
               set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@116g%r@148g!",
                       _d,&_saldoini_dare_succ,&_saldoini_avere_succ,
@@ -3036,6 +3048,9 @@ void CG1500_application::set_page(int file, int counter)
             else
             {
               set_row(r,"@1g%6ld",(const char*)_sottoconto_succ);
+              if ((_saldoini_dare_succ != ZERO) || (_saldoini_avere_succ != ZERO) ||
+              		(_mov_dare_succ != ZERO) || (_mov_avere_succ != ZERO) || 
+              		(_saldofinale_succ != ZERO))
               	set_row(r," %s",(const char*)udata);
               set_row(r,"@18g#a@49g!@50g%r@67g%r@82g!@83g%r@100g%r@115g!@132g%r@148g!",
                       _d,&_saldoini_dare_succ,&_saldoini_avere_succ,

cg/cg3200.cpp

@@ -79,7 +79,7 @@ class TMastrini_application : public TPrintapp
   int  _annomsk,_annoesmsk,_annoes,_annomsksucc,_tipo_mask,_anno_ghost;
   int  _anno_corrente,_anno_precedente,_indbil,_numero_pag;
   long _sottoc,_numreg,_numgio,_protiva;
-  bool _stampa_progressivi_si,_competenza,_inizio_stampa,_puoi_stampare,_stampa_footer_si;
+  bool _stampa_progressivi_si,_competenza,/*_inizio_stampa,*/_puoi_stampare,_stampa_footer_si;
   bool _cambia_mastrino,_gia_stampata_intestazione;
   char _tmcf,_tipo_contr; 
 
@@ -638,6 +638,7 @@ bool TMastrini_application::almeno_un_record()
       if (_mov->bad())
         _mov->zero();
       datacomp = (_mov->curr().get(MOV_DATACOMP));
+	    TString provvis (_mov->curr().get(MOV_PROVVIS));
 	      
       if (_annomsk == 0)
         datareg = rmov.get_date(RMV_DATAREG);
@@ -651,7 +652,7 @@ bool TMastrini_application::almeno_un_record()
       if ((gruppo != _gruppo)||(conto != _conto)||(sottoc != _sottoc))
         break;
       else
-        if (((annoes==_annomsk)||(_annomsk==0))&&((datareg>=_data_ini)&&(datareg<=_data_fine)))
+        if ( ((annoes==_annomsk) || (_annomsk==0)) && ((datareg>=_data_ini) && (datareg<=_data_fine)) && (_stampa_mov_prov || provvis.trim().empty()))
         {
           trovato = TRUE;
           break;
@@ -777,20 +778,30 @@ void TMastrini_application::saldi_zero()
   
     while (!rmov.eof())
     {
-      //rmov.read();
+	  	long numreg = rmov.get_long(RMV_NUMREG);
-      char sezione = rmov.curr().get(RMV_SEZIONE)[0];
+	    _mov->setkey(1);
-      real importo = rmov.curr().get_real(RMV_IMPORTO);
+	    _mov->curr().zero();
+	    _mov->curr().put(MOV_NUMREG,numreg);
+	    _mov->read();
+	    if (_mov->bad())
+	      _mov->zero();
+	    TString provvis (_mov->curr().get(MOV_PROVVIS));
    	  int gruppo = atoi(rmov.get(RMV_GRUPPO));
      	int conto = atoi(rmov.get(RMV_CONTO));
      	long sottoc = atol(rmov.get(RMV_SOTTOCONTO));
 
      	if ((gruppo == _gruppo)&&(conto == _conto)&&(sottoc == _sottoc)) 
      	{
+	    	if (_stampa_mov_prov || provvis.trim().empty())
+	    	{
+	      	char sezione = rmov.curr().get(RMV_SEZIONE)[0];
+  	    	real importo = rmov.curr().get_real(RMV_IMPORTO);
         	if (sezione == 'D')
           	saldo_dare += importo;
         	else if (sezione == 'A')
                	saldo_avere += importo;
 				}               	
+      }
       else break;
       rmov.next();
     }
@@ -1911,6 +1922,8 @@ bool TMastrini_application::preprocess_page(int file, int counter)
                   dep_avere = _riporto_footer_avere;
                 }
 								
+								if (_nummast != 3 || dep_dare != ZERO || dep_avere != ZERO)
+								{  
 	                TString dare  (dep_dare.string("###.###.###.###"));
 	                TString avere (dep_avere.string("###.###.###.###"));
 	                if (_numcarat == 1)                  
@@ -1924,6 +1937,7 @@ bool TMastrini_application::preprocess_page(int file, int counter)
 	                    set_row (_rw,"@32gA RIPORTO@101g%s", (const char*) dare);
 	                    set_row (_rw,"@117g%s", (const char*) avere);
 	                  }        
+								}	                         
                 if (lim == 0)
                 {
                   rmov.prev();
@@ -2433,8 +2447,11 @@ bool TMastrini_application::set_print(int)
     if (_stampatotiva)   
       _b.destroy();
 
-    _inizio_stampa   = TRUE;    
+    //_inizio_stampa   = TRUE;    
     _numero_pag      = 1;
+    if (_nummast == 3)
+    	_pagina = 0;
+		else    	
     	_pagina          = 1;
     _cambia_mastrino = FALSE; 
     _rw              = 0;
@@ -2547,6 +2564,8 @@ void TMastrini_application::preprocess_footer()
       dep_avere = _stampato ? _riporto_footer_avere : _riporto_footer_avere - imp_a;
     }
 		
+		if (_nummast != 3 || dep_dare != ZERO || dep_avere != ZERO)
+		{		  
 	    TString dare  (dep_dare.string("###.###.###.###"));
 	    TString avere (dep_avere.string("###.###.###.###"));
 	    if (_numcarat == 1)                  
@@ -2561,6 +2580,7 @@ void TMastrini_application::preprocess_footer()
 	        set_footer (2,"@117g%s", (const char*) avere);
 	      }  
 		}				      
+  }                
 }  
 
 void TMastrini_application::conto(int gruppo, int conto, bool no_contropartita)
@@ -2639,17 +2659,26 @@ void TMastrini_application::ricerca_dati_ditta()
 void TMastrini_application::crea_intestazione()
 {
   TString sep(132),sep1(198); 
+  sep = "";
 
   reset_header();
   
+  int np = get_page_number();
+  
   if (_cambia_mastrino)
   { 
+  	if (_nummast != 3)
     	_pagina = 1;
     _cambia_mastrino = FALSE;
   }
-               
   if (_numcarat == 1)
   {
+  	if (_nummast == 3)
+  	{
+  		if (_pagina != np)
+  			sep << "Pag. @#";
+		}  		
+  	else
     	sep << "Pag. " << _pagina;
     sep.right_just(132);
     set_header(1,(const char*) sep);
@@ -2659,6 +2688,12 @@ void TMastrini_application::crea_intestazione()
   }
   else if (_numcarat == 2)
        {
+       	 if (_nummast == 3)
+				 {       	 
+				 	 if (_pagina != np)
+  				 	sep1 << "Pagina @#";
+				 }	  				 
+				 else       	 
          	 sep1 << "Pagina " << _pagina;
          sep1.right_just(198);
          set_header(1,(const char*) sep1);
@@ -2666,9 +2701,11 @@ void TMastrini_application::crea_intestazione()
          set_header(2,"@1g%s",(const char*) sep1);       
          //set_header(1,"@190gPagina %2d", _numero_pag++);
        }
-     
+	if (_nummast != 3)     
   	_pagina++;
 	
+	if (_nummast != 3 || _pagina != np)
+	{
   	set_header (1, "@0gDITTA@6g%5ld", _codice_ditta);
   	set_header (1, "@12g%-.45s", (const char*) _ragsoc);
   	set_header (1, "@59g%s", (const char*) _indulc);
@@ -2676,7 +2713,7 @@ void TMastrini_application::crea_intestazione()
   	set_header (1, "@97g%-.5s", (const char*) _capulc);
   	set_header (1, "@103g%-.18s", (const char*) _com);
   	set_header (1, "@122g%-.3s", (const char*) _prov);
-
+  }
   if (_nummast == 3)
   {
     set_header (3, "@0gSottoconto@12g@b%d", _gruppo);
@@ -2778,6 +2815,8 @@ void TMastrini_application::crea_intestazione()
     dep_dare = _stampato ? _riporto_dare : _riporto_dare - imp_d;
     dep_avere = _stampato ? _riporto_avere : _riporto_avere - imp_a;
 
+		if (_nummast != 3 || dep_dare != ZERO || dep_avere != 0)
+		{
 	    if (_numcarat == 1)
 	    {
 	      TString string = dep_dare.string("###.###.###.###");
@@ -2792,6 +2831,7 @@ void TMastrini_application::crea_intestazione()
 	      string = dep_avere.string("###.###.###.###");
 	      set_header (10,"@117g%15s",(const char*) string);
 	    }
+	  }  
     _riporto_parziale_dare = ZERO;
     _riporto_parziale_avere = ZERO;
   }
@@ -2805,15 +2845,20 @@ void TMastrini_application::crea_intestazione()
          sep1 ="";
          set_header(11,"@1g%s",(const char*) sep1);
        }
+	if (_pagina != np)
+		_pagina = np;       
 }
 
 int TMastrini_application::crea_intestazione(int start_riga)
 {
   TString   sep(132),sep1(198); 
   int       r = start_riga + 2;
+  sep = "";
 
   reset_header();
 
+	int np = get_page_number();
+	  
   _conta_mastrini++;
     
   if (_nummast == 3)
@@ -2825,20 +2870,40 @@ int TMastrini_application::crea_intestazione(int start_riga)
       _numero_pag = 1;
       _cambia_mastrino = FALSE;
     }
-  
+	if (_nummast == 3)
+	{
+		if (_pagina != np)
+		{
+		  if (_numcarat == 1)
+		  {
+		  	sep << "Pag. @#";
+		   	set_row(r,"@126g%s", (const char*) sep);
+			}	   	
+		 	else if (_numcarat == 2)
+		 	{
+		 		sep << "Pagina @#";
+	 	 		set_row(r,"@190g%s", (const char*) sep);
+			} 	 		
+		}			
+	}	       	 
+	else
+	{
 	  if (_numcarat == 1)
 	   	set_row(r,"@126gPag. %2d", _numero_pag++);
 	 	else if (_numcarat == 2)
 	       	 set_row(r,"@190gPagina %2d", _numero_pag++);
- 
+	}			       	 
+	if (_nummast != 3 || _pagina != np)
+	{
   	set_row (r, "@0gDITTA@6g%5ld", _codice_ditta);
   	set_row (r, "@12g%-45s", (const char*) _ragsoc);
   	set_row (r, "@59g%s", (const char*) _indulc);
-//  set_row (r, "@86g%-9s", (const char*) _civulc);
+		//set_row (r, "@86g%-9s", (const char*) _civulc);
   	set_row (r, "@97g%-5s", (const char*) _capulc);
   	set_row (r, "@103g%-18s", (const char*) _com);
   	set_row (r, "@122g%-3s", (const char*) _prov);
   	r += 2;                 
+	}  	
   if (_nummast == 3)
   {
     set_row (r, "@0gSottoconto@12g@b%d", _gruppo);
@@ -2904,7 +2969,8 @@ int TMastrini_application::crea_intestazione(int start_riga)
          sep1.fill('-');
          set_row (r++,"@0g%s", (const char *) sep1);
        }   
-       
+	if (_pagina != np)
+		_pagina = np;       
   return r;     
 }
           
@@ -2933,6 +2999,8 @@ void TMastrini_application::stampa_progre_riporto()
     dep_dare = _stampato ? _riporto_dare : _riporto_dare - imp_d;
     dep_avere = _stampato ? _riporto_avere : _riporto_avere - imp_a;
 		
+		if (_nummast != 3 || dep_dare != ZERO || dep_avere != 0)
+		{
 	    if (_numcarat == 1)
 	    {
 	      TString string = dep_dare.string("###.###.###.###");
@@ -2947,6 +3015,7 @@ void TMastrini_application::stampa_progre_riporto()
 	      string = dep_avere.string("###.###.###.###");
 	      set_row (_rw++,"@117g%15s",(const char*) string);
 	    }
+		}	    
     _riporto_parziale_dare = ZERO;
     _riporto_parziale_avere = ZERO;
   }
@@ -2985,6 +3054,8 @@ int TMastrini_application::stampa_progre_riporto(int start_riga)
     dep_dare = _stampato ? _riporto_dare : _riporto_dare - imp_d;
     dep_avere = _stampato ? _riporto_avere : _riporto_avere - imp_a;
 
+		if (_nummast != 3 || dep_dare != ZERO || dep_avere != ZERO)
+		{
 	    if (_numcarat == 1)
 	    {
 	      TString string = dep_dare.string("###.###.###.###");
@@ -2999,6 +3070,7 @@ int TMastrini_application::stampa_progre_riporto(int start_riga)
 	      string = dep_avere.string("###.###.###.###");
 	      set_row (r++,"@117g%15s",(const char*) string);
 	    }
+		}	    
     _riporto_parziale_dare = ZERO;
     _riporto_parziale_avere = ZERO;
   }
@@ -3135,6 +3207,12 @@ void TMastrini_application::calcola_progressivi()
          pdarep       = saldi.get_real(SLD_PDARE);
          paverep      = saldi.get_real(SLD_PAVERE);
          
+         if (_stampa_mov_prov)
+         {
+         	progredare_eseprec = pdarep + saldi.get_real(SLD_PDAREPRO);
+         	progreavere_eseprec = paverep + saldi.get_real(SLD_PAVEREPRO);
+         }
+  
          // cerca eventuale record scaricati
        }
         
@@ -3175,7 +3253,7 @@ void TMastrini_application::calcola_progressivi()
        const TRecnotype pos = saldi.recno();                                      
        // W96SALDI del 18-07-96 saldofin_esprec usa il flag TRUE xche' deve
        // considerare anche il saldo finale
-       saldo = _sld->saldofin_esprec(_anno_corrente,_gruppo,_conto,_sottoc,TRUE);
+       saldo = _sld->saldofin_esprec(_anno_corrente,_gruppo,_conto,_sottoc,TRUE,FALSE);
        saldi.readat(pos);
            
        if (saldo> ZERO)
@@ -3338,7 +3416,8 @@ void TMastrini_application::ricerca_clifo()
   }
   else
   {
-    dencom="";
+    //dencom="";
+    dencom = clifo.get(CLI_LOCCF);
     provcom="";
   }
 
@@ -3476,7 +3555,8 @@ int TMastrini_application::ricerca_clifo(int start)
   }
   else
   {
-    dencom="";
+    //dencom="";
+    dencom=clifo.get(CLI_LOCCF);
     provcom="";
   }
 

cg/cg3200a.uml

@@ -491,11 +491,11 @@ BEGIN
 END
 
 
-BOOLEAN F_MEMORIZZA
+//BOOLEAN F_MEMORIZZA
-BEGIN
+//BEGIN
-  PROMPT 4 17 "Memorizza scelte"
+//  PROMPT 4 17 "Memorizza scelte"
-  HELP "Indicare se riproporre le scelte effettuate"
+//  HELP "Indicare se riproporre le scelte effettuate"
-END
+//END
 
 ENDPAGE
 

cg/cglib01.cpp

@@ -137,6 +137,8 @@ real TSaldo::saldofin_esprec(int annoes, int g, int c, long s, bool saldo_chiusu
   const real saldo     = _saldi.get_real(SLD_SALDO);
   const real pdare     = _saldi.get_real(SLD_PDARE);
   const real pavere    = _saldi.get_real(SLD_PAVERE); 
+  const real pdarepro  = _saldi.get_real(SLD_PDAREPRO);
+  const real paverepro = _saldi.get_real(SLD_PAVEREPRO);
   const char flagsf    = _saldi.get_char(SLD_FLAGSALFIN);
   const real saldosf   = _saldi.get_real(SLD_SALDOFIN);
   
@@ -375,7 +377,10 @@ bool TSaldo::ultima_immissione_verifica(int annoes,int g,int c,long s,int indbil
         return esito;
 //    if (stp_prov == 0 && paverepro == ZERO)   
     if (stp_prov == 3 && paverepro == ZERO && pdarepro == ZERO) // Modifica del 24-09-96 errore MI0890.  
+		{
+      _saldo = _prg_dare = _prg_avere = ZERO;    // N.B. Non e' detto che funzioni sempre!!!!!!
       return esito;
+		}      
     
     if (sezione == 'A') _saldo_iniziale = -_saldo_iniziale;