campo-sirio/src/li/li0500a.uml
mtollari 1b14ec9415 Spostamento cartella sorgenti
git-svn-id: svn://10.65.10.50/branches/R_10_00@23236 c028cbd2-c16b-5b4b-a496-9718f37d4682
2016-09-09 13:59:02 +00:00

67 lines
904 B
Plaintext
Executable File

#include "li0500a.h"
TOOLBAR "topbar" 0 0 0 2
BUTTON F_RIPRISTINA 10 2
BEGIN
PROMPT -1 -1 "~Ripristina"
END
#include <printbar.h>
ENDPAGE
PAGE "Stampa dichiarazioni d'intento" 0 2 0 0
BOOLEAN F_DEFINITIVA
BEGIN
PROMPT 1 1 "Definitiva"
MESSAGE FALSE HIDE,2@|SHOW,1@
MESSAGE TRUE SHOW,2@|HIDE,1@
END
NUMBER F_PAGINI 6
BEGIN
PROMPT 20 1 "Ultima pagina "
GROUP 2
END
NUMBER F_ANNO 4
BEGIN
PROMPT 1 3 "Anno "
FLAGS "AU"
CHECKTYPE REQUIRED
FIELD ANNO
END
LIST F_MESE 2 16
BEGIN
PROMPT 15 3 "Mese "
FLAGS "AM"
GROUP 2
END
DATE F_DAL
BEGIN
PROMPT 15 3 "Dal "
GROUP 1
END
DATE F_AL
BEGIN
PROMPT 47 3 "Al "
GROUP 1
VALIDATE DATE_CMP_FUNC >= F_DAL
WARNING "Specificare una 'Data fine periodo' non inferiore alla 'Data inizio perodo'"
END
STRING F_REPORT 70 60
BEGIN
PROMPT 1 5 "Report "
RSELECT "li0500"
CHECKTYPE NORMAL
END
ENDPAGE
ENDMASK