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

Patch level : 12.00 1390

Browse Source 
Files correlati     : ve0.exe vetbnum.msk

Commento:
Blocco opzionale dei documenti nel futuro
This commit is contained in:
Alessandro Bonazzi 2025-04-16 19:15:02 +02:00
parent 07b6c7f727
commit 4ce1d374a8
4 changed files with 27 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/ve/velib.h
View File

@ -429,7 +429,11 @@ public:
const bool save_and_new() const { return get_bool("B4"); }
const bool test_eser() const { return !get_bool("B5"); }
const bool auto_archive() const { return get_bool("B6"); }
const bool newnumdef() const { return get_bool("B8"); }
const bool newnumdef() const { return get_bool("B8"); }
const bool numspecMSP() const { return get_bool("B9"); }
const bool fattprovv() const { return get_bool("B10"); }
const bool contresercemri() const { return get_bool("B11"); }
const bool nofuturedocs() const { return get_bool("B13"); }
const TString& codnumdef() const { return get("S8"); }
const TString& tipodocdef() const { return get("S9"); }
const int revision_len() const { return get_int("I0"); }

7
src/ve/velib06a.cpp
View File

@ -497,7 +497,9 @@ bool data_hndl( TMask_field& field, KEY key )
if (m.id2pos(F_DATACAMBIO1) >= 0 && !m.get(F_CODVAL).empty())
m.set(F_DATACAMBIO1, field.get(), TRUE);
}
const TDate datadoc(m.get(F_DATADOC));
if (key == K_ENTER || field.to_check(key))
{
const int annodoc = m.get_int(F_ANNO);
@ -533,6 +535,9 @@ bool data_hndl( TMask_field& field, KEY key )
}
}
}
if (field.running_check(key) && codnum.nofuturedocs() && datadoc> today)
if (!field.yesno_box("Data documento superiore oggi (%s), devo continuare ugualmente ?", datadoc.stringa()))
return false;
if (codnum.dont_test_datadoc())
return true; // Non devo fare altri test
@ -554,7 +559,7 @@ bool data_hndl( TMask_field& field, KEY key )
doc.read(_isgreat);
same_key = doc.curr().same_key(m.doc().head(), 1, 1);
if (doc.good() && same_key && datadoc > doc.get_date(DOC_DATADOC))
return field.error_box("Data documento superiore alla data del documento successivo (a %s - s %s)", datadoc.stringa(), doc.get_date(DOC_DATADOC).stringa());
return field.error_box("Data documento superiore alla data del documento successivo (%s - succ. %s)", datadoc.stringa(), doc.get_date(DOC_DATADOC).stringa());
}
if (key == K_ENTER || field.to_check(key))
{

3
src/ve/vetbnum.h
View File

@ -12,7 +12,8 @@
#define F_AUTOREOPEN 112
#define F_DOCDEFDIV 113
#define FN_CODNUM 114
#define FN_TIPODOC 115
#define FN_TIPODOC 115
#define F_NOFUTUREDOCS 116
#define F_TIPODOC1 210

22
src/ve/vetbnum.uml
View File

@ -122,9 +122,15 @@ BEGIN
FIELD B2
END
BOOLEAN F_NOFUTUREDOCS
BEGIN
PROMPT 2 14 "Nessun documento nel futuro"
FIELD B13
END
BOOLEAN F_EMRI
BEGIN
PROMPT 2 14 "Fatture da emettere/ricevere"
PROMPT 2 15 "Fatture da emettere/ricevere"
MESSAGE FALSE CLEAR,F_EMRICKYR
MESSAGE TRUE ENABLE,F_EMRICKYR
FIELD B3
@ -132,43 +138,43 @@ END
BOOLEAN F_EMRICKYR
BEGIN
PROMPT 40 14 "Controllo esercizio"
PROMPT 40 15 "Controllo esercizio"
FIELD B11
END
BOOLEAN F_SAVEANDNEW
BEGIN
PROMPT 2 15 "Rimanere in inserimento dopo la registrazione"
PROMPT 2 16 "Rimanere in inserimento dopo la registrazione"
FIELD B4
END
BOOLEAN F_CNTES
BEGIN
PROMPT 2 16 "Nessun controllo sull'esercizio"
PROMPT 2 17 "Nessun controllo sull'esercizio"
FIELD B5
END
BOOLEAN F_AUTOREOPEN
BEGIN
PROMPT 2 17 "Riapertura automatica"
PROMPT 2 18 "Riapertura automatica"
FIELD B7
END
BOOLEAN F_ARCHIVE
BEGIN
PROMPT 2 18 "Archiviazione automatica dei documenti stampati in definitiva"
PROMPT 2 19 "Archiviazione automatica dei documenti stampati in definitiva"
FIELD B6
END
BOOLEAN F_SPMSP
BEGIN
PROMPT 2 19 "Numerazione speciale per MSP"
PROMPT 2 20 "Numerazione speciale per MSP"
FIELD B9
END
LIST F_REVLEN 1 8
BEGIN
PROMPT 2 20 "Cifre riservate alle revisioni (Preventivi) "
PROMPT 2 21 "Cifre riservate alle revisioni (Preventivi) "
ITEM "0|Nessuna"
ITEM "1|1 Cifra"
ITEM "2|2 Cifre"