Tema: pasar DATOS
Ver Mensaje Individual
  #7  
Viejo 29/12/08, 17:38:37
romario2 romario2 is offline
Senior Member
 
Fecha de Ingreso: abr 2006
Mensajes: 233
Smile solucionado

Hola,

de momento ya veo que compila y que puedo pasar datos a la tabla Z.
Ahora he añadido un select para que cada registro de mensaje tenga sus parámetros correpondientes para que pueda ser identificado.

Este es el código, si hay que cambiar algo, cualquier comentario es bienvenido:

DATA: line(255) TYPE c,
text_tab LIKE STANDARD TABLE OF line,
field LIKE line.


DATA wa_textos TYPE c.


DATA texto_salida(255) TYPE c.

DATA: wa_itab TYPE text_tab.



CALL METHOD editor->get_text_as_stream
IMPORTING
text = text_tab.

CLEAR it_zccbmm_t_agnts_f.


LOOP AT text_tab INTO wa_itab.

CONCATENATE texto_salida wa_itab INTO
texto_salida SEPARATED BY space.

ENDLOOP.



SELECT SINGLE *
FROM zccbmm_t_agnts_f
INTO it_zccbmm_t_agnts_f
WHERE responsable = sy-uname.

IF sy-subrc = 0.

it_zccbmm_t_agnts_f-rebuig_txt = texto_salida.

ENDIF.

MODIFY zccbmm_t_agnts_f FROM it_zccbmm_t_agnts_f.


Saludos y muchas gracias,
Responder Con Cita