#include "ba1100a.h"

PAGE "Modifica Archivio" -1 -1 70 15

NUMBER  FLD_NUM  4
BEGIN       
  FLAGS "RD"
  PROMPT 2 1 "Numero       "
END

STRING  FLD_NOME  80 43
BEGIN       
  PROMPT 2 2 "Nome         "
  HELP "Nome del file"
  FLAGS "D"
  GROUP 1
END

STRING  FLD_DESC  43
BEGIN
  PROMPT 2 3 "Descrizione  "
  HELP "Descrizione assegnata al file"
  FLAGS "D"
  GROUP 1
END

STRING  FLD_FORMULA  43
BEGIN        
  PROMPT 2 4 "Formula      "
  HELP "Formula per il calcolo su file"
  FLAGS "D"
  GROUP 1
END

NUMBER  FLD_EOD  7
BEGIN        
  PROMPT 2 5 "Record usati "
  HELP "Numero di record utilizzati"
  WARNING "Numero di record errato"
  NUM_EXPR (#THIS_FIELD>=0)&&(#THIS_FIELD<=#FLD_EOX)
  FLAGS "DR"
  GROUP 1
END

BOOLEAN FLD_EXTEND
BEGIN
  PROMPT 2 6 "Cambia dimensione"
  HELP "Indicare se si desidera cambiare la dimensione del file"
  MESSAGE FALSE DISABLE,FLD_EOX
  MESSAGE TRUE ENABLE,FLD_EOX
  FLAGS "D"
  GROUP 1
END

NUMBER  FLD_EOX  7
BEGIN        
  PROMPT 30 6 "Dimensione  "
  HELP "Dimensione da assegnare al file"
  WARNING "Dimensione non corretta"
  NUM_EXPR (#THIS_FIELD>=#FLD_EOD)
  FLAGS "DR"
END

NUMBER  FLD_FLAG   7
BEGIN        
  PROMPT 2 7 "Flags        "
  HELP "Flags del file"
  FLAGS "DR"
  GROUP 1
END

NUMBER  F_LEN  7
BEGIN        
  PROMPT 30 7 "Lunghezza   "
  FLAGS "RD"
END

STRING F_TAB 3
BEGIN        
  PROMPT 2 9 "Tabella      "
  FLAGS "DU"
  GROUP 1
END

ENDPAGE

TOOLBAR "" 0 0 0 2

BUTTON DLG_OK 9 2
BEGIN
  PROMPT 1 0 "Conferma"
END

BUTTON DLG_PACK 9 2
BEGIN
  PROMPT 2 0 "Compatta"
  MESSAGE EXIT,K_F5
  FLAGS "D"
  PICTURE TOOL_PACK
  GROUP 1
END

BUTTON DLG_DUMP 9 2
BEGIN
  PROMPT 3 0 "Scarica"
  MESSAGE EXIT,K_F7
  PICTURE TOOL_EXPORT
  GROUP 1
END

BUTTON DLG_LOAD 9 2
BEGIN
  PROMPT 4 0 "Carica"
  MESSAGE EXIT,K_F8
  FLAGS "D"
  PICTURE TOOL_IMPORT
  GROUP 1
END

BUTTON DLG_RECORD 9 2
BEGIN
  PROMPT 5 0 "Record"
  MESSAGE EXIT,K_F6
  FLAGS "D"
  PICTURE TOOL_CONFIG
  GROUP 1
END

BUTTON DLG_EDIT 9 2
BEGIN
  PROMPT 6 0 "~Edit"
  PICTURE TOOL_EDIT
  MESSAGE EXIT,K_F4
END

BUTTON DLG_CANCEL 9 2
BEGIN
  PROMPT 7 0 "Annulla"
END

ENDPAGE

ENDMASK