Huge Performance issue and RSRT

Question

Hi BW Gurus,
We are using BCS cube for our consolidation queries and reports . There is a huge prformance problem.
I need to know that wht should be the appropriate size of the Global cache as compared to Local Cache. My global cache size is 100 MB and Global Cache size is 200 MB.
Also when I go to RSRT properties
Read Mode is H: Query to read when you navigate or expand hierarchy .
Cache Mode is : 4 persistent cache across each application server
persistence mode : 3 transparent table (BLOB).
Do I have to change these settings ....please give your suggestions
will appreciated with lot of points
Thanks

Answer 1

Hi Folks,..
Could you'll please tell me where exactly we put the break point I will paste my code. I did Run SE30 and the list cube extraction simaltaneoulsy and gave me a message error generating the test frame
tatics:
FUNCTION RSSEM_CONSOLIDATION_INFOPROV3.
""Lokale Schnittstelle:
*"  IMPORTING
*"     REFERENCE(I_INFOPROV) TYPE  RSINFOPROV
*"     REFERENCE(I_KEYDATE) TYPE  RSDRC_SRDATE
*"     REFERENCE(I_TH_SFC) TYPE  RSDD_TH_SFC
*"     REFERENCE(I_TH_SFK) TYPE  RSDD_TH_SFK
*"     REFERENCE(I_TSX_SELDR) TYPE  RSDD_TSX_SELDR
*"     REFERENCE(I_FIRST_CALL) TYPE  RS_BOOL
*"     REFERENCE(I_PACKAGESIZE) TYPE  I
*"  EXPORTING
*"     REFERENCE(E_T_DATA) TYPE  STANDARD TABLE
*"     REFERENCE(E_END_OF_DATA) TYPE  RS_BOOL
*"     REFERENCE(E_T_MSG) TYPE  RS_T_MSG
*"  EXCEPTIONS
*"      ERROR_IN_BCS
  statics:
UT begin:
this flag is switched in order to record data returned by the current query in UT
it can only be switched on/off in debug mode.
    s_record_mode  type rs_bool,
    s_qry_memo     type char256,    " at the moment, for query name
package No, UUID, for unit testing
    s_packageno    type i,
    s_guid         type guid_22,
UT end.
    s_first_call   like i_first_call,
    s_destination  type rfcdest,
    s_basiccube    type rsinfoprov,
    s_dest_back    type rfcdest,
    s_report       type programm,
    s_bw_local     type rs_bool,
    sr_data        type ref to data,
    sr_data_p      type ref to data,
    st_sfc         type t_sfc,
    st_sfk         type t_sfk,
    st_range       type t_seqnr_range,
    st_hienode     type t_seqnr_hienode,
    st_hienodename type t_seqnr_hienodename,
    st_seltype     type t_seqnr_seltype,
    st_datadescr   type T_DATADESCR,
    s_end_of_data  type rs_bool
  data:
    l_ucr_data_read_3 type funcname value 'UCR_DATA_READ_3',
    l_packagesize like i_packagesize,
    lt_message type t_message,
    ls_message like line of e_t_msg,
    l_xstring type xstring,
    l_nr type i.
  field-symbols:
    <ls_message> type s_message,
    <lt_data>   type standard table,
    <ls_data>   type any,"nos100804
    <lt_data_p> type hashed table."nos100804
  clear: e_t_data, e_end_of_data, e_t_msg.
react on packagesize -1
  if i_packagesize le 0.    "nos050705
    l_packagesize = rssem_cs_integer-max.
  else.
    l_packagesize = i_packagesize.
  endif.
  if i_first_call = rs_c_true.
    s_first_call = rs_c_true.
    clear s_end_of_data.
begin "nos100804
    data:
      lo_structdescr type ref to cl_abap_structdescr
     ,lo_tabledescr type ref to cl_abap_tabledescr
     ,lo_typedescr   type ref to cl_abap_typedescr
    data:
      lt_key     type table of abap_compname.
    field-symbols <ls_component> type abap_compdescr.
    create data sr_data_p like line of e_t_data.
    assign sr_data_p->* to <ls_data>.
    CALL METHOD CL_ABAP_STRUCTDESCR=>DESCRIBE_BY_DATA
      EXPORTING
        P_DATA      = <ls_data>
      RECEIVING
        P_DESCR_REF = lo_typedescr.
    lo_structdescr ?= lo_typedescr.
  collect all key components to lt_key
    loop at lo_structdescr->components assigning <ls_component>.
      insert <ls_component>-name into table lt_key.
      if <ls_component>-name = '&KEYEND'.
        exit.
      endif.
    endloop.
    data ls_sfk like line of i_th_sfk.
    data l_key     type abap_compname.
    loop at i_th_sfk into ls_sfk.
      l_key = ls_sfk-kyfnm.
      if l_key is not initial.
        delete table lt_key from l_key.
      endif.
      l_key = ls_sfk-value_returnnm.
      if l_key is not initial.
        delete table lt_key from l_key.
      endif.
    endloop.
    create data sr_data_p like hashed table of <ls_data>
        with unique key (lt_key).
   create data sr_data_p like e_t_data.
    create data sr_data   like e_t_data.
end "nos100804
    perform determine_destinations  using    i_infoprov
                                    changing s_destination
                                             s_dest_back
                                             s_report
                                             s_basiccube.
    perform is_bw_local changing s_bw_local.
***--> convert the selection, enhance non-Sid-values.
--> Handle fiscper7
    data:
      lt_SFC      TYPE  RSDRI_TH_SFC
     ,lt_sfk      TYPE  RSDRI_TH_SFK
     ,lt_range    TYPE  RSDRI_T_RANGE
     ,lt_RANGETAB TYPE  RSDRI_TX_RANGETAB
     ,lt_HIER     TYPE  RSDRI_TSX_HIER
     ,lt_adj_hier type  t_sfc "nos290704
    statics: so_convert type ref to lcl_sid_no_sid
           , sx_seldr_fp34 type xstring
           , s_fieldname_fp7 type RSALIAS
           , st_sfc_fp34    TYPE  RSDD_TH_SFC
    create object so_convert type lcl_sid_no_sid
              exporting i_infoprov = i_infoprov.
Transform SIDs...
    perform convert_importing_parameter
                     using    i_th_sfc
                              i_th_sfk
                              i_tsx_seldr
                              so_convert
                              e_t_data
                     changing lt_sfc
                              lt_sfk
                              lt_range
                              lt_rangetab
                              lt_hier
                              sx_seldr_fp34
                                      "Complete SELDR as XSTRING
                              st_sfc_fp34
                                      "SFC of a selection with
                                      "FISCPER3/FISCYEAR
                              s_fieldname_fp7
                                      "Name of Field for 0FISCPER
                                      "(if requested)
This is the old routine, but ST_HIENDODE and ST_HIENODENAME can
be neglected, since they are not used at all.
    perform prepare_selections
                     using    lt_sfc
                              lt_sfk
                              lt_range
                              lt_rangetab
                              lt_hier
                     changing st_sfc
                              st_sfk
                              st_range
                              st_hienode
                              st_hienodename
                              st_seltype.
  endif.
  assign sr_data->*   to <lt_data>.
  assign sr_data_p->* to <lt_data_p>.
  describe table <lt_data_p> lines l_nr.
  while l_nr < l_packagesize and s_end_of_data is initial.
    if s_dest_back is initial and s_bw_local = rs_c_true.
  Local call
      call function l_UCR_DATA_READ_3
        EXPORTING
          IT_SELTYPE      = sT_SELTYPE
          IT_HIENODE      = sT_HIENODE        "not used
          IT_HIENODENAME  = sT_HIENODENAME    "not used
          IT_RANGE        = sT_RANGE
          I_PACKAGESIZE   = i_packagesize
          I_KEYDATE       = i_Keydate
          IT_SFC          = sT_SFC
          IT_SFK          = sT_SFK
          i_infoprov      = i_infoprov
          i_rfcdest       = s_destination
          ix_seldr        = sx_seldr_fp34
          it_bw_sfc       = st_sfc_fp34
          it_bw_sfk       = i_th_sfk
          i_fieldname_fp7 = s_fieldname_fp7
        IMPORTING
          ET_DATA         = <lT_DATA>
          E_END_OF_DATA   = s_END_OF_DATA
          ET_MESSAGE      = lT_MESSAGE
          et_adj_hier     = lt_adj_hier         "nos290704
        CHANGING
          c_first_call    = s_first_call.
    elseif s_dest_back is initial and s_bw_local = rs_c_false.
    !!! Error !!! No SEM-BCS destination registered for infoprovider!
      if 1 = 2.
        message e151(rssem) with i_infoprov.
      endif.
      ls_message-msgty = 'E'.
      ls_message-msgid = 'RSSEM'.
      ls_message-msgno = '151'.
      ls_message-msgv1 =  i_infoprov.
      insert ls_message into table e_t_msg.
    else.
    remote call to SEM-BCS
** Call UCR_DATA_READ_3 ...
      if s_first_call is not initial.
  get the datadescription to create the requested return-structure
  in the RFC-System.
        perform get_datadescr
                  using <lt_data>
                  changing st_datadescr
      endif.
      call function 'UCR_DATA_READ_4'
        destination s_dest_back
        exporting i_infoprov     = i_infoprov
                  i_rfcdest      = s_destination
                  i_first_call   = s_first_call
                  i_packagesize  = i_packagesize
                  i_keydate      = i_keydate
                  ix_seldr       = sx_seldr_fp34
                  it_bw_sfc      = st_sfc_fp34
                  it_bw_sfk      = i_th_sfk
                  it_datadescr   = st_datadescr
                  i_fieldname_fp7 = s_fieldname_fp7
        importing c_first_call   = s_first_call
                  e_end_of_data  = s_end_of_data
                  e_xstring      = l_xstring
        tables    it_seltype     = st_seltype
                  it_range       = st_range
                  it_hienode     = st_hienode      "not used
                  it_hienodename = st_hienodename  "not used
                  it_sfc         = st_sfc
                  it_sfk         = st_sfk
                  et_message     = lt_message
                  et_adj_hier    = lt_adj_hier.         "nos290704.
      clear <lt_data>.
      if lt_message is initial.
        call function 'RSSEM_UCR_DATA_UNWRAP'
          EXPORTING
            i_xstring = l_xstring
          CHANGING
            ct_data   = <lt_data>.
      endif.
    endif.
  convert the returned data (SID & Hierarchy).
    call method so_convert->convert_nosid2sid
      exporting it_adj_hier = lt_adj_hier[]     "nos290704
      CHANGING
        ct_data = <lt_data>.
   e_t_data = <lt_data>.
Begin "nos100804
    data l_collect type sy-subrc.
    l_collect = 1.
    if <lt_data_p> is initial and
       <lt_data>   is not initial.
      call function 'ABL_TABLE_HASH_STATE'
        exporting
          itab          = <lt_data>
        IMPORTING
          HASH_RC       = l_collect "returns 0 if hash key exist.
    endif.
    if l_collect is initial.
      <lt_data_p> = <lt_data>.
    else.
      loop at <lt_data> assigning <ls_data>.
        collect <ls_data> into <lt_data_p>.
      endloop.
    endif.
   append lines of <lt_data> to <lt_data_p>.
End "nos100804
  messages
    loop at lt_message assigning <ls_message>.
      move-corresponding <ls_message> to ls_message.
      insert ls_message into table e_t_msg.
    endloop.
    if e_t_msg is not initial.
      raise error_in_bcs.
    endif.
    describe table <lt_data_p> lines l_nr.
  endwhile.
  if l_nr <= l_packagesize.
    e_t_data = <lt_data_p>.
    clear <lt_data_p>.
    e_end_of_data = s_end_of_data.
  else.
Begin "nos100804
    <lt_data> = <lt_data_p>.
    append lines of <lt_data> to l_packagesize to e_t_data.
    data l_from type i.
    l_from = l_packagesize + 1.
    clear <lt_data_p>.
    insert lines of <lt_data> from l_from into table <lt_data_p>.
    clear <lt_data>.
End "nos100804
  endif.
UT begin: start to record data
  if s_record_mode = rs_c_true.
    if i_first_call = rs_c_true.
      clear: s_guid, s_packageno.
      perform prepare_unit_test_rec_param
                  using
                     e_end_of_data
                     i_infoprov
                     i_keydate
                     i_th_sfc
                     i_th_sfk
                     i_tsx_seldr
                     i_packagesize
                     lt_key
                     e_t_data
                     s_qry_memo
                  changing
                     s_guid.
    endif.
    add 1 to s_packageno.
    perform prepare_unit_test_rec_data
                  using
                     s_guid
                     s_packageno
                     e_t_data
                     i_infoprov
                     e_end_of_data.
  endif.  "s_record_mode = rs_c_true
UT end.
  if not e_end_of_data is initial.
  clean-up
    clear: s_first_call, s_destination, s_report, s_bw_local,
           st_sfc, st_sfk, st_range, st_hienode, s_basiccube,
           st_hienodename, st_seltype, s_dest_back, sr_data,
           so_convert , s_end_of_data, sr_data_p."nos100804
    free: <lt_data> , <lt_data_p>.
  endif.
endfunction.
It stores query parameters into cluster table
form prepare_unit_test_rec_param using i_end_of_data type rs_bool
                                       i_infoprov    type rsinfoprov
                                       i_keydate     type rrsrdate
                                       i_th_sfc      type RSDD_TH_SFC
                                       i_th_sfk      type RSDD_TH_SFk
                                       i_tsx_seldr   type rsdd_tsx_seldr
                                       i_packagesize type i
                                       it_key        type standard table
                                       it_retdata    type standard table
                                       i_s_memo      type char256
                                 changing c_guid     type guid_22.
  data:
        ls_key          type g_rssem_typ_key,
        ls_cluster      type rssem_rfcpack,
        l_timestamp     type timestampl.
get GUID, ret component type
  call function 'GUID_CREATE'
    importing
      ev_guid_22 = c_guid.
  ls_key-idxrid = c_guid.
  clear ls_key-packno.
cluster record
  get time stamp field l_timestamp.
  ls_cluster-infoprov = i_infoprov.
  ls_cluster-end_of_data = i_end_of_data.
  ls_cluster-system_time = l_timestamp.
  ls_cluster-username = sy-uname.
return data type
  data:
    lo_tabtype     type ref to cl_abap_tabledescr,
    lo_linetype    type ref to cl_abap_structdescr,
    lt_datadescr   type t_datadescr,
    ls_datadescr   like line of lt_datadescr,
    lt_retcomptab  type abap_compdescr_tab,
    ls_retcomptab  like line of lt_retcomptab,
    lt_rangetab    type t_seqnr_range.
  lo_tabtype   ?= cl_abap_typedescr=>describe_by_data( it_retdata ).
lo_linetype  ?= lo_tabtype->get_table_line_type( ).
lt_retcomptab = lo_linetype->components.
call the sub procedure to use external format of C, instead of interal format (unicode).
otherwise, when create data type from internal format, it won't be the same length as stored in cluster.
  PERFORM get_datadescr USING    it_retdata
                        CHANGING lt_datadescr.
  loop at lt_datadescr into ls_datadescr.
    move-corresponding ls_datadescr to ls_retcomptab.
    append ls_retcomptab to lt_retcomptab.
  endloop.
range, excluding
record param
  export p_infoprov        from i_infoprov
         p_keydate         from i_keydate
         p_th_sfc          from i_th_sfc
         p_th_sfk          from i_th_sfk
         p_txs_seldr       from i_tsx_seldr
         p_packagesize     from i_packagesize
         p_t_retcomptab    from lt_retcomptab
         p_t_key           from it_key
         p_memo            from i_s_memo
  to database rssem_rfcpack(ut)
  from ls_cluster
  client sy-mandt
  id ls_key.
endform.
It stores return data to cluster table
form prepare_unit_test_rec_data using
                                  i_guid        type guid_22
                                  i_packageno   type i
                                  it_retdata    type standard table
                                  i_infoprov    type rsinfoprov
                                  i_end_of_data type rs_bool.
  data:
        l_lines         type i,
        ls_key          type g_rssem_typ_key,
        ls_cluster      type rssem_rfcpack,
        l_timestamp     type timestampl.
  ls_key-idxrid = i_guid.
  ls_key-packno = i_packageno.
  describe table it_retdata lines l_lines.
  if l_lines = 0.
    clear it_retdata.
  endif.
cluster record
  get time stamp field l_timestamp.
  ls_cluster-infoprov = i_infoprov.
  ls_cluster-end_of_data = i_end_of_data.
  ls_cluster-system_time = l_timestamp.
  ls_cluster-username = sy-uname.
  export p_t_retdata       from it_retdata
  to     database rssem_rfcpack(ut)
  from   ls_cluster
  client sy-mandt
  id     ls_key.
endform.
form convert_importing_parameter
               using    i_th_sfc    TYPE  RSDD_TH_SFC
                        i_th_sfk    TYPE  RSDD_TH_SFK
                        i_tsx_seldr TYPE  RSDD_TSX_SELDR
                        io_convert  type  ref to lcl_sid_no_sid
                        i_t_data    type  any table
               changing et_sfc      TYPE  RSDRI_TH_SFC
                        et_sfk      TYPE  RSDRI_TH_SFK
                        et_range    TYPE  RSDRI_T_RANGE
                        et_rangetab TYPE  RSDRI_TX_RANGETAB
                        et_hier     TYPE  RSDRI_TSX_HIER
                        ex_seldr    type xstring
                        e_th_sfc    TYPE  RSDD_TH_SFC
                        e_fieldname_fp7 type  rsalias
  data lt_seldr TYPE  RSDD_TSX_SELDR.
  data ls_th_sfc type RRSFC01.
0) rename 0BCSREQUID   > 0REQUID
  data l_tsx_seldr like i_tsx_seldr.
  data l_th_sfc like i_th_sfc.
  data l_th_sfc2 like i_th_sfc.                            "nos070605
  l_tsx_seldr = i_tsx_seldr.
  l_th_sfc = i_th_sfc.
  data ls_sfc_requid type   RRSFC01.
  data ls_seldr_requid type RSDD_SX_SELDR.
  ls_sfc_requid-chanm = '0BCS_REQUID'.
  read table l_th_sfc from ls_sfc_requid into ls_sfc_requid.
  if sy-subrc = 0.
    delete table l_th_sfc from ls_sfc_requid.
    ls_sfc_requid-chanm = '0REQUID'.
    insert ls_sfc_requid into table l_th_sfc.
  endif.
  ls_seldr_requid-chanm = '0BCS_REQUID'.
  read table l_tsx_seldr from ls_seldr_requid into ls_seldr_requid.
  if sy-subrc = 0.
    delete table l_tsx_seldr from ls_seldr_requid.
    ls_seldr_requid-chanm = '0REQUID'.
    field-symbols: <ls_range> like line of ls_seldr_requid-range-range.
    loop at ls_seldr_requid-range-range assigning <ls_range>.
      check <ls_range>-keyfl is not initial. "jhn190106
      if <ls_range>-sidlow is initial and <ls_range>-low is not initial.
        <ls_range>-sidlow = <ls_range>-low.
        clear <ls_range>-low.
      endif.
      if <ls_range>-sidhigh is initial and <ls_range>-high is not initial.
        <ls_range>-sidhigh = <ls_range>-high.
        clear <ls_range>-high.
      endif.
      clear <ls_range>-keyfl.     "jhn190106
    endloop.
    insert ls_seldr_requid into table l_tsx_seldr.
  endif.
*1) Convert SIDs..., so that all parameter look like the old ones.
  call method io_convert->convert_sid2nosid
    EXPORTING
      it_sfc      = l_th_sfc
      it_sfk      = i_th_sfk
      it_seldr    = l_tsx_seldr
      it_data     = i_t_data
     IMPORTING
      et_sfc      = et_sfc
      et_sfk      = et_sfk
      et_range    = et_range
      et_rangetab = et_rangetab
      e_th_sfc    = l_th_sfc2                  "nos070605
Ignore the old hierachy information:
  clear et_hier.
  delete et_range where chanm = '0REQUID'.
  delete table et_sfc with table key chanm = '0REQUID'.
*2) Eliminate FISCPER7, from new strucutres:
lt_seldr = i_tsx_seldr. "nos131004
  e_th_sfc = l_th_sfc.
the fiscper7 can be deleted completly from the SID-selection, because
it is also treated within et_range...
  clear e_fieldname_fp7.
delete lt_seldr where chanm = cs_iobj_time-fiscper7."nos131004
Begin "nos131004
Ensure that there is no gap in the seldr.
  data:
     ls_seldr   like line of lt_seldr
    ,l_fems_act like ls_seldr-fems
    ,l_fems_new like ls_seldr-fems
  loop at l_tsx_seldr into ls_seldr
    where chanm ne cs_iobj_time-fiscper7.
    if ls_seldr-fems ne l_fems_act.
      l_fems_act = ls_seldr-fems.
      add 1 to l_fems_new.
    endif.
    ls_seldr-fems = l_fems_new.
    insert ls_seldr into table lt_seldr.
  endloop.
end "nos131004
  e_th_sfc = l_th_sfc2.                                "nos070605
Is fiscper7 in the query? (BCS requires allways two fields)
  read table e_th_sfc with key chanm = cs_iobj_time-fiscper7
       into ls_th_sfc.
  if sy-subrc = 0.
==> YES
--> change the SFC, so that FISCPER3 and FISCYEAR is requested.
The table ET_RANGE does contain also the selection for
FISCPER3/FISCYEAR
But since also E_FIELDNAME_FP7 is transferred to BCS, the
transformation of the data, back to FISCPER7 is done on BCS-side.
    e_fieldname_fp7 = ls_th_sfc-KEYRETURNNM.
                                            "begin nos17060
    if e_fieldname_fp7 is initial.
      e_fieldname_fp7 = ls_th_sfc-sidRETURNNM.
      translate e_fieldname_fp7 using 'SK'.
    endif.
                                            "end nos17060
    delete table e_th_sfc from ls_th_sfc.
    ls_th_sfc-chanm       = cs_iobj_time-fiscper3.
    ls_th_sfc-keyreturnnm = ls_th_sfc-chanm.
    insert ls_th_sfc into table e_th_sfc.
    ls_th_sfc-chanm       = cs_iobj_time-fiscyear.
    ls_th_sfc-keyreturnnm = ls_th_sfc-chanm.
    insert ls_th_sfc into table e_th_sfc.
  endif.
Store the SELDR in a XSTRING and unpack it just before selecting data
in BW. It is not interpreted in BCS!
  export t_seldr  = lt_seldr
Store also the SFC, because the BW-Systems migth be differrnt rel./SP.
         t_bw_sfc = e_th_sfc to data buffer ex_seldr compression on.
endform.                    "convert_importing_parameter
*&      Form  get_datadescr
      text
     -->IT_DATA    text
     -->ET_DATADESCtext
form get_datadescr
              using it_data type any table
              changing et_datadescr type t_datadescr
  data: lr_data  type ref to data
      , lo_descr TYPE REF TO CL_ABAP_TYPEDESCR
      , lo_elemdescr TYPE REF TO CL_ABAP_elemDESCR
      , lo_structdescr TYPE REF TO CL_ABAP_structDESCR
      , lt_components  type abap_component_tab
      , ls_components  type abap_componentdescr
      , ls_datadescr type s_datadescr
  field-symbols: <ls_data> type any
               , <ls_components> type abap_compdescr
  clear et_datadescr.
  create data lr_data like line of it_data.
  assign lr_data->* to <ls_data>.
  CALL METHOD CL_ABAP_STRUCTDESCR=>DESCRIBE_BY_DATA
    EXPORTING
      P_DATA      = <ls_data>
    RECEIVING
      P_DESCR_REF = lo_descr.
  lo_structdescr ?= lo_descr.
  CALL METHOD lo_structdescr->GET_COMPONENTS
    RECEIVING
      P_RESULT = lt_components.
  loop at lo_structdescr->components assigning <ls_components>.
    move-corresponding <ls_components> to ls_datadescr.
    if   ls_datadescr-type_kind = cl_abap_elemdescr=>typekind_char
      or ls_datadescr-type_kind = cl_abap_elemdescr=>typekind_num
      read table lt_components with key name = <ls_components>-name
                               into ls_components.
      if sy-subrc = 0.
        lo_elemdescr ?= ls_components-type.
ls_datadescr-length = lo_elemdescr->output_length.
      endif.
    endif.
    append ls_datadescr to et_datadescr.
  endloop.
endform.                    "get_datadescr
Try to give your inputs will appreciate that
thanks