#include "ba0100a.h"

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

PAGE "Gestione utenti" -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" USERNAME
  DISPLAY "Descrizione@50" USERDESC
  OUTPUT F_USER USERNAME
	KEY 1 
	CHECHTYPE REQUIRED
	FIELD USERNAME
END

STRING F_USERDESC 50
BEGIN
  PROMPT 1 3 "Descrizione "
	FIELD USERDESC
	MESSAGE "X",F_BASE
END

STRING F_PASSWORD 8 0
BEGIN
  PROMPT 1 5 "Password    "
  HELP "Inserire la password"
	MESSAGE "X",F_BASE
	MESSAGE "X",F_MU
END

GROUPBOX DLG_NULL 76 13
BEGIN
  PROMPT 0 7 "Moduli"
END

BOOLEAN F_BASE 
BEGIN
  PROMPT 1 8 "Base"
	FLAGS "D"
	FIELD AUTSTR[1,1]
END

BOOLEAN F_CG 
BEGIN
  PROMPT 31 8 "Contabilita'"
	FIELD AUTSTR[2,2]
END

BOOLEAN F_MU 
BEGIN
  PROMPT 59 8 "Multiutenza"
	FIELD AUTSTR[3,3]
  FLAGS "D"
END

BOOLEAN F_SC 
BEGIN
  PROMPT 1 9 "Saldaconto"
	FIELD AUTSTR[4,4]
END

BOOLEAN F_EF 
BEGIN
  PROMPT 31 9 "Portafoglio"
	FIELD AUTSTR[5,5]
END

BOOLEAN F_VE 
BEGIN
  PROMPT 59 9 "Vendite"
	FIELD AUTSTR[6,6]
END

BOOLEAN F_MG 
BEGIN
  PROMPT 1 10 "Magazzino"
	FIELD AUTSTR[7,7]
END

BOOLEAN F_770 
BEGIN
  PROMPT 31 10 "770"
	FIELD AUTSTR[8,8]
END

BOOLEAN F_AB 
BEGIN
  PROMPT 59 10 "Bilanci"
	FIELD AUTSTR[21,21]
END

BOOLEAN F_NI 
BEGIN
  PROMPT 1 11 "Nota integrativa"
  FIELD AUTSTR[22,22]
END

BOOLEAN F_NR
BEGIN
   PROMPT 31 11 "Nota integrativa ridotta"
  FIELD AUTSTR[23,23]
END

ENDPAGE

ENDMASK