#include "cg0400.h"

PAGE "Stampa riepilogo progressivi IVA" -1 -1 80 16

GROUPBOX DLG_NULL 78 3
BEGIN
    PROMPT 1 0 ""
END

NUMBER F_CODDITTA 5
BEGIN
    PROMPT 2 1 "Ditta "
    FLAGS "ZFR"
    USE LF_NDITTE KEY 1
    INPUT CODDITTA F_CODDITTA
    DISPLAY "Ditta" CODDITTA
    DISPLAY "Ragione sociale@50" RAGSOC
    OUTPUT F_CODDITTA CODDITTA
    OUTPUT F_RAGSOC RAGSOC
    CHECKTYPE REQUIRED
    WARNING "Ditta assente"
END

STRING F_RAGSOC 50
BEGIN
    PROMPT 17 1 "Rag.Soc."
    USE LF_NDITTE KEY 2
    INPUT RAGSOC F_RAGSOC
    DISPLAY "Ragione Sociale@50" RAGSOC
    DISPLAY "Codice" CODDITTA
    COPY OUTPUT F_CODDITTA
END

DATE F_DATASTAMPA
BEGIN
  PROMPT 2 4 "Data stampa    "
  HELP "Data in cui viene effettuata la stampa"
  FLAGS "A"
END

NUMBER F_ANNO 4
BEGIN
  PROMPT 2 6 "Anno riepilogo "
  FLAGS "A"
  VALIDATE FIXLEN_FUNC 4
  CHECKTYPE REQUIRED
END

LISTBOX F_MESE 11
BEGIN
  PROMPT 2 7 "Mese riepilogo "
  ITEM "1|Gennaio" MESSAGE ENABLE,F_STAMPA
  ITEM "2|Febbraio" MESSAGE ENABLE,F_STAMPA
  ITEM "3|Marzo" MESSAGE ENABLE,F_STAMPA
  ITEM "4|Aprile" MESSAGE ENABLE,F_STAMPA
  ITEM "5|Maggio" MESSAGE ENABLE,F_STAMPA
  ITEM "6|Giugno" MESSAGE ENABLE,F_STAMPA
  ITEM "7|Luglio" MESSAGE ENABLE,F_STAMPA
  ITEM "8|Agosto" MESSAGE ENABLE,F_STAMPA
  ITEM "9|Settembre" MESSAGE ENABLE,F_STAMPA
  ITEM "10|Ottobre" MESSAGE ENABLE,F_STAMPA
  ITEM "11|Novembre" MESSAGE ENABLE,F_STAMPA
  ITEM "12|Dicembre" MESSAGE ENABLE,F_STAMPA
  ITEM "13|Annuale" MESSAGE "X", F_STAMPA|DISABLE,F_STAMPA
END

BOOLEAN F_STAMPA
BEGIN
  PROMPT 2 9 "Stampa progressivi da inizio anno "
END

/*
BUTTON DLG_PRINT 10 2
BEGIN
 PROMPT -12 -1 "~Stampa"
END
*/

BUTTON DLG_OK 10 2
BEGIN
  PROMPT -12 -1 ""
END

BUTTON DLG_QUIT 10 2
BEGIN
 PROMPT -22 -1 ""
END

ENDPAGE

ENDMASK