MODULE EDX_COMMANDS


DEFINE VERB DIRECTORY
	PARAMETER P1, LABEL=DIRSPEC, VALUE(TYPE=$FILE)
	QUALIFIER SIZE
	QUALIFIER DATE

 
DEFINE VERB SORT
	PARAMETER P1, LABEL=DOMAIN,  VALUE(REQUIRED,TYPE=SORT_DOMAIN)
	QUALIFIER DUPLICATES,	DEFAULT
	QUALIFIER EBCDIC
	QUALIFIER MULTINATIONAL
	QUALIFIER REVERSE
	QUALIFIER DESCENDING
	QUALIFIER STABLE
	QUALIFIER START,	VALUE(REQUIRED,TYPE=$NUMBER)
	QUALIFIER KEY,		VALUE(REQUIRED,LIST,TYPE=SORT_KEY)
	QUALIFIER KEY1,		VALUE(REQUIRED,LIST,TYPE=SORT_KEY)
	QUALIFIER KEY2,		VALUE(REQUIRED,LIST,TYPE=SORT_KEY)
	QUALIFIER KEY3,		VALUE(REQUIRED,LIST,TYPE=SORT_KEY)
	QUALIFIER KEY4,		VALUE(REQUIRED,LIST,TYPE=SORT_KEY)
	QUALIFIER KEY5,		VALUE(REQUIRED,LIST,TYPE=SORT_KEY)
	QUALIFIER KEY6,		VALUE(REQUIRED,LIST,TYPE=SORT_KEY)
	QUALIFIER KEY7,		VALUE(REQUIRED,LIST,TYPE=SORT_KEY)
	QUALIFIER KEY8,		VALUE(REQUIRED,LIST,TYPE=SORT_KEY)
	QUALIFIER KEY9,		VALUE(REQUIRED,LIST,TYPE=SORT_KEY)

DISALLOW ((START or REVERSE) and
    (KEY1 or KEY2 or KEY3 or KEY4 or KEY5 or KEY6 or KEY7 or KEY8 or KEY9 ))

DISALLOW (EBCDIC and MULTINATIONAL)

DEFINE TYPE SORT_KEY
	KEYWORD POSITION,	VALUE(REQUIRED,TYPE=$NUMBER)
	KEYWORD SIZE,		VALUE(REQUIRED,TYPE=$NUMBER)
	KEYWORD DESCENDING
	KEYWORD REVERSE

DEFINE TYPE SORT_DOMAIN
	KEYWORD BUFFER
	KEYWORD RANGE
	KEYWORD HELP		!We'd like a "?" but CLI can't handle it

!DEFINE VERB PRINT
!	PARAMETER P1, LABEL=FILSPEC, VALUE(REQUIRED,TYPE=$FILE)
!   qualifier BURST
!   qualifier COPIES
!      value (required,type=$number)
!   qualifier DELETE
!   qualifier FLAG
!   qualifier FORM
!      value (required)
!   qualifier HEADER
!   qualifier NAME
!      value (required)
!   qualifier NOTE
!      value (required)
!   qualifier NOTIFY
!   qualifier OPERATOR
!      value (required)
!   qualifier PASSALL
!   qualifier QUEUE
!      value (required)
!   qualifier SPACE
!   qualifier TRAILER