#include "ba6200.h"

PAGE "" -1 -1 65 14

RADIOBUTTON F_SCELTA 25
BEGIN
  PROMPT 1 1 "Stampa per: "
  HELP "Criterio di ordinamento della stampa dei comuni"
  ITEM "1|Codice comune "
  MESSAGE HIDE,F_NOMEINI|HIDE,F_NOMEFINE|HIDE,F_NOME
  MESSAGE RESET,F_NOMEINI|RESET,F_NOMEFINE|RESET,F_NOME
  MESSAGE SHOW,F_CODICEINI|SHOW,F_CODICEFINE|SHOW,F_CODICE
  MESSAGE SHOW,F_STATOINI|SHOW,F_STATOFINE
  ITEM "2|Denominazione comune"
  MESSAGE HIDE,F_CODICEINI|HIDE,F_CODICEFINE|HIDE,F_CODICE
  MESSAGE HIDE,F_STATOINI|HIDE,F_STATOFINE
  MESSAGE RESET,F_CODICEINI|RESET,F_CODICEFINE|RESET,F_CODICE
  MESSAGE RESET,F_STATOINI|RESET,F_STATOFINE
  MESSAGE SHOW,F_NOMEINI|SHOW,F_NOMEFINE|SHOW,F_NOME
END

DATE F_DATA
BEGIN
  PROMPT 37 2 "Data di stampa "
  HELP "Data in cui viene effettuata la stampa"
  FLAGS "A"
END

GROUPBOX F_CODICE 63 3
BEGIN
  PROMPT 1 5 ""
END

STRING F_STATOINI 3
BEGIN
  PROMPT 2 6 "Da codice "
  HELP "Codice del comune da cui iniziare la stampa. Vuoto = inizio archivio"
  USE LF_COMUNI KEY 1
  INPUT STATO F_STATOINI
  INPUT COM F_CODICEINI
  DISPLAY "Stato" STATO
  DISPLAY "Comune" COM
  DISPLAY "Denominazione@50" DENCOM
  OUTPUT F_STATOINI STATO
  OUTPUT F_CODICEINI COM
  CHECKTYPE NORMAL
END

STRING F_CODICEINI 4
BEGIN
  PROMPT 20 6 ""
  HELP "Codice del comune da cui iniziare la stampa. Vuoto = inizio archivio"
  COPY USE F_STATOINI
  INPUT STATO F_STATOINI
  INPUT COM F_CODICEINI
  COPY DISPLAY F_STATOINI
  OUTPUT F_STATOINI STATO
  OUTPUT F_CODICEINI COM
  CHECKTYPE NORMAL
END

STRING F_STATOFINE 3
BEGIN
  PROMPT 37 6 "A codice "
  HELP "Codice del comune a cui terminare la stampa. Vuoto = fine archivio"
  COPY USE F_STATOINI
  INPUT STATO F_STATOFINE
  INPUT COM F_CODICEFINE
  COPY DISPLAY F_STATOINI
  OUTPUT F_STATOFINE STATO
  OUTPUT F_CODICEFINE COM
  CHECKTYPE NORMAL
END

STRING F_CODICEFINE 4
BEGIN
  PROMPT 54 6 ""
  HELP "Codice del comune a cui terminare la stampa. Vuoto = fine archivio"
  COPY USE F_STATOINI
  INPUT STATO F_STATOFINE
  INPUT COM F_CODICEFINE
  COPY DISPLAY F_STATOINI
  OUTPUT F_STATOFINE STATO
  OUTPUT F_CODICEFINE COM
  CHECKTYPE NORMAL
END

GROUPBOX F_NOME 63 4
BEGIN
  PROMPT 1 5 ""
END

STRING F_NOMEINI 50
BEGIN
  PROMPT 2 6 "Da nome "
  HELP "Nome del comune da cui iniziare la stampa. Vuoto = inizio archivio"
  USE LF_COMUNI KEY 2
  INPUT DENCOM F_NOMEINI
  DISPLAY "Denominazione@50" DENCOM
  OUTPUT F_NOMEINI DENCOM
  CHECKTYPE NORMAL
END

STRING F_NOMEFINE 50
BEGIN
  PROMPT 2 7 "A nome  "
  HELP "Nome del comune da cui iniziare la stampa. Vuoto = inizio archivio"
  COPY USE F_NOMEINI
  INPUT DENCOM F_NOMEFINE
  COPY DISPLAY F_NOMEINI
  OUTPUT F_NOMEFINE DENCOM
  CHECKTYPE NORMAL
END

STRING F_PROVCOM 5
BEGIN
  PROMPT 1 9 "Stampa solo la provincia di "
  HELP "Nome della provincia di cui stampare l'anagrafica dei comuni"
  FLAGS "U"
END

BUTTON DLG_OK 9 2
BEGIN
  PROMPT -12 -2 ""
END

BUTTON DLG_CANCEL 9 2
BEGIN
  PROMPT -22 -2 ""
END

ENDPAGE

ENDMASK