#include "batbpdb.h"

TOOLBAR "" 0 19 0 2

#include <toolbar.h>

ENDPAGE

PAGE "Tabella periodi di bilancio" 0 -1 0 19

GROUPBOX DLG_NULL 76 6
BEGIN
  PROMPT 1 0 ""
  FLAGS "R"
END

STRING F_CODTAB 3
BEGIN
  PROMPT 2 2 "Codice periodo "
  HELP "Inserire il codice identificativo del periodo prescelto"
  FLAS "RU"
  FIELD CODTAB
  KEY 1
  USE %PDB KEY 1 
  INPUT CODTAB F_CODTAB
  DISPLAY "Codice@3" CODTAB
  DISPLAY "Descrizione@40" S0
  DISPLAY "gg.inizio@3" I0
  DISPLAY "mm.inizio@3" I1
  DISPLAY "gg.fine@3" I2
  DISPLAY "mm.fine@3" I3
  DISPLAY "Numero anni@3" I4
  OUTPUT F_CODTAB CODTAB
  OUTPUT F_DESCR S0
  CHECKTYPE REQUIRED
END

STRING F_DESCR 70 40
BEGIN
  PROMPT 2 4 "Descrizione    "
  HELP "Descrizione del codice tabella periodi di bilancio"
  FIELD S0
  KEY 2
  USE %PDB KEY 2
  INPUT S0 F_DESCR
  DISPLAY "Descrizione@40" S0
  DISPLAY "Codice@3" CODTAB
  DISPLAY "gg.inizio@3" I0
  DISPLAY "mm.inizio@3" I1
  DISPLAY "gg.fine@3" I2
  DISPLAY "mm.fine@3" I3  
  DISPLAY "Numero anni@3" I4
  COPY OUTPUT F_CODTAB
  CHECKTYPE REQUIRED
END

NUMBER F_GIORNO_INI 7
BEGIN
  PROMPT 2 8 "Inizio periodo:  gg "
  HELP "Inserire il giorno relativo al periodo di inizio"
  FIELD I0
  FLAGS "R"
  CHECKTYPE REQUIRED
END

NUMBER F_MESE_INI 7
BEGIN
  PROMPT 32 8 "mm "
  HELP "Inserire il mese relativo al periodo di inizio"
  FIELD I1
  FLAGS "R"
  CHECKTYPE REQUIRED
END                       

                
NUMBER F_GIORNO_FINE 7
BEGIN
  PROMPT 2 10 "Fine periodo:    gg "
  HELP "Inserire il giorno relativo alla fine del periodo"
  FIELD I2
  FLAGS "R"
  CHECKTYPE REQUIRED
END
                
NUMBER F_MESE_FINE 7
BEGIN
  PROMPT 32 10 "mm "
  HELP "Inserire il mese relativo alla fine del periodo"
  FIELD I3
  FLAGS "R"
  CHECKTYPE REQUIRED
END

NUMBER NUM_ANNI 7
BEGIN
  PROMPT 2 16 "Numero di anni                               "
  HELP "Inserire il numero di anni"
  FIELD I4
  FLAGS "R"
  CHECKTYPE REQUIRED
END

                
STRING F_DESCRAGG 70 30
BEGIN
  PROMPT 2 18 "Descrizione alternativa per stampa raffronti "
  FIELD S1
END

ENDPAGE

ENDMASK