Dynnamic Field Symbol returning short dump ASSIGN_TYPE_CONFLICT

Question

Hi everyone,
I have a RFC FM and make a dynamic access via SYMBOL FIELD, declared as ANY TABLE. The problem is that sometimes I can get a structure instead of a table and then the error occurs. How do I handle this error if the check IS ASSIGN not work? How do I capture and return an error message?
I tryed this:
  FIELD-SYMBOLS: <fs_tabela>  TYPE ANY TABLE.
     TRY.
                 ASSIGN (st_b2b_text-tabname) TO <fs_tabela>.   <<<<----
DUMP HERE!
              CATCH cx_root INTO v_erro.
                v_text = v_erro->get_text( ).
                MOVE v_text TO st_return-message.
                APPEND st_return TO t_return.
                PERFORM f_return_error_pi USING event.
      ENDTRY.
            IF <fs_tabela> IS ASSIGNED.
              CONCATENATE 'S' st_b2b_text-tabname INTO vl_wkarea.
              CONDENSE vl_wkarea NO-GAPS.
              ASSIGN (vl_wkarea) TO <fs_wkarea>.
              IF <fs_wkarea> IS ASSIGNED.
                LOOP AT <fs_tabela> ASSIGNING <fs_wkarea>.
                  ASSIGN COMPONENT c_posnr
                  OF STRUCTURE <fs_wkarea> TO <fs_posnr>.
Does anyone have any tips?
Tnks,
Marco Antonio
from Brazil

Answer 1

I solved with this test that I did:
TABLES: vbak.
TYPES: BEGIN OF ty_ctrlimo,
         equnr          TYPE equnr,
         anln1          TYPE anln1,
         anln2          TYPE anln2,
         aufnr          TYPE aufnr,
         bukrs          TYPE bukrs,
         zanln1_andam       TYPE anln1,
         zanln2_andam       TYPE anln2,
       END   OF ty_ctrlimo.
DATA: estrutura TYPE ty_ctrlimo,
      tabela    TYPE STANDARD TABLE OF ty_ctrlimo
                     INITIAL SIZE 0 WITH HEADER LINE,
      tabela2   TYPE TABLE OF ty_ctrlimo,
      variavel  TYPE char30.
DATA: is_tabela.
Evento: START-OF-SELECTION                                       ***
START-OF-SELECTION.
  BREAK-POINT.
  PERFORM f_check_is_tabela USING 'TABELA' CHANGING is_tabela.
  WRITE: / '1 ', 'TABELA =', is_tabela.
  SKIP 1.
  PERFORM f_check_is_tabela USING 'TABELA2' CHANGING is_tabela.
  WRITE: / '2 ', 'TABELA2 =', is_tabela.
  SKIP 1.
  PERFORM f_check_is_tabela USING 'ESTRUTURA' CHANGING is_tabela.
  WRITE: / '3 ', 'ESTRUTURA =', is_tabela.
  SKIP 1.
  PERFORM f_check_is_tabela USING 'VARIAVEL' CHANGING is_tabela.
  WRITE: / '4 ', 'VARIAVEL =', is_tabela.
  SKIP 1.
  PERFORM f_check_is_tabela USING 'VBAK' CHANGING is_tabela.
  WRITE: / '5 ', 'VBAK =', is_tabela.
  SKIP 1.
*&      Form  F_CHECK_IS_TABELA
FORM f_check_is_tabela  USING  value(p_nome_tabela_estrutura)
                     CHANGING  p_is_tabela.
  FIELD-SYMBOLS <check> TYPE ANY.
  DATA: lcls_strdscr  TYPE REF TO cl_abap_structdescr,
        lcls_typdscr  TYPE REF TO cl_abap_typedescr.
  CLEAR: p_is_tabela.
  ASSIGN (p_nome_tabela_estrutura) TO <check>.
  lcls_typdscr ?= cl_abap_structdescr=>describe_by_data( <check> ).
  IF lcls_typdscr->type_kind = cl_abap_structdescr=>typekind_table.
    p_is_tabela = cl_abap_structdescr=>true.
  ENDIF.
  WRITE: / 'tipo data: ', lcls_typdscr->type_kind.
ENDFORM.                    " F_CHECK_IS_TABELA