SHARE
TWEET

OVERRIDE_EVENT_GAF post_exit

Olegster Oct 30th, 2019 148 in 245 days
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. **   get message manager
  2. *  data lo_api_controller     type ref to if_wd_controller.
  3. *  data lo_message_manager    type ref to if_wd_message_manager.
  4. *
  5. *  lo_api_controller ?= wd_This->Wd_Get_Api( ).
  6. *
  7. *  CALL METHOD lo_api_controller->GET_MESSAGE_MANAGER
  8. *    RECEIVING
  9. *      MESSAGE_MANAGER = lo_message_manager
  10. *      .
  11. ***********************************************************************
  12. *
  13. *  DATA lo_nd_comp_roles TYPE REF TO if_wd_context_node.
  14. *  DATA lt_comp_roles TYPE wd_this->Elements_comp_roles.
  15. *  DATA ls_comp_roles TYPE wd_this->Element_comp_roles.
  16. *  lo_nd_comp_roles = wd_context->get_child_node( name = wd_this->wdctx_comp_roles ).
  17. *  lo_nd_comp_roles->get_static_attributes_table( importing table = lt_comp_roles ).
  18. *
  19. *  DATA lo_nd_role_properties TYPE REF TO if_wd_context_node.
  20. *  DATA lo_el_role_properties TYPE REF TO if_wd_context_element.
  21. *  DATA ls_role_properties TYPE wd_this->Element_role_properties.
  22. *  DATA lv_attribute TYPE wd_this->Element_role_properties-attribute.
  23. *  lo_nd_role_properties = wd_context->get_child_node( name = wd_this->wdctx_role_properties ).
  24. *  lo_el_role_properties = lo_nd_role_properties->get_element( ).
  25. **  lo_el_role_properties->get_attribute( EXPORTING name =  `ATTRIBUTE` IMPORTING value = lv_attribute ).
  26. *
  27. *  data: flag type i VALUE 0.
  28. *
  29. *  loop at lt_comp_roles into ls_comp_roles.
  30. *    if ls_comp_roles-role_type eq 'COM'.
  31. *      flag = 1.
  32. *    endif.
  33. *  endloop.
  34. *
  35. ***********************************************************************
  36. *
  37. *  DATA: lv_state TYPE if_fpm_gaf=>ty_s_state.
  38. *   CHECK wd_this->auth_check( ) EQ ABAP_TRUE.
  39. *
  40. *   io_gaf->get_current_state( IMPORTING es_current_state = lv_state ).
  41. **   if lv_state-mainstep NE 'SEL_ROLE'.
  42. *   if lv_state-mainstep ne wd_assist->step-uibb1.
  43. **   case lv_state-mainstep.
  44. **     when wd_assist->step-uibb1.
  45. *     lo_el_role_properties->get_attribute( EXPORTING name =  `ATTRIBUTE` IMPORTING value = lv_attribute ).
  46. **   endif.
  47. **     lv_state-mainstep = wd_assist->step-uibb1.
  48. *     if flag = 1 and lv_attribute eq 'COMPANY'.
  49. *        case io_gaf->mo_event->mv_event_id.
  50. *          when io_gaf->mo_event->gc_event_next_step.
  51. *            Case lv_state-mainstep.
  52. *              WHEN wd_assist->step-uibb1.
  53. *                wd_this->process_step1( ).
  54. *              WHEN wd_assist->step-uibb2.
  55. *                wd_this->process_step2( ).
  56. *              WHEN wd_assist->step-uibb3.
  57. *                wd_this->process_step3( ).
  58. *                wd_this->call_ticket_popup( ).
  59. *            endcase.
  60. *          when wd_assist->button_actions-submit.
  61. *            wd_this->process_submit( ).
  62. *        endcase.
  63. *     endif.
  64. *    endif.
  65. **  endcase.
  66. **  io_gaf->mo_event->mv_event_id = 'FPM_PREVIOUS_STEP'.
  67. *
  68. ***********************************************************************
  69. *
  70. *
  71. ***********************************************************************
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top