Texts in bps variable

Question

Hi gurus,
I have a following problem:
I work in BW 7.0. I have character1 (xkl_kv) with compounding with two characters (xrsk, xmrsk). I create a bps variable that is processed by user-exit.  After user-exit is executed in my bps variable I have not any texts. Instead of texts I see only character1u2019s  values.
How can I display texts?
Following is code of my user-exit:
FUNCTION Y_OKB12.
""Eieaeuiue eioa?oaen:
*"  IMPORTING
*"     VALUE(I_AREA) TYPE  UPC_Y_AREA
*"     VALUE(I_VARIABLE) TYPE  UPC_Y_VARIABLE OPTIONAL
*"     VALUE(I_CHANM) TYPE  UPC_Y_CHANM
*"     VALUE(ITO_CHANM) TYPE  UPC_YTO_CHA
*"  EXPORTING
*"     REFERENCE(ETO_CHARSEL) TYPE  UPC_YTO_CHARSEL
*"     REFERENCE(ETO_ATTR) TYPE
UPC_YTO_ATTR
  CONSTANTS:
  l_buffer_call TYPE boole-boole VALUE ' '.
  DATA: ls_varsel TYPE upc_ys_charsel,
        ls_chacmp type upc_ys_chacmp,
        ls_attr type UPC_Ys_ATTRSEL.
  CASE i_chanm.
    WHEN 'XKL_KV'.
      DATA:
      l_subrc LIKE sy-subrc,
      ls_return LIKE bapiret2,
      l_type LIKE upc_var-vartype,
      lto_varsel_all
TYPE upc_yto_charsel,
      lto_varsel TYPE upc_yto_charsel,
      lto_var TYPE upc_ys_charsel,
      lto_chanm TYPE upc_yto_cha,
      lt_chavl LIKE /bic/pxkl_kv OCCURS 1000 WITH HEADER LINE,
      ls_chavl LIKE lt_chavl.
read source value
      CALL FUNCTION 'Z_VARIABLE_GET_DETAIL'
        EXPORTING
          i_area         = i_area
          i_variable     = 'XRSK'
          i_buffer       = l_buffer_call
IMPORTING
          e_subrc        = l_subrc
          es_return      = ls_return
          e_type         = l_type
          eto_varsel_all = lto_varsel_all
          eto_varsel     = lto_varsel
          eto_chanm      = lto_chanm.
      IF l_subrc <> 0.
MESSAGE i136(upc_fw) WITH l_source_var.
Values of variable &1 cannot be determined
        EXIT.
      ENDIF.
now, you are free to determine the logic on how to
*derive the values based on the source values.
      DATA: l_entries TYPE i.
      READ TABLE lto_varsel INTO lto_var INDEX 1.
check prerequisites:
- record found?
      IF sy-subrc <> 0.
MESSAGE i147(upc_fw) WITH l_source_var.
Variable &1 does not contain any values
        EXIT.
      ENDIF.
- exactly one record and characteristic?
      DESCRIBE TABLE lto_varsel LINES l_entries.
      IF l_entries <> 1.
EXIT.
      ENDIF.
      SELECT * FROM /bic/pxkl_kv INTO TABLE lt_chavl
         WHERE ( /BIC/XNAP_KV = '1.' OR /BIC/XNAP_KV = '2.' ) and ( /BIC/XKL_KV <> '0,00000000000000000000001' ) and ( /BIC/XKL_KV <> '0,00000000000000000000002' )
              AND /bic/xrsk EQ lto_var-low.
      IF sy-subrc <> 0.
        EXIT.
      ENDIF.
      types: begin of tkey,
         XKL_KV type /BIC/OIXKL_KV,
         TXTLG type RSTXTLG,
       end of tkey.
       types keys(60) type c.
      data: keystr type string,
      key type tkey,
      keytab type tkey occurs 10.
      ls_varsel-seqno = '0000'.
      ls_varsel-chanm = 'XKL_KV'.
      LOOP AT lt_chavl INTO ls_chavl.
        ls_varsel-seqno = ls_varsel-seqno + 1.
        ls_varsel-opt = 'EQ'.
        ls_varsel-sign = 'I'.
        ls_varsel-low = ls_chavl-/bic/xkl_kv.
        APPEND ls_varsel TO eto_charsel.
      ENDLOOP.
Thank you for your advice.
Regards,
Veronika.

Answer 1

up