Issue with Variants in 2004s

Question

Hi BW Gurus,
We recently upgraded our system from 3.5 and 2004s and we are having issues with variants.
Issue1.
Variants created by one user is not visible by other users
Issue2.
Variants created for workbook is not saved.
Anyone encountered these issues ?
Rgds
Chan

Answer 1

Issue 1:
We created a program that converts the variant from local to global periodically.
This program was provided by sap which was modified and scheduled in the background.
REPORT  Z_2004S_VARIANT_PERS_2_GLOBAL.
*& Report  Z_2004S_VARIANT_PERS_2_GLOBAL
type-pools:
  rs.
parameters:
  2global radiobutton group gr1 default 'X',
  2person radiobutton group gr1.
selection-screen uline /1(83).
parameters:
  p_query like rsrrepdir-genuniid memory id gid,
  p_varnt2 like rsrparametrizat-txtlg memory id zid.
data:
  ls_rsrparametriza type rsrparametriza,
  l_compid type rsrrepdir-compid,
  l_appname type string,
  l_apptype type rsappcompnm value '01',
  lt_catalog type rsr_t_para_catalog,
  lt_return type table of ddshretval,
  ls_return type ddshretval,
  l_paramnm type rsrparametriza-paramnm,
  l_message type string.
F4 Help for parameters
at selection-screen on value-request for p_query.
  call function 'RZ_QUERY_F4_GET'            "3.x
    exporting
      i_objtype  = 'QU'
    importing
      e_genuniid = p_query.
  set parameter id 'GID' field p_query.
at selection-screen on value-request for p_varnt2.
  get parameter id 'GID' field p_query.
  select single compid from  rsrrepdir into l_compid
         where  objvers   = rs_c_objvers-active
         and    genuniid  = p_query.
  l_appname = l_compid.
  call method cl_rsr_para=>get_catalog
    exporting
      i_type      = l_apptype
      i_appnm     = l_appname
    receiving
      r_t_catalog = lt_catalog.
  call function 'F4IF_INT_TABLE_VALUE_REQUEST'
    exporting
      ddic_structure  = space
      retfield        = 'PARAMNM'
      value_org       = 'S'
    tables
      value_tab       = lt_catalog
      return_tab      = lt_return
    exceptions
      parameter_error = 1
      no_values_found = 2
      others          = 3.
  read table lt_return into ls_return index 1.
  select single txtlg from  rsrparametrizat into p_varnt2
         where  langu    = sy-langu
         and    paramnm  = ls_return-fieldval
         and    objvers  = rs_c_objvers-active.
  export ls_return-fieldval to memory id 'PARAMNM'.
  if p_varnt2 is not initial.
    set parameter id 'ZID' field p_varnt2.
  endif.
start-of-selection.
  import ls_return-fieldval from memory id 'PARAMNM'.
  l_paramnm = ls_return-fieldval.
  select single * from  rsrparametriza into ls_rsrparametriza
         where  paramnm  = l_paramnm
         and    objvers  = rs_c_objvers-active.
  if 2global eq rs_c_true.
    clear ls_rsrparametriza-personal.
  elseif 2person eq rs_c_true.
    if ls_rsrparametriza-owner eq sy-uname.
      ls_rsrparametriza-personal = rs_c_true.
    ELSE.
      l_message = 'You cannot make another users variant personal!'.
      message l_message type 'E'.
    endif.
  endif.
  update rsrparametriza from ls_rsrparametriza.
  if sy-subrc eq 0.
    concatenate 'Variant' p_varnt2 'was converted successfully!' into
l_message
      separated by space.
    message l_message type 'S'.
  else.
    l_message = 'Error during conversion!'.
    message l_message type 'E'.
  endif.
  commit work.
Issue 2:
SAP has to release the note yet.
Rgds
Dinesh