RE: rpg/400, chain/reade ... no entiendo...

[Cubero, Rafael \(R.\)]

Title: Message

Perdona, se me olvido decirte que hicieras un rgzpfm del fichero y recompila el pgm.   -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Diego Garulo Sent: 29 November 2004 13:48 To: [EMAIL PROTECTED] Subject: RE: rpg/400, chain/reade ... no entiendo... Buenos días Gabriel,   porque no pruebas con un SETLL en lugar de un CHAIN.   El código sería mas o menos así:       KLIST1        SETLL        FILE1     KLIST1        READE      FILE1    89     *IN89           DOWNE    *OFF                        OPERACIONES MATEMATICAS     KLIST1        READE       FILE1    89                        ENDDO                         -----Mensaje original----- De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]En nombre de Dario Gabriel Ivan Heinze Enviado el: lunes, 29 de noviembre de 2004 13:42 Para: Forum400 Asunto: rpg/400, chain/reade ... no entiendo... Gente, buenos dias/tardes.   Tengo un problemilla, y no se como resolverlo y encontrar su causa.   Tengo un archivo cuya clave es : campo1, campo2, campo3   en el programa RPG/400 tengo una clave de lectura, definida para los dos primeros campos, o sea KLIST1 = campo1, campo2   en el RPG tengo un ciclo de estas caracteristicas.                            MOVE 0      EOF             KLIST1     CHAINFILE1          89 89                     MOVE 1      EOF             EOF        DOWNE1    ... OPERACIONES MATEMATICAS....             KLIST1     READEFILE1               89 89                     MOVE 1      EOF                        ENDDO     No se si se se alcanza a entender, el tema es que tengo un caso en que tengo un solo registro para campo1, campo2 y el RPG me esta realizando nuevamente lectura exitosa sobre el FILE1 en la operacion READE, tengo otros valores de campo1, campo2 que solo tienen un registro para esa clave, el ciclo funciona correctamente, pero hay un solo (de momento) caso que me esta haciendo esto...   ya probe regenerando el archivo por si el AS se habia chupado en la generacion del indice y eso me estaba ocasionando algun problema pero nada...   francamente se me acabaron los conocimientos, ideas, todo... no se que puede ser,   Si alquien tiene una idea, o se le ocurre algo, sera bien recibido...   Saludos,     Dario G. I. Heinze Dpto AS/400 - C.P.C. S.A. San Martin 3071 - Santa Fe - Argentina Tel. 54 342 4558558 int. 232 E-Mail: [EMAIL PROTECTED]