I would probably also opt for the embedded SQL approach, you could define a cursor with a select something like this:-

SELECT * FROM mytable
WHERE
(FaxreferenceNumber >= :FromFaxreferenceNumber OR :FromFaxreferenceNumber = ' ') AND
(FaxreferenceNumber <= :ToFaxreferenceNumber OR :ToFaxreferenceNumber = ' ') AND
(OrderDate >= :FromOrderDate OR :FromOrderDate = 0) AND
(OrderDate <= :ToOrderDate OR :ToOrderDate = 0) AND

etc.

Regards,

Martin Gilbert.

We do, in fact, do that sort of thing a lot here.

Sloopy

Write Query with Varibles for all conditions.

In program before executing Load the values with values entered, If no value is entered for any field, then you can store Lowest Values for the from field, and highest possible values into To field.

Ex: If it is Numeric field with length 5 then 00000 into from value & 99999 into TO field.
If selection values are entered, then the value entered can be moved into FROm & TO fields.

I hope this helps.

Reddy

1. Have a prompt program that presents the user with a selection screen and does any necessary validation of input. Query criteria are passed out of the prompt program as parameters to the query program.

2. The query program (generally a CL) builds a statement to use in an OPNQRYF. How you do that is up to you. You won’t need the “SELECT * FROM MYTABLE” syntax, but you will need something like “FIELD1 *EQ value *OR FIELD2 *EQ value2 *AND FIELD3 *EQ value3″ etc..

3. The OPNQRYF is set up like:
OPNQRYF FILE((*LIBL/MYTABLE)) OPTION(*ALL) +
QRYSLT(&QRYSRT) KEYFLD(*FILE)
OVRDBF FILE(MYTABLE) TOFILE(MYTABLE) SHARE(*YES)
CALL PGM(MYPROG)
CLOF OPNID(MYTABLE)

4. &QRYSRT is the query statement you built from the initial prompts.
MYPROG is a program that will display the data in a subfile.

A couple of points to note –

If you call MYPROG by itself (no query) it should display all of the data in MYTABLE. So, if you already have a subfile program like that you can easily set up your query using the method above.

If MYPROG calls a subprogram that allows the user to edit the data in MYTABLE, and the edit changes data in a filed used as part of the query, the record may no longer be part of the query subset.

Regards
Mike

Regards
Reshma