Estimados colegas:
Estoy probando un programa RPG ILE que tiene un funcionamiento extraño. Creo
que he descubierto por qué es. Os lo expongo porque parece que hay una
contradicción entre lo que dice la ayuda y lo que ocurre realmente.
Estoy compilando un programa con los siguientes mandatos:
CRTRPGMOD QTEMP/PGM SRCFILE(MILIB/QRPGLESRC)
CRTPGM MILIB/PGM MODULE(QTEMP/PGM)
Así de simple.
La ayuda del mandato CRTPGM para su parámetro ACTGRP (Grupo de activación) dice:
Especifica el grupo de activación al que se asocia este programa cuando
se llama. Un grupo de activación proporciona:
o Estructuras de datos de tiempo de ejecución para dar soporte la
ejecución de programas
o Protección de direccionamiento
o Un límite lógico para la creación de mensajes
o Un límite lógico para los procesos de limpieza de la aplicación
*ENTMOD
Cuando se especifica ACTGRP(*ENTMOD), se examina el módulo del
procedimiento de entrada de programa (parámetro ENTMOD). Si el
atributo del módulo es RPGLE, CBLLE o CLLE, se utiliza ACTGRP(QILE)
o ACTGRP(QILETS). Se utiliza QILE cuando se especifica
STGMDL(*SNGLVL) y se utiliza QILETS cuando se especifica
STGMDL(*TERASPACE). Si el atributo del módulo no es RPGLE, CBLLE ni
CLLE, se utiliza ACTGRP(*NEW).
*NEW
Cuando se llama a este programa, se crea un nuevo grupo de
activación. El programa llamado se asocia con el grupo de activación
que acaba de crearse.
*CALLER
Cuando se llama a este programa, se activa en el grupo de activación
del programa de llamada.
nombre
Especifique el nombre del grupo de activación que se va a utilizar
cuando se llame a este programa.
Copio textualmente.
El valor por defecto para ACTGRP es *ENTMOD. Al ser el artributo de módulo
RPGLE debería generar el programa con el grupo de activación en QILE, sin
embargo lo genera con *NEW. Se puede ver el grupo con:
DSPPGM MILIB/PGM
Este pequeño detalle está haciendo que no funcione bien el programa. Estoy en
V5R4 con nivel de PTF SF99540 nivel 9104. ¿Alguien podría hacer una prueba
similar y ver el resultado? Quiero asegurarme antes de llamar al CAS.
Un saludo a todos y buen fin de semana.
Javier Mora García
____________________________________________________
© 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
