Bienvenidos a Iseries Venezuela

Las mejores prácticas, recursos, tips, enlaces, videos y artículos para informáticos relacionados con el Iseries y el As/400 lenguajes de programación RPG, ILE RPG y SQL.

The best practices, resources, tips, links, videoes and articles for computer related to the Iseries and the As/400 languages of programming RPG, ILE RPG and SQL.

domingo, 7 de noviembre de 2010

OVERRIDE de Archivos en ILE-RPG


                                                                                     







Tradicionalmente se realiza el Override de archivos en un programa CLP que luego llama a un  programa RPG.

Este RPG entonces realiza las operaciones pertinentes y al terminar la ejecución del programa RPG entonces el programa CLP debe realizar, en algún momento,  un DLTOVR(*ALL) para continuar con el resto de los comandos.

Ahora es posible realizar con ILE-RPG y con ILE-RPG Free el override del archivo dentro del programa RPG en la hoja F junto con la declaración del archivo.

Se utilizan las Keywords: EXTFILE y EXTMBR para especificar el archivo y el miembro sobre el cual se hace override.
Si se omite el EXTMBR el sistema operativo asume el primer miembro del archivo.

En el ejemplo que tienen a continuación, declaro un archivo con un EXTFILE cuyo contenido está en un campo constante que indica la librería (LDMED43) y el archivo (IN102L10X)

fIN102L10x uf   e           k disk    rename(IN102r:in102rx)
f                                     USROPN               
f                                     Extfile(ARCHIVO102)  

d*Declaración de constantes.
d ARCHIVO102      c                   const('LDMED43/IN102L10X')

El archivo debe ser USROPN para que funcione este sistema.
Al Principio del programa haces un OPEN IN102L10X y antes de Finalizar
Realizas el CLOSE IN102L10X

Con este procedimiento ya no es necesario realizar un CLP que lo único que hace es el override a los archivos de los programas en RPG, que son invocados posteriormente.



Autor: Ing. Liliana Suárez.


Si te pareció interesante el artículo reenvíalo a un amigo, haciendo click en el sobrecito que está al final del artículo. El conocimiento es valioso, compártelo.

No hay comentarios: