Advertisement
ignatov

Untitled

Apr 19th, 2020
2,885
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ABAP 0.45 KB | None | 0 0
  1.     DATA ls_employee_entity_key TYPE zcl_zdemo_app1_mpc=>ts_person.
  2.  
  3.     io_tech_request_context->get_converted_keys(
  4.     IMPORTING
  5.       es_key_values = ls_employee_entity_key
  6.     ).
  7.  
  8.     SELECT * FROM zapp_table INTO TABLE @DATA(lt_employee) WHERE zz_number = @ls_employee_entity_key-zz_number.
  9.  
  10.     READ TABLE lt_employee  ASSIGNING FIELD-SYMBOL(<fs_empl>) INDEX 1.
  11.     IF sy-subrc EQ 0.
  12.       MOVE-CORRESPONDING <fs_empl> TO er_entity.
  13.     ENDIF.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement