#define FLD_CG41_YEAR 100

PAGE "Ricalcolo Saldi" -1 -1 47 10

TEXT DLG_NULL
BEGIN
  PROMPT 16 1 "ATTENZIONE"
END

TEXT DLG_NULL
BEGIN
  PROMPT 2 3 "Il ricalcolo dei saldi puo' richiedere"
END

TEXT DLG_NULL
BEGIN
  PROMPT 3 4 "tempo. Siate certi di voler proseguire."
END

NUMBER FLD_CG41_YEAR 4
BEGIN
  PROMPT 3 6 "Codice esercizio "
  USE ESC
  INPUT CODTAB FLD_CG41_YEAR
  DISPLAY "Codice Esercizio" CODTAB
  DISPLAY "Data inizio esercizio" D0
  DISPLAY "Data fine esercizio  " D1
  OUTPUT FLD_CG41_YEAR CODTAB
  CHECKTYPE REQUIRED
  FLAGS "Z"
  HELP "Codice esercizio per il quale si desidera il ricalcolo dei saldi"
  WARNING "Il codice esercizio e' obbligatorio"
  ADD RUN cg0 -5 esc
END

ENDPAGE

TOOLBAR "Toolbar" 0 0 0 2
#include <elabar.h>
ENDPAGE

ENDMASK