No utilizo el opnqryf desde hace mucho tiempo, pero creo recordar que hay que pasarle el QRYSLT como un solo parametro, dado que no entiende tus parametros como tal sino como costantes. Puedes comprobarlo con un debug. Monta los valores en una sola variable antes y luego ponla en QRYLST.
-----Original Message----- From: Carlos Iglesias [mailto:[EMAIL PROTECTED] Sent: jueves 6 de marzo de 2003 17:09 To: [EMAIL PROTECTED] Subject: OPNQRYF q no da buen resultado. Hola, tengo un CL que pasándole como parámetros el fichero y su campo clave y su valor, hace un OVRDBF + OPNQRYF. Según mis cálculos, debería alterarme temporalmente el archivo y seleccionarme únicamente aquellos registros que yo estoy acotando. Pues resulta que este OPNQRYF está pasando de mi... 4 ojos ven más que dos... ¿alguna sugerencia? He aquí mi CL... y gracias por adelantado!!! PGM PARM(&USER &FORMATO &FILE &FLDUSU) DCL VAR(&USER) TYPE(*CHAR) LEN(10) DCL VAR(&FORMATO) TYPE(*CHAR) LEN(30) DCL VAR(&FILE) TYPE(*CHAR) LEN(10) DCL VAR(&FLDUSU) TYPE(*CHAR) LEN(10) DLTOVR FILE(&FILE) LVL(*JOB) MONMSG MSGID(CPF0000) CLOF OPNID(&FILE) MONMSG MSGID(CPF0000) OVRDBF FILE(&FILE) TOFILE(&FILE) + OVRSCOPE(*JOB) SHARE(*YES) SEQONLY(*YES) OPNQRYF FILE((&FILE)) OPTION(*ALL) QRYSLT('"' *CAT + &FLDUSU *CAT '" *EQ "' *CAT &USER *CAT + '"') KEYFLD((&FLDUSU)) OPNID(&FILE) DLTOVR FILE(&FILE) LVL(*JOB) MONMSG MSGID(CPF0000) CLOF OPNID(&FILE) MONMSG MSGID(CPF0000) _____________________________________________________ Forum.HELP400 es un servicio más de NEWS/400. © Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________ Para darte de baja, envía el mensaje resultante de pulsar mailto:[EMAIL PROTECTED]
