Aggiornamento a nuova gestione esercizi

git-svn-id: svn://10.65.10.50/trunk@2674 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1996-03-08 08:09:23 +00:00
parent a3d2cabbbe
commit 204062b8b1
5 changed files with 91 additions and 92 deletions

View File

@ -68,7 +68,7 @@ END
NUMBER F_ANNOES 4 NUMBER F_ANNOES 4
BEGIN BEGIN
PROMPT 51 7 "Anno di esercizio " PROMPT 51 7 "Codice esercizio "
FLAGS "DRZ" FLAGS "DRZ"
END END

View File

@ -20,6 +20,7 @@
#include <attiv.h> #include <attiv.h>
#include <causali.h> #include <causali.h>
#include <nditte.h> #include <nditte.h>
#include "cglib.h"
#include "cglib03.h" #include "cglib03.h"
#include "cg2103.h" #include "cg2103.h"
@ -39,11 +40,11 @@ HIDDEN int date2esc(const TDate& d, int* prevesc = NULL);
HIDDEN const char* err_msg[] = {"La data operazione non appartiene a nessun esercizio", HIDDEN const char* err_msg[] = {"La data operazione non appartiene a nessun esercizio",
"Anno IVA non compatibile con data operazione", "Anno IVA non compatibile con data operazione",
"Data operazione successiva all'anno di competenza", "Data operazione successiva all'esercizio di competenza",
"Movimento con competenza anno precedente", "Movimento con competenza anno precedente",
"La data di competenza non appartiene a nessun esercizio", "La data di competenza non appartiene a nessun esercizio",
"Data competenza incompatibile con data operazione", "Data competenza incompatibile con data operazione",
"Anno esercizio incompatibile con data competenza", "Esercizio incompatibile con data competenza",
"Codice causale non presente in tabella", "Codice causale non presente in tabella",
"Codice causale sospeso", "Codice causale sospeso",
"Nella causale e' stato attivato il segnale non va in allegato", "Nella causale e' stato attivato il segnale non va in allegato",
@ -187,6 +188,12 @@ TDate FineEsercizio(int anno)
return fine_es; return fine_es;
} }
int EsercizioSucc(int code)
{
TEsercizi_contabili esc;
return esc.next(code);
}
bool annoes(TMask_field& f, KEY k) bool annoes(TMask_field& f, KEY k)
{ {
if (k == K_TAB) if (k == K_TAB)
@ -195,7 +202,7 @@ bool annoes(TMask_field& f, KEY k)
if ( anno != 0 ) if ( anno != 0 )
{ {
f.mask().field(F_DATAINI).set(InizioEsercizio(anno)); f.mask().field(F_DATAINI).set(InizioEsercizio(anno));
TDate fine = FineEsercizio(anno + 1); TDate fine = FineEsercizio(EsercizioSucc(anno));
if (fine == botime) if (fine == botime)
fine = FineEsercizio(anno); fine = FineEsercizio(anno);
f.mask().field(F_DATAFIN).set(fine); f.mask().field(F_DATAFIN).set(fine);
@ -250,7 +257,7 @@ bool data_fine(TMask_field& f, KEY k)
if ( anno != 0 && ( (app()._masc == "cg3100b") || if ( anno != 0 && ( (app()._masc == "cg3100b") ||
((app()._masc == "cg3100a" ) && (decidi == 2)) ) ) ((app()._masc == "cg3100a" ) && (decidi == 2)) ) )
{ {
TDate fine = FineEsercizio(anno + 1); TDate fine = FineEsercizio(EsercizioSucc(anno));
if (fine == botime) if (fine == botime)
fine = FineEsercizio(anno); fine = FineEsercizio(anno);
if (!datafin.ok()) //se la data e' vuota if (!datafin.ok()) //se la data e' vuota
@ -1568,9 +1575,11 @@ bool TListaMov_application::segnala_errori_primariga()
if ( _scelta_stampa == 0 && _stampa_anno_comp ) if ( _scelta_stampa == 0 && _stampa_anno_comp )
if (_ae != _annoeser) if (_ae != _annoeser)
{
if (_annoes) //specificato l'anno nella maschera if (_annoes) //specificato l'anno nella maschera
_err.set(2); _err.set(2);
else _err.set(3); else _err.set(3);
}
if (ae) if (ae)
{ {
@ -2446,7 +2455,7 @@ void TListaMov_application::preprocess_header()
{ {
if (_annoes != 0) if (_annoes != 0)
{ {
set_header (soh, "Anno comp. %d", _annoes); set_header (soh, "Cod. eserc.%d", _annoes);
if (_flags & ST_DATA) if (_flags & ST_DATA)
{ {
set_header (soh, "@16gda@19g%s",_data_ini.string()); set_header (soh, "@16gda@19g%s",_data_ini.string());
@ -2496,16 +2505,16 @@ void TListaMov_application::preprocess_header()
if (_flags & ST_MESS_ALLEG) if (_flags & ST_MESS_ALLEG)
{ {
if (_flags & ST_ANNO_COMP) if (_flags & ST_ANNO_COMP)
set_header (soh, "@78gcon messaggi: anno di competenza, allegato iva"); set_header (soh, "@78gcon messaggi: data competenza, allegato iva");
else else
set_header (soh, "@78gcon messaggio: allegato iva"); set_header (soh, "@78gcon messaggio: allegato iva");
} }
else if (_flags & ST_ANNO_COMP) else if (_flags & ST_ANNO_COMP)
{ {
if (_flags & ST_MESS_ALLEG) if (_flags & ST_MESS_ALLEG)
set_header (soh, "@78gcon messaggi: anno di competenza, allegato iva"); set_header (soh, "@78gcon messaggi: data competenza, allegato iva");
else else
set_header (soh, "@78gcon messaggio: anno di competenza"); set_header (soh, "@78gcon messaggio: data competenza");
} }
sep.fill('-'); sep.fill('-');
set_header (++soh, (const char *) sep); set_header (++soh, (const char *) sep);
@ -2519,7 +2528,7 @@ void TListaMov_application::preprocess_header()
{ {
if (_annoes != 0) if (_annoes != 0)
{ {
set_header (soh, "Anno comp. %d", _annoes); set_header (soh, "Cod. comp. %d", _annoes);
if (_flags & ST_DATA) if (_flags & ST_DATA)
{ {
set_header (soh, "@16gda@19g%s", (const char*)_data_ini.string()); set_header (soh, "@16gda@19g%s", (const char*)_data_ini.string());
@ -2561,7 +2570,7 @@ void TListaMov_application::preprocess_header()
set_header (soh, (const char*)sep); set_header (soh, (const char*)sep);
if (_annoes != 0) if (_annoes != 0)
{ {
set_header (soh, "@15gAnno comp %d", _annoes); set_header (soh, "@15gCod. comp %d", _annoes);
if (_flags & ST_DATA) if (_flags & ST_DATA)
{ {
set_header (soh, "@30gdalla data@41g%s", (const char*)_data_ini.string()); set_header (soh, "@30gdalla data@41g%s", (const char*)_data_ini.string());

View File

@ -31,12 +31,12 @@ END
NUMBER F_ANNO 4 NUMBER F_ANNO 4
BEGIN BEGIN
GROUP 3 GROUP 3
PROMPT 2 3 "Anno esercizio " PROMPT 2 3 "Codice esercizio "
HELP "Anno d'esercizio di cui si vuole la lista" HELP "Codice esercizio per cui si vuole la lista"
USE ESC USE ESC
CHECKTYPE NORMAL CHECKTYPE NORMAL
INPUT CODTAB F_ANNO INPUT CODTAB F_ANNO
DISPLAY "Anno" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Data inizio esercizio" D0 DISPLAY "Data inizio esercizio" D0
DISPLAY "Data fine esercizio" D1 DISPLAY "Data fine esercizio" D1
OUTPUT F_ANNO CODTAB OUTPUT F_ANNO CODTAB

View File

@ -30,12 +30,12 @@ END
NUMBER F_ANNO 4 NUMBER F_ANNO 4
BEGIN BEGIN
PROMPT 2 4 "Anno esercizio " PROMPT 2 4 "Codice esercizio "
HELP "Anno d'esercizio di cui si vuole la stampa" HELP "Codice esercizio per cui si vuole la stampa"
USE ESC KEY 1 USE ESC KEY 1
CHECKTYPE NORMAL CHECKTYPE NORMAL
INPUT CODTAB F_ANNO INPUT CODTAB F_ANNO
DISPLAY "Anno" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Data inizio esercizio" D0 DISPLAY "Data inizio esercizio" D0
DISPLAY "Data fine esercizio" D1 DISPLAY "Data fine esercizio" D1
OUTPUT F_ANNO CODTAB OUTPUT F_ANNO CODTAB

View File

@ -22,6 +22,7 @@
#include <occas.h> #include <occas.h>
#include "conto.h" #include "conto.h"
#include "cglib.h"
#include "cglib03.h" #include "cglib03.h"
#include "cg2103.h" #include "cg2103.h"
#include "cg3400a.h" #include "cg3400a.h"
@ -1508,19 +1509,8 @@ void CG3400_application::get_date_aep(int aep, TDate* in, TDate* fin)
const int es_prec(const int es_corr) const int es_prec(const int es_corr)
{ {
TTable ese("ESC"); TEsercizi_contabili esc;
TString16 first; return esc.pred(es_corr);
TString codtab;
ese.first();
first = ese.get("CODTAB");
codtab.format("%04d",es_corr);
if (codtab == first)
return 0;
return es_corr - 1;
} }
bool CG3400_application::controlla_mov_aep() bool CG3400_application::controlla_mov_aep()