#include "batbums.h"

TOOLBAR "" 0 20 60 2
#include <toolbar.h>
ENDPAGE

PAGE "Unita' di misura " 11 60 14

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

STRING F_UM 2
BEGIN
  PROMPT 2 2 "Unita' di misura "
  FIELD %UM->CODTAB
  KEY 1
  FLAG "U"
  USE %UM
  FLAG "U"
  INPUT CODTAB F_UM
  DISPLAY "Codice " CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT F_UM CODTAB
  OUTPUT F_DESCR      S0 
  CHECKTYPE REQUIRED
END

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

STRING F_UMR 2
BEGIN
  PROMPT 2 8 "Unita' di riferimento "
  FIELD %UM->S7
  FLAG "U"
END

NUMBER F_FC 15 5
BEGIN
  PROMPT 2 10 "Fattore conv. al rif. "
  FIELD %UM->R0
END


ENDPAGE

ENDMASK