#include "dl0700a.h"

TOOLBAR "" 0 -3 0 3

BUTTON DLG_PRINT 10 2
BEGIN
  PROMPT -13 -1 ""
END

BUTTON DLG_CANCEL 10 2
BEGIN
  PROMPT -23 -1 ""
END

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

ENDPAGE

PAGE "Top Ten" -1 -1 96 24

GROUPBOX DLG_NULL 78 4
BEGIN
  PROMPT 1 1 "@bIntervallo date"
  FLAGS "R"
END

DATE F_DATAINI
BEGIN
  PROMPT 2 2 "Data inizio "
END

DATE F_DATAFINE
BEGIN
  FLAGS "A"
  PROMPT 2 3 "Data fine   "
  VALIDATE DATE_CMP_FUNC >= F_DATAINI
  WARNING "Specificare una 'Data fine' non inferiore alla 'Data inizio'"
END

SPREADSHEET F_RIGHE 78
BEGIN
  PROMPT 1 6 "@bCriteri di selezione "
  ITEM "Supporto"
  ITEM "Genere"
  ITEM "Da prezzo"
  ITEM "A prezzo"
  ITEM "Numero righe"
END

ENDPAGE
ENDMASK

//------------------------------------------------------------------------------------------------
PAGE "Criteri di selezione" -1 -1 44 9

STRING F_SUPPORTO 2
BEGIN
  FLAGS "U"
  PROMPT 1 1 "Tipo supporto "
  USE %UMS
  INPUT CODTAB F_SUPPORTO
  DISPLAY "Tipo supporto" CODTAB
  DISPLAY "Descrizione@60" S0
  OUTPUT F_SUPPORTO CODTAB
  CHECKTYPE REQUIRED
END

STRING F_GENERE 3
BEGIN
  PROMPT 1 2 "Genere        "
  USE GMC
  INPUT CODTAB F_GENERE
  DISPLAY "Genere" CODTAB
  DISPLAY "Descrizione@60" S0
  OUTPUT F_GENERE CODTAB
  CHECKTYPE NORMAL
END

CURRENCY F_DAPREZZO 18
BEGIN
  PROMPT 1 3 "Da prezzo     "
END

CURRENCY F_APREZZO 18
BEGIN
  PROMPT 1 4 "A prezzo      "
END

NUMBER F_VISUAL 4
BEGIN
  PROMPT 1 5 "Numero righe  "
END

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

BUTTON DLG_CANCEL 10 2
BEGIN
  PROMPT -23 -1 ""
END

BUTTON DLG_DELREC 10 2
BEGIN
  PROMPT -33 -1 ""
END

ENDPAGE

ENDMASK