#include "ca2300a.h" TOOLBAR "topbar" 0 0 0 2 #include ENDPAGE PAGE "Ricalcolo Saldi Analitica" 0 2 0 0 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 2 4 "tempo. Siate certi di voler proseguire." END NUMBER F_ANNO 4 BEGIN PROMPT 3 6 "Esercizio da ricalcolare " USE ESC INPUT CODTAB F_ANNO DISPLAY "Codice Esercizio" CODTAB DISPLAY "Data inizio esercizio" D0 DISPLAY "Data fine esercizio " D1 OUTPUT F_ANNO CODTAB CHECKTYPE REQUIRED FLAGS "Z" HELP "Codice esercizio dal quale si desidera parta il ricalcolo dei saldi" WARNING "Il codice esercizio e' obbligatorio" ADD RUN cg0 -5 esc END NUMBER F_FIRST_ANNO 4 BEGIN PROMPT 3 7 "Primo esercizio interessato " FLAGS "L" END ENDPAGE ENDMASK