PDA

Ver la Versión Completa : Ayuda Field-Symbol infotipo


javispill
27/01/09, 10:58:45
Buenas, tengo una duda con los field symbols a ver si me pueden echar una mano. Tengo un programa donde en la pantalla de sellección introducimos en infotipo. Bien quiero tratar los datos de este infotipo según lo que metamos.
Por ej si metemos el infotipo 0001

data: lv_tabinf type c,
lv_string(5) type c,
lv_p_inf(4) type c.

lv_p_inf = p_inft. " (p_inft = 0001)
lv_tabinf = 'p'.
CONCATENATE lv_tabinf p_inft into lv_string.
assign (lv_string) to <f1>.

Al final tengo en <f1> el primer registro de la tabla p0001.
Lo que quiero es guardarme todos los registros y luego poder recorrer el field-symbol, hacerle un Loop at <f1> pero no se muy bien como hacerlo, a ver si alguien sabe.

Gracias y un saludo.

DavidXD_XD
27/01/09, 14:20:17
Estas usando BDL cierto??

javispill
28/01/09, 08:41:24
Estas usando BDL cierto??

Así es. Ya lo solucioné, pego el código por sí a alguien le viene bien.

CONCATENATE 'pa' p_inft INTO xtabla .
CONDENSE xtabla.
pv_tabla = xtabla.
CREATE DATA generic_table TYPE STANDARD TABLE OF (pv_tabla).
ASSIGN generic_table->* TO <table>.


CREATE DATA generic_line LIKE LINE OF <table>.
ASSIGN generic_line->* TO <field>.

* Get data
SELECT *
INTO TABLE <table>
FROM (pv_tabla).

LOOP AT <table> INTO <field>.
MOVE-CORRESPONDING <field> TO t_record.
APPEND t_record.
CLEAR t_record.
ENDLOOP.

Saludos