Guest.Visitor
05-10-2002, 08:01 AM
need to list out the names passed from a variable for which iam using a OPNQRYF. pls check my program and correct me.  need the query similar to this:  QRYSLT(NAME *EQ %WLDCRD(&LST) Here is my program...pls help me out PGM PARM(&LST) DCL VAR(&LST) TYPE(*CHAR) LEN(1) DCL VAR(&QRY) TYPE(*CHAR) LEN(36) CHGVAR VAR(&QRY) VALUE(NAME *CAT '*EQ' *CAT + ' %WLDCRD(' *CAT "' *CAT &LST *CAT '*")') OVRDBF FILE(PHONE) SHARE(*YES) OPNQRYF FILE((MOHAN/PHONE)) QRYSLT(&QRY) OVRDBF FILE(PHONE) SHARE(*YES) MONMSG MSGID(CPF4174) CPYFRMQRYF FROMOPNID(PHONE) TOFILE(MOHAN/PHONE1) + MBROPT(*REPLACE) CRTFILE(*YES) FMTOPT(*NOCHK) ENDPGM