From: Eric Hill To: All
I need to define a parameter with the type of *DATE in a command definition. This data type will edit for valid dates. I want the parameter value to default to *CURRENT for processing purposes, but when I compile the command, I get errors. They are as follows.
CPD0271: Special value *CURRENT not valid.
CPD0265: Default value *CURRENT ignored because not valid.
I am putting *CURRENT in the default parameter and in the special values parameter. Any help on this one will be greatly appreciated.
From: Matt Sargent To: Eric Hill
You just need to give *CURRENT a numeric replacement value that won't correspond to a valid date. I generally use 999999. The code should look something like:
PARM KWD(DATE) TYPE(*DATE) + DFT(*CURRENT) + SPCVAL((*CURRENT 999999)) + PROMPT('DATE')
In your program, you'll want to check for a value of 0999999 since the system will automatically append the century digit. Be sure to define your receiver variable in your CPP as TYPE(*CHAR) LEN(7). If your program receives 0999999, it means that *CURRENT was selected and you should replace this value with today's date; otherwise, the date will be passed in CYYMMDD format.
LATEST COMMENTS
MC Press Online