perform
 

hola!!!

tengo un PROGRAMA1 y un PROGRAMA2, desde PROGRAMA1 hago un llamado a un FORM del PROGRAMA2, este FORM, tiene un dato que el usuario ingresa desde el PROGRAMA1.

al hacer el ejecutar el PROGRAMA1, me hace el llamado al PROGRAMA2, y ejecuta el FORM, el problema esta en que el dato que debe enviarse de PROGRAMA1 a PROGRAMA2, no lo esta tomando, como hago para enviarlo, si estoy sitando la siguiente linea no más,

PERFORM EDAD(YACSAP001).

además que estoy inicializando los parametros y datos igual en ambos lados.

gracias.

Hola

Para enviar datos en un PERFORM debes utilizar la clausula USING, MIentras que si el perform te devuelve datos los declaras con un CHANGING y si utilizas tablas con TABLES. Por ejemplo:

PERFORM EDAD IN PROGRAM PROGRAMA2
TABLES T_INTERNA
USING DATO1
CHANGING DATO2.

Espero haberte ayudado

Saludos