Señores, un consejo.
Tengo un programa en RPGIV y realizo un o muchos llamados a programas que
contienen la misma lista de parametros.
Call 'PGM001' PLstOwn, de esta manera puedo llamar los pmg002 al
pgm999 con la misma lista de parametros.
al pasar esto a free, quedaría,...
D PGM001 PR EXTPGM('PGM001')
D Parm01 LIKE(Fld001)
D Parm02 LIKE(Fld002)
D Parm03 LIKE(Fld003)
D Parm04 LIKE(Fld004)
PGM001 ( Parm01: Parm02 : Parm03: Parm04);
entonces ustedes se pueden imaginar la cantidad de prototipos que hay que
definir, uno por cada programa llamado,
El consejo es como evitar ese problema, pero por favor que no sea en el momento
de llamado con /end-free y /free.
Gracias de antemano.
__________________________________________________
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
