Re: STRS36PRC

[Neil Palmer <neil@xxxxxxxxxxxxxx>]

No Charlie.  The OCL requires commas between parameters.  You could *CAT ','
between them, as long as the parms don't have blanks padded at the right.
(Come to think of it, you would *TCAT ',' between them, which is what I 
should have used in my original answer where I created the &PARMS variable
by concatenating all 4 parms).
...Neil


On Wed, 10 Sep 1997, Charlie Massoglia wrote:

> Dana Keaton wrote:
> 
> >I'm working with some legacy code and need to pass 4 parameters from my cl to
> >an old OCL program.  I'm not sure how to do this.  Can anyone point me in the
> >right direction? Thanks in advance. The problem is I enclose it with quotes &
> >it assumes a string  
> >
> >Example   : Small sample of the code
> >                                                                 
> >   STRS36PRC  PRC(DLY004X) CURLIB(MOOP) PARM(&day) 'this one works fine
> >        
> >   STRS36PRC  PRC(DLY003X) CURLIB(MOOP) +                   
> >                           PARM(&DAY &GENESEE &STEWARD &SCRDTE)        
> >    ENDPGM                                                   
> >
> You have to concatenate the variables like you do with an OPNQRYF select.
> 
>   STRS36PRC  PRC(DLY003X) CURLIB(MOOP) +                     
>                 PARM(&DAY *CAT &GENESEE *CAT &STEWARD *CAT &SCRDTE)        
> 
> 
> Charlie Massoglia, Massoglia Technical Consulting, Inc.
> PO Box 1065, Okemos, MI 48854, USA
> 517-676-9700  Fax: 517-676-1006  EMAIL: cmassoglia@voyager.net
> 
> 
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
> | To unsubscribe from this list send email to MAJORDOMO@midrange.com
> |    and specify 'unsubscribe MIDRANGE-L' in the body of your message.
> | 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 unsubscribe from this list send email to MAJORDOMO@midrange.com
|    and specify 'unsubscribe MIDRANGE-L' in the body of your message.
| Questions should be directed to the list owner/operator: david@midrange.com
+---