Ver Mensaje Individual
  #2  
Viejo 19/10/09, 14:13:29
Neo_25 Neo_25 is offline
Member
 
Fecha de Ingreso: jun 2009
Mensajes: 51
Esto es una cosa q tuve q hacer yo, espero q te sirva.
Al hacer el Read_text harás algo parecido a esto:

* tabla para mostrar los datos en el editor de texto li_datos
TYPES: ltyp_datos TYPE text132. "estructura
TYPES: ltyp_tab_datos TYPE STANDARD TABLE OF ltyp_datos. "tipo
DATA: li_datos TYPE ltyp_tab_datos. "tabla
"para poder recorrer la li_datos
FIELD-SYMBOLS: <lw_i_datos> TYPE ltyp_datos.

CONSTANTS: lv_name LIKE thead-tdname VALUE 'ZSGC_EMAIL',
lv_id LIKE thead-tdid VALUE 'ST',
lv_obj LIKE thead-tdobject VALUE 'TEXT'.
DATA: li_lines TYPE STANDARD TABLE OF tline.

CALL FUNCTION 'READ_TEXT'
EXPORTING
* client = sy-mandt
id = lv_id
language = sy-langu
name = lv_name
object = lv_obj
TABLES
lines = li_lines
EXCEPTIONS
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
wrong_access_to_archive = 7
OTHERS = 8.

* En li_lines tienes la información q kieres, no?

* COJO LO Q HAY EN li_lines Y LO METO EN li_datos, y muestro li_datos
LOOP AT li_lines ASSIGNING <lw_li_lines>.
APPEND <lw_li_lines>-tdline TO li_datos.
ENDLOOP.

* Tienes la información en li_datos q es una tabla inetrna de una línea q es texto
Responder Con Cita