• Subject: RE: AS400 Query - Passing info from CL program?
  • From: Joel Fritz <JFritz@xxxxxxxxxxxxxxxx>
  • Date: Wed, 24 Nov 1999 12:18:17 -0800


> -----Original Message-----
> From: Alan Campin [mailto:Alan.Campin@CaseLogic.com]
> Sent: Wednesday, November 24, 1999 11:28 AM
> To: 'MIDRANGE-L@midrange.com'
> Subject: RE: AS400 Query - Passing info from CL program?
> 
> 
> Are you confusing the WRKQRY product (Query/400) with STRQM 
> (AS/400 Query
> Manager)? You would have AS/400 Query Manager only if you 
> bought the SQL
> package. Query/400 does not support any form of parameters.
> 


It does and it doesn't.  If you follow instructions below, you can pass
parameters to a query400 query.   It's not as useful as it might seem
because as soon as you run it as a query management query, you've entered
the realm of qmforms and have to deal with the print formatting differences
between qrydfn and qmqry not to mention the differences in summary output to
a file.

I find it useful, but I work in a shop that doesn't have the full SQL
package and I'm not an SQL expert.  It's quicker than retrieving the query
source, changing the selection criteria to accept parms, and then creating
the query. 

/*           BIG Snip                                         */


> >
> > Per Nielsen <perni@centrum.dk> wrote:
> >
> > IBM har written a nice little paper about the subject 
> "Passing Parameters
> > to a query"
> >
> > Click the link below
> >
> http://as400service.rochester.ibm.com/s_dir/slkbase.NSF/$searc
hform?Open&vie
> w=wall
> In the search field write :
>
> Passing Parameters to a Query/400 Query
>
> The basic idea of the solution is in the select statement to write in the
> Select part:
>
> DATE      GE   :FROMDAT
>
> // Yes the : has to be there
>
> Save the query as normal i.e. a QRYDFN object.
>
> Run the Query with STRQMQRY and ALWQRYDFN(*YES) and set the variables in
> SETVAR
>
> I.e. in the above case:
>
> StrQmQry QmQRy(yourlib/yourqry) AlwQryDfn(*YES)
>      QmForm(*QMQRY) SetVar((FROMDAT 19991122))
>
> HTH
> Per Nielsen

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

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].