#include "at5100a.h"

/* toolbar */
TOOLBAR "" 0 20 0 2

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

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

ENDPAGE

PAGE "Parametri sezione" -1 -1 76 17

GROUPBOX DLG_NULL 74 5
BEGIN
   PROMPT 1 0 "Primo passaggio di categoria"
END

NUMBER AT_NUMDON1 3
BEGIN
   PROMPT 2 1 "Donazioni necessarie  "
   HELP "Numero donazioni necessarie per il passaggio"
   FIELD NumDon1
END

STRING AT_CATINI1 2
BEGIN
   PROMPT 2 2 "Categoria di partenza "
   HELP "Categoria di partenza per il passaggio (possibile vuota)"
   USE CTD
   INPUT CODTAB[1,2] AT_CATINI1
   DISPLAY "Cat." CODTAB[1,2]
   DISPLAY "Descrizione@50" S0
   OUTPUT AT_CATINI1 CODTAB[1,2]
   OUTPUT AT_D_CATINI1 S0
   FIELD CatIni1
   CHECKTYPE NORMAL
END

STRING AT_CATFIN1 2
BEGIN
   PROMPT 2 3 "Categoria di arrivo   "
   HELP "Categoria di arrivo per il passaggio (possibile vuota)"
   USE CTD
   INPUT CODTAB[1,2] AT_CATFIN1
   DISPLAY "Cat." CODTAB[1,2]
   DISPLAY "Descrizione@50" S0
   OUTPUT AT_CATFIN1 CODTAB[1,2]
   OUTPUT AT_D_CATFIN1 S0
   FIELD CatFin1
   CHECKTYPE NORMAL
END

GROUPBOX DLG_NULL 74 6
BEGIN
   PROMPT 1 5 "Secondo passaggio di categoria"
END

NUMBER AT_NUMDON2 3
BEGIN
   PROMPT 2 6 "Donazioni necessarie  "
   HELP "Numero donazioni necessarie per il passaggio"
   FIELD NumDon2
END

STRING AT_CATINI2 2
BEGIN
   PROMPT 2 7 "Categoria di partenza "
   HELP "Categoria di partenza per il passaggio (possibile vuota)"
   USE CTD
   INPUT CODTAB[1,2] AT_CATINI2
   DISPLAY "Cat." CODTAB[1,2]
   DISPLAY "Descrizione@50" S0
   OUTPUT AT_CATINI2 CODTAB[1,2]
   OUTPUT AT_D_CATINI2 S0
   FIELD CatIni2
   CHECKTYPE NORMAL
END

STRING AT_CATFIN2 2
BEGIN
   PROMPT 2 8 "Categoria di arrivo   "
   HELP "Categoria di arrivo per il passaggio (possibile vuota)"
   USE CTD
   INPUT CODTAB[1,2] AT_CATFIN2
   DISPLAY "Cat." CODTAB[1,2]
   DISPLAY "Descrizione@50" S0
   OUTPUT AT_CATFIN2 CODTAB[1,2]
   OUTPUT AT_D_CATFIN2 S0
   FIELD CatFin2
   CHECKTYPE NORMAL
END

BOOLEAN AT_STTESS2
BEGIN
   PROMPT 2 9 "Passaggio con stampa tessera"
   HELP "Eseguire il cambio di categoria al momento della stampa tessera"
   FIELD StTess2
END

BOOLEAN AT_DATAISC
BEGIN
   PROMPT 2 11 "Data iscrizione (se vuota) uguale a data prima donazione"
   HELP "Data iscrizione automaticamente uguale alla data prima donazione, se vuota"
   FIELD DataIsc
END

STRING AT_D_CATINI1 40
BEGIN
   PROMPT 30 2 ""
   FLAGS "D"
END

STRING AT_D_CATFIN1 40
BEGIN
   PROMPT 30 3 ""
   FLAGS "D"
END

STRING AT_D_CATINI2 40
BEGIN
   PROMPT 30 7 ""
   FLAGS "D"
END

STRING AT_D_CATFIN2 40
BEGIN
   PROMPT 30 8 ""
   FLAGS "D"
END

ENDPAGE

ENDMASK