Ayuda en creacion de programa.

[J e f f]

Acabo de probar parte del codigo y con el MODIFY funciona. Estas seguro que pasa por el case y por la asignacion? Sino proba antes de hacer el LOOP llamar a la funcion

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
input = p_fact
IMPORTING
output = p_fact.

Como te digo, me funciono sin problemas! El codigo parece estar bien.

[fagarcia]

No se todavia por que no funciona el progama.

Cree otro programa de prueba para verificar y todavia no me funciona.

Favor tu ayuda para ver por que este tampoco me funciona.

REPORT zprueba.

DATA: monto_en_letras TYPE spell, "VARIABLES PARA FUNCIONES"
texto type string. "VARIABLES PARA FUNCIONES"


SELECTION-SCREEN BEGIN OF BLOCK blk1.


PARAMETERS: P_NUMERO TYPE RBKP-BELNR OBLIGATORY.


SELECTION-SCREEN END OF BLOCK blk1.


DATA: BEGIN OF ITAB01 OCCURS 0,
BELNR LIKE RBKP-BELNR ,
END OF ITAB01.


loop at itab01.
ITAB01-BELNR = '100'. "P_NUMERO'.
MODIFY TABLE itab01.
ENDLOOP.

WRITE: / 'IMPORTE TABLA' , ITAB01-BELNR.

[J e f f]

Ok. El prob aca es el siguiente. No tenes registros en la tabla ITAB. Deberias antes de hacer el loop insertar un registro, sino no loopea y por lo tanto no hace el modify. Fijate en el programa anterior, si el select levanta registros.

Saludos,