Hallo,

hier ist ein Beispiel in CL:


CHGVAR VAR(&QRY) VALUE('(FELD1 *NE 1 *AND FELD2 +
*EQ 1 *AND FELD3 *EQ 0 *AND FELD4 *GE +
5000 *AND FELD5 *EQ "A")')

OPNQRYF FILE((YOURFILE)) OPTION(*ALL) QRYSLT(&QRY)


Den Parameter &QRY würdest Du aus dem RPG-Programm übergeben. Hier noch ein Link für weitere Details:

http://publib.boulder.ibm.com/iserie...2929/index.htm

"OPNQRYF" zur Suche eingeben.

Viel Erfolg,
Robert


P.S. wenn's gar nicht gelingen will, poste mal ein Beispiel oder ein Abbild der Eingabemaske.