Re: CL problem

you have to specify allow(*ipgm *bpgm) on the crtcmd cmd.

a cmd with a rtnval cannot be run from the cmd line.
only from a pgm.

Steve Richter

---------- Original Message ----------------------------------
From: "Leif Svalgaard" <leif@leif.org>
Reply-To: MIDRANGE-L@midrange.com
Date: Mon, 9 Jul 2001 18:34:59 -0500

>Well, I'm not quite there yet.
>The following CMD source was submitted to compilation:
>
>CMD PROMPT('Test return') 
>      PARM KWD(RETURN) TYPE(*CHAR) LEN(10) RTNVAL(*YES) +
>                   PROMPT('return value')
>
>I get the following compilation error: (severity 30)
>sev 30, RTNVAL(*YES) only valid in CL programs or REXX procedures
>
>what's going on?
>TIA
>Leif
>
>----- Original Message ----- 
>From: Leif Svalgaard <leif@leif.org>
>To: <MIDRANGE-L@midrange.com>
>Sent: Monday, July 09, 2001 11:07 AM
>Subject: Re: CL problem
>
>
>> that it ! thanks Alexei. I knew there was a trick like that, but
>> it had just been too long ago I had to use it.
>> 
>> ----- Original Message -----
>> From: Alexei Pytel <pytel@us.ibm.com>
>> To: <MIDRANGE-L@midrange.com>
>> Sent: Monday, July 09, 2001 10:37 AM
>> Subject: Re: CL problem
>> 
>> 
>> >
>> > If MYPROG is a CMD, then RESULT parameter should be declared as RTNVAL
>> > (*YES).
>> > Otherwise changes to parameter will not get to CL program.
>> >
>> >     Alexei Pytel
>> >
>> > "The better is the worst enemy of the good"
>
>
>+---
>| This is the Midrange System Mailing List!
>| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
>| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
>| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
>| Questions should be directed to the list owner/operator: david@midrange.com
>+---
>
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---