How to set Default values to ARG variables

Nachal · New User Joined: 04 Jul 2007 Posts: 3 Location: Chennai

Hi,
I have a Fields that needs to be passed while executing the REXX. However i want set a default values to those arguments. If am not passing while executing it needs to take the Default value.
For Eg,
I have testproduction field which should always be prod. When am testing it I should overwrite it with Test.

dick scherrer · Posted: Fri Dec 19, 2008 11:35 am

Hello and welcome to the forum,

Suggest you establish some default values n your code and then compare what has been entered at runtime. When nothing is entered, use the initial values that were established previously.

Possibly there is something i do not understand. . .

ofer71 · Posted: Fri Dec 19, 2008 11:35 am

Something like that:

Nachal · New User Joined: 04 Jul 2007 Posts: 3 Location: Chennai

Thanks for the solution and Sorry for the late reply..
To make it more clear...
In Clist i have a code like this
PROC 0 TRACE(N) TSPR(P) FSYS(SYSPFOC)
For trace and TSPR we have a default value.
When am executing the clist i ll give it as
ex 'clist..' 'tspr(t)'
if i want to overwrite the default value of tspr.
Whats the logic i need to use in REXX for the same?

Pedro · Posted: Fri Dec 26, 2008 10:26 pm

Not really much logic, just use the PARSE instruction looking through your parms for the right keyword. And if the keyword is not found, the variable is set to nulls:

MBabu · Posted: Fri Dec 26, 2008 11:38 pm

Use the power of Rexx's Parse instruction.

These solutions aren't as smart as CLIST processing (IKJPARSE) because you can't use keyword abbreviations, but either one will give you your defaults and let you give parms in any order. If you need lower case values, remove the "upper" from the parse but always pass in upper case keywords.