Corretta la ricerca di codici degli esercizi

git-svn-id: svn://10.65.10.50/trunk@5079 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto 1997-08-20 09:40:18 +00:00
parent 0b3e4f296e
commit ce826522b2

View File

@ -834,12 +834,13 @@ STRING F_ANNO 4
BEGIN
PROMPT 2 4 "Seleziona l'esercizio "
FLAGS "U"
USE ESE
USE ESC
INPUT CODTAB F_ANNO
DISPLAY "Codice" CODTAB
DISPLAY "Dal@10" D0
DISPLAY "Al@10" D1
OUTPUT F_ANNO CODTAB
CHECKTYPE NORMAL
END
STRING F_ANNORIF 4 // anno usato per il write dell'annata precedente
@ -918,12 +919,13 @@ STRING F_STOANNO 4
BEGIN
PROMPT 2 4 "Seleziona l'esercizio "
FLAGS "U"
USE ESE
USE ESC
INPUT CODTAB F_STOANNO
DISPLAY "Codice" CODTAB
DISPLAY "Dal@10" D0
DISPLAY "Al@10" D1
OUTPUT F_STOANNO CODTAB
CHECKTYPE NORMAL
END
STRING F_STOANNORIF 4 // anno usato per il write dell'annata precedente