弹出ABAP中的数据对象unicode

时间:2016-03-28 16:52:00

标签: abap

我有下一个问题来显示弹出AVL。我的错误是下一个:
声明
"移动src to dst"
需要操作数" dst"和" src"是可兑换的 由于此语句是在Unicode程序中,因此特殊转换为 适用于Unicode程序的规则 在这种情况下,违反了这些规则。

我的代码是下一个:

TYPES:
  BEGIN OF ty_posic,
    ebelp   TYPE EKPO-EBELP,
    posid   TYPE PRPS-POSID,
    texto   TYPE PRPS-POST1,
    impor   TYPE NETPR,
    waers   TYPE EKKO-WAERS,
  END OF ty_posic.
* Tablas internas.
DATA:
  t_posic   TYPE STANDARD TABLE OF ty_posic,
  t_cols    TYPE STANDARD TABLE OF help_value,
  t_tabix   TYPE sy-tabix,
  t_just    TYPE CATSXT_LONGTEXT_ITAB.
* Workareas.
DATA:
  wa_cols   LIKE LINE OF t_cols,
  wa_posic  LIKE LINE OF t_posic.

..........

  CLEAR t_tabix.
  APPEND wa_cols TO t_cols.
    wa_cols-tabname    = 'EKPO'.
    wa_cols-fieldname  = 'EBELP'.
    wa_cols-selectflag = 'X'.
  APPEND wa_cols TO t_cols.
    wa_cols-tabname    = 'PRPS'.
    wa_cols-fieldname  = 'POSID'.
  APPEND wa_cols TO t_cols.
    wa_cols-tabname    = 'PRPS'.
    wa_cols-fieldname  = 'POST1'.
  APPEND wa_cols TO t_cols.
    wa_cols-tabname    = 'EKPO'.
    wa_cols-fieldname  = 'NETPR'.
  APPEND wa_cols TO t_cols.
    wa_cols-tabname    = 'EKKO'.
    wa_cols-fieldname  = 'WAERS'.
  APPEND wa_cols TO t_cols.

  CALL FUNCTION 'MD_POPUP_SHOW_INTERNAL_TABLE'
  EXPORTING
    title   = 'My text'
  IMPORTING
    index   = t_tabix 
  TABLES
    values  = t_posic
    columns = t_cols
  EXCEPTIONS
    leave   = 1
    others  = 2.
...........

Greethings!

0 个答案:

没有答案