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

Patch level : 12.0 832

Browse Source 
Files correlati     : fp0400.msk
Commento            : Aggiunto controllo data sulla maschera
This commit is contained in:
Simone Palacino 2019-06-24 09:54:50 +02:00
parent 19272e0564
commit 87a413090f
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/fp/fp0400a.uml
View File

@ -52,6 +52,8 @@ END
DATE F_DATAINI DATE F_DATAINI
BEGIN BEGIN
PROMPT 0 4 "Data iniziale" PROMPT 0 4 "Data iniziale"
VALIDATE DATE_CMP_FUNC <= F_DATAEND
WARNING "La data iniziale non puo' essere superiore della data iniziale"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -59,7 +61,7 @@ DATE F_DATAEND
BEGIN BEGIN
PROMPT 25 4 "Data finale " PROMPT 25 4 "Data finale "
VALIDATE DATE_CMP_FUNC >= F_DATAINI VALIDATE DATE_CMP_FUNC >= F_DATAINI
WARNING "La data finale non può essere minore della data iniziale" WARNING "La data finale non puo' essere minore della data iniziale"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
@ -77,6 +79,8 @@ END
DATE F_DATAINIREG DATE F_DATAINIREG
BEGIN BEGIN
PROMPT 1 12 "Data iniziale" PROMPT 1 12 "Data iniziale"
VALIDATE DATE_CMP_FUNC <= F_DATAENDREG
WARNING "La data iniziale non puo' essere superiore della data iniziale"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
MODULE F1 MODULE F1
END END
@ -85,7 +89,7 @@ DATE F_DATAENDREG
BEGIN BEGIN
PROMPT 1 13 "Data finale " PROMPT 1 13 "Data finale "
VALIDATE DATE_CMP_FUNC >= F_DATAINIREG VALIDATE DATE_CMP_FUNC >= F_DATAINIREG
WARNING "La data finale non può essere minore della data iniziale" WARNING "La data finale non puo' essere minore della data iniziale"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
MODULE F1 MODULE F1
END END