X200
03/12/10, 16:40:41
Hola, les cuento la siguiente duda que tengo acerca de un error que pasa con las workarea y la tabla del fieldcat. Al intentar activarlo me dice que le falta el header y que no hay ningun componente llamado fieldname y tabname. ¿Por que sucede esto? No logro ver el error.
Les pongo un ejemplo del codigo que he creado.
TYPES-POOLS slis.
*Defino el fieldcat y la work area.
DATA: gt_fieldcat TYPE slis_t_fieldcat,
wa_m TYPE slis_t_fieldcat.
...
START-OF-SELECTION.
...
perform init_fieldcat.
END-OF-SELECTION.
FORM init_fieldcat.
*Asigno los valores al workarea y luego hago el append.
wa_m-fieldname = 'CAMPO1'.
wa_m-ref_tabname = 'TABLA1'.
APPEND wa_m TO gt_fieldcat.
wa_m-fieldname = 'DOMC'.
wa_m-ref_tabname = 'TABLA1'.
APPEND wa_m TO gt_fieldcat.
CLEAR gt_fieldcat.
ENFORM.
Les pongo un ejemplo del codigo que he creado.
TYPES-POOLS slis.
*Defino el fieldcat y la work area.
DATA: gt_fieldcat TYPE slis_t_fieldcat,
wa_m TYPE slis_t_fieldcat.
...
START-OF-SELECTION.
...
perform init_fieldcat.
END-OF-SELECTION.
FORM init_fieldcat.
*Asigno los valores al workarea y luego hago el append.
wa_m-fieldname = 'CAMPO1'.
wa_m-ref_tabname = 'TABLA1'.
APPEND wa_m TO gt_fieldcat.
wa_m-fieldname = 'DOMC'.
wa_m-ref_tabname = 'TABLA1'.
APPEND wa_m TO gt_fieldcat.
CLEAR gt_fieldcat.
ENFORM.