#include "batblng.h"

TOOLBAR "topbar" 0 0 0 2
#include <relapbar.h>
ENDPAGE

PAGE "Tabella lingue" -1 -1 78 8

GROUPBOX DLG_NULL 75 7
BEGIN
 PROMPT 1 0 ""
 FLAGS "R"
END

STRING F_CODICE 1
BEGIN
  PROMPT 2 2 "Codice      "
  FIELD CODTAB
  FLAGS "U"
  KEY 1
  USE %LNG
  INPUT CODTAB F_CODICE
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione @50" S0
  OUTPUT F_CODICE CODTAB
  OUTPUT F_DESCR S0
  CHECKTYPE REQUIRED
END

STRING F_DESCR 50
BEGIN
  PROMPT 2 4 "Descrizione "
  FIELD LF_TABCOM->S0
  KEY 2
  USE %LNG KEY 2
  INPUT S0 F_DESCR
  DISPLAY "Descrizione @60" S0
  DISPLAY "Codice" CODTAB
  OUTPUT F_CODICE CODTAB
  OUTPUT F_DESCR S0
  CHECKTYPE REQUIRED
END

GROUPBOX DLG_NULL 75 3
BEGIN
  PROMPT 1 7 "Formato data"
END

LIST F_DATA 3 20
BEGIN
  PROMPT 2 8 "Ordine data   "
  ITEM "GMA|Giorno-Mese-Anno"
  ITEM "MGA|Mese-Giorno-Anno"
  ITEM "AMG|Anno-Mese-Giorno"
  FIELD S7[1,3]
END

STRING F_DATASEP 1
BEGIN
  PROMPT 40 8 "Separatore data     "
  FIELD S7[4,4]
END


GROUPBOX DLG_NULL 75 4
BEGIN
  PROMPT 1 10 "Formato valuta"
END

LIST F_MIGLIAIA 1 14
BEGIN
  PROMPT 2 11 "Separatore migliaia "
  ITEM ".|Punto   (.)" MESSAGE "I",F_DECIMALI
  ITEM ",|Virgola (,)" MESSAGE "E",F_DECIMALI
  FIELD S8
END

LIST F_DECIMALI 1 14
BEGIN
  PROMPT 2 12 "Separatore decimali "
  ITEM "I|Virgola (,)"
  ITEM "E|Punto   (.)"
  FLAGS "D"
END

ENDPAGE
ENDMASK