Corretto errore irrilevante
git-svn-id: svn://10.65.10.50/trunk@1634 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
1fada2786c
commit
ba603a550e
@ -23,10 +23,9 @@ NUMBER F_ANNO 4
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 4 "Anno "
|
PROMPT 1 4 "Anno "
|
||||||
HELP "Anno di riferimento"
|
HELP "Anno di riferimento"
|
||||||
//FLAGS "A"
|
|
||||||
VALIDATE FIXLEN_FUNC 4
|
VALIDATE FIXLEN_FUNC 4
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
WARNING "Indicare l'anno"
|
//WARNING "Indicare l'anno"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_REG 3
|
STRING F_REG 3
|
||||||
@ -43,7 +42,7 @@ BEGIN
|
|||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
VALIDATE ZEROFILL_FUNC 3
|
VALIDATE ZEROFILL_FUNC 3
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
WARNING "Indicare il codice registro"
|
//WARNING "Indicare il codice registro"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_PROT 5
|
NUMBER F_PROT 5
|
||||||
|
@ -132,7 +132,7 @@ BEGIN
|
|||||||
OUTPUT CODICE_LIB_UN CODTAB[5,7]
|
OUTPUT CODICE_LIB_UN CODTAB[5,7]
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
WARNING "Inserire il codice del libro unico"
|
//WARNING "Inserire il codice del libro unico"
|
||||||
VALIDATE ZEROFILL_FUNC 3
|
VALIDATE ZEROFILL_FUNC 3
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
Loading…
x
Reference in New Issue
Block a user