Aggiunti 3 decimali per gli impoti in valuta

git-svn-id: svn://10.65.10.50/trunk@2308 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-12-16 10:16:23 +00:00
parent b1c995331b
commit ca01e5440e
5 changed files with 7 additions and 6 deletions

View File

@ -239,7 +239,7 @@ NUMBER SK_TOTDOCVAL 15 2
BEGIN
PROMPT 44 12 "Totale in valuta "
HELP ""
PICTURE ".2"
PICTURE ".3"
GROUP 3 5
VALIDATE REQIF_FUNC 1 F_TOTALE
FIELD TOTDOCVAL

View File

@ -407,6 +407,7 @@ BEGIN
WARNING "Codice valuta assente"
MESSAGE EMPTY CLEAR,SK_CAMBIO|CLEAR,SK_TOTDOCVAL
MESSAGE ENABLE,SK_CAMBIO|ENABLE,SK_TOTDOCVAL
MESSAGE DIRTY,SK_DATACAMBIO|K_TAB,SK_DATACAMBIO
END
DATE SK_DATACAMBIO
@ -449,7 +450,7 @@ BEGIN
PROMPT 35 13 "Tot. in valuta "
FIELD TOTDOCVAL
GROUP 3
PICTURE ".2"
PICTURE ".3"
VALIDATE REQIF_FUNC 1 F_TOTALE
END
@ -549,7 +550,7 @@ BEGIN
PROMPT 37 18 "Corrispettivo valuta "
FIELD CORRVALUTA
FLAGS "R"
PICTURE ".2"
PICTURE ".3"
GROUP 4
VALIDATE REQIF_FUNC 1 F_VALUTAINTRA
END

View File

@ -22,7 +22,7 @@ END
NUMBER 103 15 2
BEGIN
PROMPT 1 4 "Importo valuta "
PICTURE ".2"
PICTURE ".3"
VALIDATE REQIF_FUNC 1 102
END

View File

@ -23,7 +23,7 @@ END
NUMBER FS_TOTVAL 15 2
BEGIN
PROMPT 31 1 "In valuta "
PICTURE ".2"
PICTURE ".3"
FLAGS "HU"
VALIDATE REQIF_FUNC 1 FS_VALUTA
WARNING "Manca il totale documento in valuta"

View File

@ -197,7 +197,7 @@ real TValuta::lit2val(const real& lit) const
{
real val(lit);
val /= _cam;
val.round(2);
val.round(3);
return val;
}