MODULE UAC$PARSE_TABLE
!
! Parsing table for commands used by the the User Access Checker EDIT
! subsystem.
!
! Modifications:
! V1.0	24-Feb-84  FJN  Created
! V2.0	16-Mar-84  FJN	Expanded to added extra text field and specify it and
!			password via qualifiers
!
DEFINE VERB CREATE
	ROUTINE EDIT_CREATE
	PARAMETER P1, LABEL=FILE
	QUALIFIER KEY_LENGTH, NONNEGATABLE, VALUE( REQUIRED), LABEL=KEYLEN
	QUALIFIER LOWERCASE, LABEL=LOCASE
	QUALIFIER MINIMUM_PASSWORD_LENGTH, NONNEGATABLE, VALUE( REQUIRED),
		LABEL=MINPWDLEN
	QUALIFIER TEXT_LENGTH, NONNEGATABLE, VALUE( REQUIRED), LABEL=TEXTLEN

DEFINE VERB ADD
	ROUTINE EDIT_ADD
	PARAMETER P1, LABEL=USERNAME, VALUE( REQUIRED), PROMPT="Username: "
	QUALIFIER PASSWORD, NONNEGATABLE, VALUE
	QUALIFIER TEXT, NONNEGATABLE, VALUE

DEFINE VERB COPY
	ROUTINE EDIT_COPY
	PARAMETER P1, LABEL=USERNAME, VALUE( REQUIRED), PROMPT="Username: "
	QUALIFIER INPUT, NONNEGATABLE, VALUE( REQUIRED)

DEFINE VERB DELETE
	ROUTINE EDIT_DELETE
	PARAMETER P1, LABEL=USERNAME, VALUE( REQUIRED), PROMPT="Username: "

DEFINE VERB EXIT

DEFINE VERB HELP
	ROUTINE EDIT_HELP
	PARAMETER P1, LABEL=TOPIC

DEFINE VERB MODIFY
	ROUTINE EDIT_MODIFY
	PARAMETER P1, LABEL=USERNAME, VALUE( REQUIRED), PROMPT="Username: "
	QUALIFIER PASSWORD, NONNEGATABLE, VALUE
	QUALIFIER RESET_ACCESS_COUNT, LABEL=RESET, NONNEGATABLE
	QUALIFIER TEXT, NONNEGATABLE, VALUE

DEFINE VERB REMOVE
	ROUTINE EDIT_DELETE
	PARAMETER P1, LABEL=USERNAME, VALUE( REQUIRED), PROMPT="Username: "

DEFINE VERB SHOW
	ROUTINE EDIT_SHOW
	QUALIFIER BRIEF, NONNEGATABLE
	QUALIFIER FULL, NONNEGATABLE