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"
>
>
>
>
>
>                     "Leif Svalgaard"
>                     <leif@leif.org>           To:
<MIDRANGE-L@midrange.com>
>                     Sent by:                  cc:
>                     owner-midrange-l@mi       Subject:     Re: CL problem
>                     drange.com
>
>
>                     07/06/2001 06:48 PM
>                     Please respond to
>                     MIDRANGE-L
>
>
>
>
>
> argh, in my example I did use CALL MYPROG. In the real
> world there is no call, because MYPROG is a CMD.
>
> ----- Original Message -----
> From: Peter Dow <pcdow@yahoo.com>
> To: <MIDRANGE-L@midrange.com>
> Sent: Friday, July 06, 2001 6:34 PM
> Subject: Re: CL problem
>
>
> > Hi Leif,
> >
> > Sounds like a problem with MYPROG. BTW, it's
> >
> >     CALL MYPROG PARM(&RETURN)
> >
> > unless you've made your own CALL command.
> >
> > Have you tried debugging it to make sure you're getting something back
> from
> > MYPROG?
> >
> > Regards,
> > Peter Dow
> > Dow Software Services, Inc.
> > 909 425-0194 voice
> > 909 425-0196 fax
> >
> > ----- Original Message -----
> > From: "Leif Svalgaard" <leif@leif.org>
> > To: "List Midrange" <MIDRANGE-L@midrange.com>
> > Sent: Friday, July 06, 2001 3:22 PM
> > Subject: CL problem
> >
> >
> > > It has been a while, but why doesn't this work? (it always returns a
> > message
> > > of blanks)
> > >
> > > PGM
> > >    DCL VAR(&RETURN) TYPE(*CHAR) LEN(10)
> > >    CALL MYPROG RESULT(&RETURN)
> > >    CALL SAY PARM(&RETURN)
> > > ENDPGM
> > >
> > > MYPROG stuffs something in its parameter
> > > SAY send a message with text given by its parameter
> > >
> > >
> > >
> > > +---
> > > | 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
> > > +---
> >
> >
> > _________________________________________________________
> > Do You Yahoo!?
> > Get your free @yahoo.com address at http://mail.yahoo.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
> > +---
>
> +---
> | 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
> +---

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