RE: Find number of parms for a CL or passall

For your info RUNQRY has 14 parameters.  I have a copy of some code from
a midrange magazine that we used to write a RUNQRY frontend that lists
all the parameters.  Also the only way I could think of to get the
parameters is to just hit F4 on the command and F9 or F10 to get all
parameters, fill in the fields and then count.  Most IBM programs are
unfriendly in this sense.  Strangely enough IBM don't like you messing
with their code.

                                                James Turnbull
                                                AS/Tech Consulting.

>-----Original Message-----
>From:  gibbsd@ZELANA.COM [SMTP:gibbsd@ZELANA.COM]
>Sent:  Thursday, June 05, 1997 1:41 AM
>To:    MIDRANGE-L@midrange.com
>Subject:       Find number of parms for a CL or passall
>
>Folks:
>
>Does anyone know of a way to determine the actual number, and the type,   
>of parmameters for a program?  Specificly an IBM program?
>
>I'm trying to write a frontend for RUNQRY, but have not been able to get   
>the number, and type, of the parmameters correct.
>
>Another option would be to have the program simply pass ALL parameters   
>from the running program to a called program (QSYS/QQUDA).  I know I   
>could do this on the S/36 with the *ALL parameter... but haven't found   
>anything on the '400 that's similar.
>
>Thanks!
>
>david
>
> --
>David Gibbs
>Sr. Programmer Analyst
>Zellweger Analytics, Inc.
>Lincolnshire, IL  60069
>(847) 634-2955 x293
>
>Personal Philosophy: The only dumb question is the one you didn't ask.
>
>* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
>* 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   *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *