#include "batbpdb.h"

TOOLBAR "" 0 20 0 2

#include <toolbar.h>

ENDPAGE

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

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

STRING F_CODTAB 2
BEGIN
  PROMPT 2 1 "Codice tabella "
  HELP "Codice della tabella periodi di bilancio"
  FIELD %PDB->CODTAB
  KEY 1
  USE %PDB KEY 1 
  INPUT CODTAB F_CODTAB
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  DISPLAY "Giorno inizio" I0
  DISPLAY "Mese inizio" I1
  DISPLAY "Giorno fine" I2
  DISPLAY "Mese fine" I3
  OUTPUT F_CODTAB CODTAB
  OUTPUT F_DESCR S0
  CHECKTYPE REQUIRED
END

STRING F_DESCR 50
BEGIN
  PROMPT 2 2 "Descrizione    "
  HELP "Descrizione del codice tabella periodi di bilancio"
  CHECKTYPE REQUIRED
  FIELD %PDB->S0
END

NUMBER F_GIORNO_INI 2
BEGIN
  PROMPT 2 5 "Inizio periodo "
  HELP "Inserire il giorno relativo al periodo di inizio"
  FIELD %PDB->I0
  FLAGS "R"
  CHECKTYPE REQUIRED
END

NUMBER F_MESE_INI 2
BEGIN
  PROMPT 21 5 ""
  HELP "Inserire il mese relativo al periodo di inizio"
  FIELD %PDB->I1
  FLAGS "R"
  CHECKTYPE REQUIRED
END                       

TEXT DLG_NULL
BEGIN
  PROMPT 25 5 "gg/mm"
END
                
NUMBER F_GIORNO_FINE 2
BEGIN
  PROMPT 2 7 "Fine periodo   "
  HELP "Inserire il giorno relativo alla fine del periodo"
  FIELD %PDB->I2
  FLAGS "R"
  CHECKTYPE REQUIRED
END
                
NUMBER F_MESE_FINE 2
BEGIN
  PROMPT 21 7 ""
  HELP "Inserire il mese relativo alla fine del periodo"
  FIELD %PDB->I3
  FLAGS "R"
  CHECKTYPE REQUIRED
END

TEXT DLG_NULL
BEGIN
  PROMPT 25 7 "gg/mm"
END
                
STRING F_DESCRAGG 50
BEGIN
  PROMPT 2 9 "Descrizione    "
  FLAGS "D"
  FIELD %PDB->S1
END

ENDPAGE

ENDMASK