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

Correzioni MI3580 e MI3581, relativi alla lista controllo sulla

Browse Source 
tabella di corrispondenza e sulla lunghezza del codice pagamento.


git-svn-id: svn://10.65.10.50/trunk@4276 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1997-04-11 15:04:48 +00:00
parent 5eeca38a6d
commit 1d21c9411e
1 changed files with 9 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
cg/cg6901.cpp
View File

@ -155,15 +155,14 @@ bool TLista_archivi::set()
bool TLista_archivi::controlla_valore(const TString& val,int lim, int len) bool TLista_archivi::controlla_valore(const TString& val,int lim, int len)
{ {
if (val.len() > len)
return FALSE;
if (real::is_natural(val)) if (real::is_natural(val))
{ {
int app = atoi(val); int app = atoi(val);
if (app > lim) if (app > lim)
return FALSE; return FALSE;
} }
else
if (val.len() > len)
return FALSE;
return TRUE; return TRUE;
} }
@ -959,6 +958,7 @@ void TLista_archivi::controlla_fatture(char file)
long sottoc = _part->get_long(PART_SOTTOCONTO); long sottoc = _part->get_long(PART_SOTTOCONTO);
int anno = _part->get_int (PART_ANNO); int anno = _part->get_int (PART_ANNO);
TString numpart = _part->get (PART_NUMPART); TString numpart = _part->get (PART_NUMPART);
TString codcaus = _part->get (PART_CODCAUS);
int nriga = _part->get_int (PART_NRIGA); int nriga = _part->get_int (PART_NRIGA);
long nreg = _part->get_long(PART_NREG); long nreg = _part->get_long(PART_NREG);
int numrig = _part->get_int (PART_NUMRIG); int numrig = _part->get_int (PART_NUMRIG);
@ -971,7 +971,7 @@ void TLista_archivi::controlla_fatture(char file)
stampa.add(" - Rilevato un numero di registrazione corrispondente a primanota composto da 7 cifre"); stampa.add(" - Rilevato un numero di registrazione corrispondente a primanota composto da 7 cifre");
} }
else else
if (nreg == 0) // Allora fa parte del saldaconto extracontabile: si controlli la tabella di corrispondenza relativa al tipo mov. if (nreg == 0 && codcaus.empty()) // Allora fa parte del saldaconto extracontabile: si controlli la tabella di corrispondenza relativa al tipo mov.
{ {
if (((TString&) _tab_cau[_part->get_int(PART_TIPOMOV)-1]).trim().empty()) if (((TString&) _tab_cau[_part->get_int(PART_TIPOMOV)-1]).trim().empty())
{ {
@ -1005,13 +1005,11 @@ void TLista_archivi::controlla_fatture(char file)
errore = TRUE; errore = TRUE;
stampa.add(" - Rilevato un codice registro IVA composto da 2 o piu' cifre"); stampa.add(" - Rilevato un codice registro IVA composto da 2 o piu' cifre");
} }
const char* codcaus = _part->get(PART_CODCAUS); if (codcaus.not_empty() && !real::is_natural(codcaus))
if (codcaus && *codcaus) {
if (!real::is_natural(codcaus)) errore = TRUE;
{ stampa.add(" - Rilevato un codice causale alfanumerico");
errore = TRUE; }
stampa.add(" - Rilevato un codice causale alfanumerico");
}
int gruppocl = _part->get_int(PART_GRUPPOCL); int gruppocl = _part->get_int(PART_GRUPPOCL);
if (gruppocl > 99) if (gruppocl > 99)
{ {