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

Eliminata funzione di matteo

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3674 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-09-26 15:30:11 +00:00
parent 9a5d61570a
commit c7d7a67725
1 changed files with 72 additions and 92 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

152
include/validate.cpp
View File

@ -662,103 +662,83 @@ HIDDEN bool _not_empty_chkfld_val(TMask_field& f, KEY k)
HIDDEN bool _sconto_val(TMask_field& f, KEY key)
{
bool ok = TRUE;
if ( f.to_check( key ) )
{
TString work( f.get( ) );
TString goodexp;
TString num;
const TString80 work(f.get());
TString80 goodexp;
// Elimina gli spazi molesti
work.strip_spaces( );
// Per ora nessun errore
int _errorpos = -1;
int i = 0;
const int wlen = work.len( );
// Flag che indica se sono nella parte decimale di un numero
bool dec = FALSE;
// Flag che indica se si attende l'inizio di un numero
bool startnum = TRUE;
// Flag che indica se siamo all'inizio di un numero
while ( i < wlen && _errorpos < 0 )
// work.strip_spaces( );
if (work.not_empty())
{
char c = work[ i++ ];
switch( c )
TString80 num;
bool dec = FALSE; // Flag che indica se si attende l'inizio di un numero
bool startnum = TRUE; // Flag che indica se siamo all'inizio di un numero
int errorchar = ' ';
// Flag che indica se sono nella parte decimale di un numero
for (const char * s = (const char *)work; *s && errorchar == ' '; s++)
{
case '+':
case '-':
// Se ero in in numero ...
if( !startnum )
const char c = *s;
switch(c)
{
real newval( num );
if( newval >= 0 )
goodexp << '+';
goodexp << num;
}
// Inizia il nuovo numero
num = ( c == '-' )?"-":"";
startnum = TRUE;
dec = FALSE;
break;
case '0':
case '1':
case '2':
case '3':
case '4':
case '5':
case '6':
case '7':
case '8':
case '9':
num << c;
startnum = FALSE;
break;
case '.':
case ',':
// Se siamo già nella parte decimale ...
if( dec )
{
// Segnala un errore
_errorpos = i;
case '+':
case '-':
// Se ero in in numero ...
if( !startnum )
goodexp << num;
// Inizia il nuovo numero
num = (c == '-') ? "-" : "+";
startnum = TRUE;
dec = FALSE;
break;
case '0':
case '1':
case '2':
case '3':
case '4':
case '5':
case '6':
case '7':
case '8':
case '9':
num << c;
startnum = FALSE;
break;
case '.':
case ',':
if(!dec)
{
if( startnum )
num << '0'; // Se occorreva un numero ci metto lo 0
num << '.'; // Interpreto la virgola come punto
dec = TRUE;
startnum = TRUE;
}
else
errorchar = c; // Se siamo gi` nella parte decimale segnala un errore
break;
case ' ':
break;
default:
errorchar = c;
break;
}
// Se occorreva un numero ci metto lo 0
if( startnum )
num << '0';
// Interpreto la virgola come punto
num << '.';
dec = TRUE;
startnum = TRUE;
break;
default:
_errorpos = i;
break;
}
// Controlla la validita`
ok = errorchar == ' ';
if (ok)
{
goodexp << num; // Assegna la nuova espressione formattata bene
f.set(goodexp);
}
else
f.error_box( "Espressione di sconto non valida. Errore sul carattere %c", errorchar);
}
// Controlla la validità
bool _valid = ( _errorpos < 0 );
// Se richiesto segnala l'errore
if( !_valid )
warning_box( "Espressione di sconto non valida. Errore sul carattere %d.", _errorpos + 1 );
if( _valid )
{
// Aggiunge l'ultimo numero preso
real lastval( num );
if( lastval >= 0 )
goodexp << '+';
goodexp << num;
// Assegna la nuova espressione formattata bene
f.set( goodexp );
// Bravo, hai vinto una bambolina
return TRUE;
}
else
{
// Validate fallito
return FALSE;
}
}
return TRUE;
return ok;
}
HIDDEN bool _ora_val(TMask_field& f, KEY key)