Resa non obbligatoria la causale.
git-svn-id: svn://10.65.10.50/trunk@3501 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
129b8baee9
commit
ac110f9568
@ -4,3 +4,4 @@
|
|||||||
#define F_PROFILO 104
|
#define F_PROFILO 104
|
||||||
#define F_PSTAMPA 105
|
#define F_PSTAMPA 105
|
||||||
#define F_CODCAUS 106
|
#define F_CODCAUS 106
|
||||||
|
#define F_NCOPIE 107
|
||||||
|
@ -63,16 +63,24 @@ BEGIN
|
|||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
END
|
END
|
||||||
|
|
||||||
|
NUMBER F_NCOPIE 3
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 10 "Numero di copie "
|
||||||
|
FIELD I0
|
||||||
|
NUM_EXPR {(#THIS_FIELD >= 0)}
|
||||||
|
WARNING "Il numero di copie deve essere positivo"
|
||||||
|
END
|
||||||
|
|
||||||
STRING F_CODCAUS 3
|
STRING F_CODCAUS 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 10 "Codice causale "
|
PROMPT 2 11 "Codice causale "
|
||||||
FIELD S6
|
FIELD S6
|
||||||
USE LF_CAUSALI
|
USE LF_CAUSALI
|
||||||
INPUT CODCAUS F_CODCAUS
|
INPUT CODCAUS F_CODCAUS
|
||||||
DISPLAY "Codice" CODCAUS
|
DISPLAY "Codice" CODCAUS
|
||||||
DISPLAY "Descrizione@50" DESCR
|
DISPLAY "Descrizione@50" DESCR
|
||||||
OUTPUT F_CODCAUS CODCAUS
|
OUTPUT F_CODCAUS CODCAUS
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
Loading…
x
Reference in New Issue
Block a user