perform

[CLAUDIA CARDENAS]

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.

[Gregoryg]

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