Estoy preparando una interfaz entre dos aplicaciones, una en una PDA y otra en el AS400, que se transmiten ficheros vía FTP. Cada fichero que se genera en el entorno PDA tiene un nombre y una extensión dsitintas. Para cada fichero que se genera su nombre se compone de S + numero_PDA + dia_actual + mes_actual, es decir, que para hoy y la PDA número 77 se crearía S0771605 y con difernetes miembros durante el mismo día, el primero F001, el siguiente F002 y así sucesivamente. Este rollo es para explicaros que cuando llega el fichero al AS400 el nombre del mismo y de su registro coinciden como S0771605 con lo que tengo que hacer un RENAME en el programa pero como que cada vez el nombre del mismo cambio tengo que utilizar un nombre de fichero genérico, llámalo SFILE, pero con un nombre de registro concreto, RGSFILE. y hacer un OVRDBF. En la CL tengo las sentencias
OVRDBF FILE(SFILE) TOFILE(PDA/&MBFILE) MBR(&MBNAME) siendo &MBFILE = 'S0771605' y &MBNAME='F001' CALL PGM(PDAXXX) pero al ejecutar el programa me da el error: "Se ha encontrado un tipo de registro no definido en el archivo SFILE" Tampoco puedo hacer un OVRDBF antes de compilar el programa puesto que ya me da error en la compilación (tanto del nombre del campo del SFILE que dice no se ha definido como el del fichero S0771605 qu etambién es S0771605). ¿Qué puedo hacer? Gracias. Rafa Martí Dpto. Informática GRUPO HOYOS PARRAGA S.L. Este mensaje y los archivos adjuntos son confidenciales. Los mismos contienen información reservada y que no puede ser difundida. Si usted ha recibido este correo por error, por favor avísenos inmediatamente vía correo electrónico ([EMAIL PROTECTED]) y tenga la amabilidad de eliminarlo de su sistema; no deberá copiar el mensaje ni divulgar su contenido a ninguna persona. Muchas gracias. Asimismo, le advertimos de que este mensaje o los archivos adjuntos podrían contener algún virus, y es su responsabilidad comprobar si los hay y eliminarlos. This message and its attached files are confidential. They contain information that is privileged and legally exempt from disclosure. If you have received this e-mail by mistake, please let us know immediately by e-mail ([EMAIL PROTECTED]) and delete it from your system; you should also not copy the message nor disclose its contents to anyone. Thanks. Please, also note that this message or its attached files could possibly contain viruses and its your responsibility to check and delete them.
__________________________________________________ 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 visita la siguente URL: http://listas.combios.es/mailman/listinfo/forum.help400
