Re: CL problem

[bmorris@xxxxxxxxxx]

>Date: Mon, 9 Jul 2001 18:34:59 -0500
>From: "Leif Svalgaard" <leif@leif.org>
>
>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

Leif, RTNVAL commands aren't allowed from the command line, so
you have to specify "where allowed to run" on the CRTCMD.

===> CRTCMD ALLOW(*IPGM *BPGM *IMOD *BMOD *IREXX *BREXX)

(DSPMSGD CPD0281 gives you this recovery.)

Barbara Morris

+---
| 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
+---