× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: RE: AS400 Query - Passing info from CL program?
  • From: Rob Berendt <rob@xxxxxxxxx>
  • Date: Wed, 24 Nov 1999 15:07:47 -0500

SNIP
Query/400 does not support any form of parameters.
ENDSNIP

WRONG!!!  This is their point.  Read it again.




Alan.Campin@CaseLogic.com on 11/24/99 02:52:56 PM
Please respond to MIDRANGE-L@midrange.com@Internet
To:     MIDRANGE-L@midrange.com@Internet
cc:      
Fax to: 
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.

-----Original Message-----
From: Jim Langston [mailto:jlangston@conexfreight.com]
Sent: Wednesday, November 24, 1999 9:46 AM
To: MIDRANGE-L@midrange.com
Subject: Re: AS400 Query - Passing info from CL program?


You've got to be joking me?  You can pass parameters to
queries?  I've been wanting to do this for YEARS and could
never figure it out.

I read the query manager book pretty much cover to cover
looking for it.  So many times I wound up writing an RPG
report just because I didn't want my users to have to modify
a query to get what they want.

The next best thing to sliced bread, and IBM hides it in an
appendix???

Arrrrrrggggggghhhhhhhhhhhhhhh!

Regards,

Jim Langston

Dan Bale wrote:

> AAAAAAAAAAuuugggghhhhhhhhh!   Where the heck have I been?  Why isn't this
> documented in the Query manual?  You should'a heard the head-banging when
I
> shared this response with the others in our office, which, several months
ago,
> undertook a _major_ project to convert user-written queries with
hard-coded
> selections to QM queries (both *QMQRY & *QMFORM objects).  It got so bad
that I
> ended up scrapping some of the conversions and wrote RPG/CL from scratch;
much
> faster to production.
>
> Well, so, I guess, Thanks for the tip!  Next time..........
>
> If I'm not the only one who didn't know about this (which I suppose _is_
> possible), I think this would be an excellent tech tip in the trade rags.
Per,
> go for it; it might net you $50!
>
> BTW, this technique _does_ do a conversion to *QMQRY, it's just
transparent.
> This is important to know, because there are differences between WRKQRY
output
> and STRQMQRY *QMQRY output.  But it looks much cleaner than the
conversions I
> did in the past.  Oh, and character host variables have to be enclosed in
triple
> single quotes, i.e., SetVar((STATUS '''A'''))
>
> Will sleep better tonight.......
>
> - Dan Bale
>
> 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/$searchform?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 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
+---

As an Amazon Associate we earn from qualifying purchases.

This thread ...


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

This mailing list archive is Copyright 1997-2024 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].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.