#include "vdmask.h"

PAGE "Permessi"  -1 -1 50 6

STRING F_USERNAME 8
BEGIN
  PROMPT 2 1 "Utente               "
  FLAGS "UT"
	USE OPD
  JOIN LF_USER INTO USERNAME==CODTAB
  INPUT CODTAB F_USERNAME 
  DISPLAY "Utente@8" CODTAB
  DISPLAY "Gruppo@8" LF_USER->GROUPNAME
  DISPLAY "Descrizione@50" LF_USER->USERDESC
  OUTPUT F_USERNAME CODTAB
  CHECKTYPE REQUIRED
END

STRING F_PASSWORD 8 10
BEGIN
  PROMPT 2 3 "Password             "
  FLAGS "*"
END

BUTTON DLG_OK 10 2
BEGIN
	PROMPT -12 -1 ""
	FLAGS "D"
END

BUTTON DLG_QUIT 10 2
BEGIN
	PROMPT -22 -1 ""
END

ENDPAGE

ENDMASK