root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Aggiornamento a nuova gestione esercizi

Browse Source 
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
cg/cg2100a.uml
View File

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

31
cg/cg3100.cpp
View File

@ -20,6 +20,7 @@
#include <attiv.h>
#include <causali.h>
#include <nditte.h>
#include "cglib.h"
#include "cglib03.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",
"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",
"La data di competenza non appartiene a nessun esercizio",
"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 sospeso",
"Nella causale e' stato attivato il segnale non va in allegato",
@ -187,6 +188,12 @@ TDate FineEsercizio(int anno)
return fine_es;
}
int EsercizioSucc(int code)
{
TEsercizi_contabili esc;
return esc.next(code);
}
bool annoes(TMask_field& f, KEY k)
{
if (k == K_TAB)
@ -195,7 +202,7 @@ bool annoes(TMask_field& f, KEY k)
if ( anno != 0 )
{
f.mask().field(F_DATAINI).set(InizioEsercizio(anno));
TDate fine = FineEsercizio(anno + 1);
TDate fine = FineEsercizio(EsercizioSucc(anno));
if (fine == botime)
fine = FineEsercizio(anno);
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") ||
((app()._masc == "cg3100a" ) && (decidi == 2)) ) )
{
TDate fine = FineEsercizio(anno + 1);
TDate fine = FineEsercizio(EsercizioSucc(anno));
if (fine == botime)
fine = FineEsercizio(anno);
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 (_ae != _annoeser)
{
if (_annoes) //specificato l'anno nella maschera
_err.set(2);
else _err.set(3);
else _err.set(3);
}
if (ae)
{
@ -2446,7 +2455,7 @@ void TListaMov_application::preprocess_header()
{
if (_annoes != 0)
{
set_header (soh, "Anno comp. %d", _annoes);
set_header (soh, "Cod. eserc.%d", _annoes);
if (_flags & ST_DATA)
{
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_ANNO_COMP)
set_header (soh, "@78gcon messaggi: anno di competenza, allegato iva");
set_header (soh, "@78gcon messaggi: data competenza, allegato iva");
else
set_header (soh, "@78gcon messaggio: allegato iva");
}
else if (_flags & ST_ANNO_COMP)
{
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
set_header (soh, "@78gcon messaggio: anno di competenza");
set_header (soh, "@78gcon messaggio: data competenza");
}
sep.fill('-');
set_header (++soh, (const char *) sep);
@ -2519,7 +2528,7 @@ void TListaMov_application::preprocess_header()
{
if (_annoes != 0)
{
set_header (soh, "Anno comp. %d", _annoes);
set_header (soh, "Cod. comp. %d", _annoes);
if (_flags & ST_DATA)
{
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);
if (_annoes != 0)
{
set_header (soh, "@15gAnno comp %d", _annoes);
set_header (soh, "@15gCod. comp %d", _annoes);
if (_flags & ST_DATA)
{
set_header (soh, "@30gdalla data@41g%s", (const char*)_data_ini.string());

6
cg/cg3100a.uml
View File

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

6
cg/cg3100b.uml
View File

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

16
cg/cg3400.cpp
View File

@ -22,6 +22,7 @@
#include <occas.h>
#include "conto.h"
#include "cglib.h"
#include "cglib03.h"
#include "cg2103.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)
{
TTable ese("ESC");
TString16 first;
TString codtab;
ese.first();
first = ese.get("CODTAB");
codtab.format("%04d",es_corr);
if (codtab == first)
return 0;
return es_corr - 1;
TEsercizi_contabili esc;
return esc.pred(es_corr);
}
bool CG3400_application::controlla_mov_aep()