campo-sirio/ba/ba1400a.uml

#include "ba0100a.h"

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

PAGE "Gestione moduli" -1 -1 35 7

STRING F_USER 8
BEGIN
  PROMPT 1 1 "Utente      "
  HELP "Inserire il nome dell'utente"
  FLAGS "U"
  USE LF_USER
  CHECKTYPE NORMAL
  INPUT USERNAME F_USER
  DISPLAY "Utente@8" USERNAME
  DISPLAY "Descrizione@50" USERDESC
  OUTPUT F_USER USERNAME
  KEY 1 
  CHECHTYPE REQUIRED
  FIELD USERNAME
END

STRING F_USERDESC 50
BEGIN
  PROMPT 1 2 "Descrizione "
  FIELD USERDESC
END

STRING F_PASSWORD 8
BEGIN
  PROMPT 1 3 "Password    "
  HELP "Inserire la password"
END

SPREADSHEET F_MODULI 78
BEGIN
  PROMPT 0 5 "Moduli"
  ITEM "Modulo@40"
  ITEM "Abilitato@C"
  ITEM "Codice"
END

ENDPAGE

ENDMASK

PAGE "Campo" -1 -1 60 11

STRING F_NOMEMOD 40
BEGIN
  PROMPT 1 3 "Modulo    "
  FLAGS "D"
END

BOOLEAN F_ENABLE
BEGIN
  PROMPT 11 5 "Abilitato "
END

NUMBER F_CODE 3
BEGIN
  PROMPT 1 7 "Codice    "
  FLAGS "D"
END

BUTTON DLG_OK 9 2
BEGIN
  PROMPT -12 -1 ""
END

BUTTON DLG_CANCEL 9 2
BEGIN
  PROMPT -22 -1 ""
END

ENDPAGE

ENDMASK