Re: AS400 Query - Passing info from CL program?

[Per Nielsen <perni@xxxxxxxxxx>]

Hi Sandi

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


>Anyone,
>
>    Is there a way to pass info from a CL program to a Query?
>
>    We would like to run a scheduled Query (at night), with
>    info passed from a CL program (date range) into the Query, 
>    record select,  so that there is no operator intervention.
>
>    New at AS400, & CL.
>
>    Any info will be greatly appreciated.
>
>    Thanks,
>    Sandi
>    
>+---
>| 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
+---