ignatov

Untitled

Nov 1st, 2020
511
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.   METHOD roleexist_get_entityset.
  2.  
  3.  
  4.     DATA: ls_entity_set LIKE LINE OF et_entityset.
  5.  
  6.  
  7.     LOOP AT it_filter_select_options ASSIGNING FIELD-SYMBOL(<fs_filt>).
  8.       CASE <fs_filt>-property.
  9.         WHEN 'roleName'.
  10.           DATA(lv_carrid) = <fs_filt>-select_options.
  11.           LOOP AT <fs_filt>-select_options ASSIGNING FIELD-SYMBOL(<fs_options>).
  12.             DATA(lv_role_from_front) = <fs_options>-low.
  13.           ENDLOOP.
  14.  
  15.       ENDCASE.
  16.     ENDLOOP.
  17.  
  18.     IF lv_role_from_front IS NOT INITIAL.
  19.  
  20.       SELECT SINGLE agr_name INTO @DATA(lv_agr_name) FROM agr_users WHERE uname = @sy-uname AND agr_name EQ @lv_role_from_front AND to_dat EQ '99991231'.
  21.       IF lv_agr_name IS NOT INITIAL.
  22.         APPEND VALUE #(
  23.         roleid = lv_role_from_front
  24.         isexists = abap_true
  25.         rolename = get_role_name( lv_agr_name )
  26.         ) TO et_entityset.
  27.       ELSE.
  28.         APPEND VALUE #(
  29.           roleid = '-'
  30.           isexists = '-'
  31.           rolename = '-'
  32.           ) TO et_entityset.
  33.       ENDIF.
  34.     ELSE.
  35.       APPEND VALUE #(
  36.      roleid = '-'
  37.      isexists = '-'
  38.      rolename = '-'
  39.      ) TO et_entityset.
  40.     ENDIF.
  41.  
  42.   ENDMETHOD.
RAW Paste Data

Adblocker detected! Please consider disabling it...

We've detected AdBlock Plus or some other adblocking software preventing Pastebin.com from fully loading.

We don't have any obnoxious sound, or popup ads, we actively block these annoying types of ads!

Please add Pastebin.com to your ad blocker whitelist or disable your adblocking software.

×