yo por lo menos me paso, use un programa en se38 con un perform que hiciera eso y devolvia el dato al formulario
en el formulario en comandos hay q poner
perform <nom_form> in program z<nombre programa>
using &campo1&
using &campo2&
changing &resultado&
&resultado&
y se imprime &resultado& donde quieres q salga (dentro de la misma ventana eso si)
el programa en se38
*&---------------------------------------------------------------------*
*& Report z<nombre programa>
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT z<nombre programa>.
TABLES : <tablas a utilizar>.
DATA :
L_campo1(9) type n,
L_campo2(9) type n,
L_resultado(13) type n.
*&---------------------------------------------------------------------*
*& Form <nom_form>
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* -->INPUT_TABLE text
* -->OUTPUT_TABLE text
*----------------------------------------------------------------------*
FORM <nom_form> TABLES input_table STRUCTURE itcsy
output_table STRUCTURE itcsy.
* break amenares.
READ TABLE input_table WITH KEY name = 'CAMPO1' .(MAYUSCULA SIEMPRE)
MOVE input_table-value TO l_campo1
READ TABLE input_table WITH KEY name = 'CAMPO2' .(MAYUSCULA SIEMPRE)
MOVE input_table-value TO l_campo2
*se hace la suma
l_resultado = campo1 + campo2.
MOVE: 'RESULTADO' TO output_table-name ,
l_resultado TO output_table-value.
APPEND output_table .
CLEAR output_table.
endform.
lo q esta en mayuscula debe ser asi.
ojala te sea util
|