Re: Special values in a command definition for DATE and TIME

Hi Jeff,

I used the RTVCMDSRC command on DSPLOG. Here is a partial listing:

PARM KWD(PERIOD) +
TYPE(E01C5) +
CHOICE(*NONE) +
PROMPT('Time period for log output' 2)

E01C5: ELEM TYPE(E01FF) +
CHOICE(*NONE) +
PROMPT('Start time and date')
ELEM TYPE(E0272) +
CHOICE(*NONE) +
PROMPT('End time and date')

E01FF: ELEM TYPE(*TIME) +
DFT(*AVAIL) +
SPCVAL( +
(*AVAIL 000000)) +
EXPR(*YES) +
PROMPT('Beginning time')
ELEM TYPE(*DATE) +
DFT(*CURRENT) +
SPCVAL( +
(*CURRENT 000004) +
(*BEGIN 000005)) +
EXPR(*YES) +
PROMPT('Beginning date')

E0272: ELEM TYPE(*TIME) +
DFT(*AVAIL) +
SPCVAL( +
(*AVAIL 235959)) +
EXPR(*YES) +
PROMPT('Ending time')
ELEM TYPE(*DATE) +
DFT(*CURRENT) +
SPCVAL( +
(*CURRENT 000004) +
(*END 000006)) +
EXPR(*YES) +
PROMPT('Ending date')




Yours truly,

Glenn Gundermann
Email: glenn.gundermann@xxxxxxxxx
Work: (905) 486-1162 x 239
Cell: (416) 317-3144


On 21 October 2016 at 11:54, Jeff Young <jyoung0950@xxxxxxxxx> wrote:

I have a command that prompts for a From/To Date and Time.
I wanted to add the special values *CURRENT for the dates and *AVAIL for
the times and have my program determine the correct values.
It seems that the command definition does not allow special values for
these data types.

Does anyone have a way to do this?

Jeff Young
Sr. Programmer Analyst
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.