bueno... a ver ... 1ro con que nombre accedes a la via creada por el OPNQRYF? estimo que seria @RL110 por el OVRDBF que tenias puesto anterior al OPNQRYF en donde indicabas que comparta la via.
2do el OVRDBF anterior al OPNQRYF hace que cuando tu referencies al archivo @RL110, en realidad trabajaras con MVAL 3ro como te comentaba el resultado del OPNQRYF se podra acceder con el nombre del 1er archivo, es por eso que te sugeria el cambio asumiendo que dentro del programa usabas el nombre de archivo @RL110, el parametro FORMAT solo indica la estructura que tendra el resultado del OPNQRYF, no el nombre con el cual se podra utilizar el mismo. se entiende? no se si queda claro el tema de las vias de acceso y los ovrdbf... Saludos, Dario.- > -----Mensaje original----- > De: Foro AS/400 [SMTP:[EMAIL PROTECTED] > Enviado el: Viernes, 15 de Abril de 2005 04:12 > Para: [email protected] > Asunto: Re: OPNQRYF misterioso > > No soy experta en el OPNQRYF pero el @RL110 es un PF vacio con los campos > que necesito de salida del OPNQRYF que estan en alguno de los tres > definidos > en el paametro FILE > �se puede hacer eso? > > > ----- Original Message ----- > From: "Dario Heinze" <[EMAIL PROTECTED]> > To: <[email protected]> > Sent: Wednesday, April 13, 2005 1:49 PM > Subject: RE: OPNQRYF misterioso > > > 0028.00 OPNQRYF FILE((@RL110) (MVAC) (ALCO)) FORMAT( > *LIBL/@RL110 <mailto:*LIBL/@RL110>) QRYSLT('- > 0029.00 FECHA1 *GE "' *CAT &FED *CAT '" *AND FECHA1 *LE "' *CAT > &FEH *CAT '"- > 0030.00 *AND MLCOCL *EQ "' *CAT &COPR *CAT '" *AND MLCLPR *EQ "' > *CAT &CLPR - > 0031.00 *CAT '" *AND MLENSA *EQ "' *CAT &ENSA *CAT '" ') > KEYFLD((ACREPR)) - > 0032.00 JFLD((MLCOMO MCCOMO) (MLCONT MCCONT) (MLMARS ACMAR) (MLREFS > ACREFE) - > 0033.00 (MLCOCL ACCOPR) (MCTIPE ACTIPE)) JDFTVAL(*YES) MAPFLD((FECHA > MLFECH - > 0034.00 *ZONED 8) (FECHA1 FECHA *CHAR 8)) > > > la via de acceso creada por el OPNQRYF tomara el nombre del primer archivo > en tu caso MVAL, prueba como te pongo mas arriba poniendo en vez de MVAL > @RL110 > > Saludos, > > Dario.- > > > > -----Mensaje original----- > > De: Foro AS/400 [SMTP:[EMAIL PROTECTED] > > Enviado el: Mi�rcoles, 13 de Abril de 2005 07:47 > > Para: [email protected] > > Asunto: OPNQRYF misterioso > > > > Hola [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>: > > > > Os propongo un nuevo misterio, que seguro que para vosotros no lo es. > > > > 0021.00 PGM PARM(&FED &FEH &COPR) > > > > 0022.00 DCL VAR(&FED) TYPE(*CHAR) LEN(8) > > > > 0023.00 DCL VAR(&FEH) TYPE(*CHAR) LEN(8) > > > > 0024.00 DCL VAR(&COPR) TYPE(*CHAR) LEN(6) > > > > 0025.00 DCL VAR(&CLPR) TYPE(*CHAR) LEN(1) VALUE('P') > > > > 0026.00 DCL VAR(&ENSA) TYPE(*CHAR) LEN(1) VALUE('E') > > > > 0027.00 OVRDBF FILE(@RL110) TOFILE(MVAL) SHARE(*YES) > > > > 0028.00 OPNQRYF FILE((MVAL) (MVAC) (ALCO)) FORMAT( *LIBL/@RL110 > > <mailto:*LIBL/@RL110>) QRYSLT('- > > 0029.00 FECHA1 *GE "' *CAT &FED *CAT '" *AND FECHA1 *LE "' *CAT &FEH > *CAT > > '"- > > 0030.00 *AND MLCOCL *EQ "' *CAT &COPR *CAT '" *AND MLCLPR *EQ "' *CAT > > &CLPR - > > 0031.00 *CAT '" *AND MLENSA *EQ "' *CAT &ENSA *CAT '" ') > KEYFLD((ACREPR)) > > - > > 0032.00 JFLD((MLCOMO MCCOMO) (MLCONT MCCONT) (MLMARS ACMAR) (MLREFS > > ACREFE) - > > 0033.00 (MLCOCL ACCOPR) (MCTIPE ACTIPE)) JDFTVAL(*YES) MAPFLD((FECHA > > MLFECH - > > 0034.00 *ZONED 8) (FECHA1 FECHA *CHAR 8)) > > > > 0035.00 CALL PGM(RL1101) PARM(&FED &FEH &COPR) > > > > 0036.00 CLOF OPNID(MVAL) > > > > 0037.00 DLTOVR FILE(*ALL) > > > > 0038.00 ENDPGM > > > > > > Como podeis imaginar, este procedimiento recibe 3 parametros desde > fecha, > > hasta fecha y codigo de proveedor y genera un listado con los > movimientos > > de dicho proveedor entre las fechas introducidas. > > > > Pues bien, aqui viene el misterio. > > > > El usuario carga por el proceso correspondiente esos datos en un proceso > > inmediatamente anterior, y a continuacion ejecuta el listado y resulta > que > > no imprime nada (no selecciona los registros) > > > > 1.- Si hago un dsppfm los registros estan > > 2.- Si ejecuto un QRY con los mismos criterios, funciona > > 3.- SI DEJO LA EJECUCION DEL MISMO PARA EL DIA SIGUIENTE, TAMBIEN > > FUNCIONA. > > > > He realizado las siguientes modificaciones. > > > > 1� Cambiar el FRCRATIO de los ficheros a 1 y NADA > > > > 2� He parado el trabajo mientras se ejecuta y veo que mediante la opcion > > 12 (trabajar con bloqueos) veo que estan definidos los ficheros MVACPK y > > el MVALS1 que son dos LF's de los que tengo definidos en el OPNQRYF > (MVAC > > y MVAL) ���????? entiendo que el sistema es tan listo que se da cuenta > que > > estos son utiles para realizar el filtro (los fisicos no tienen clave) > con > > menor esfuerzo. > > > > 3� He cambiado 'por si cuela' el FRCRATIO de los LF y Tampoco > > > > 4� Estos l�gicos, estaban definidos como mantenimiento de la via de > acceso > > MAINT *DLY (entiendo que mejora el rendimiento general de los programas > > que crean registros en estos ficheros fisicos), Pues bien, he cambiado > > este valor a *IMMED y ha funcionado. > > > > �es normal esto? > > Entonces, �para que sirve el el *DLY? > > > > Por cierto, estamos en V4R3M0, recien instalada, �recordais el asunto > del > > STRPCO? fue la manera de solucionarlo > > > > Como siempre, muchas gracias por vuestro interes > > > > Un saludo > > > > SUSANA > > > > > > > > > > > > > > > > > > _____________________________________________________ > 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] > > > _____________________________________________________ > 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] _____________________________________________________ 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]
