campo-sirio/li/li0500a.uml

#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