SWW_WI_CREATE SAP Function module

DATA:
ld_wi_id  
 
 TYPE SWWWIHEAD-WI_ID
,
ld_wi_header  
 
 TYPE SWWWIHEAD
,
ld_ex_wi_handle  
 
 TYPE IF_SWF_RUN_WIM_INTERNAL
,
ld_ex_wi_exception  
 
 TYPE CX_SWF_RUN_WIM
,
it_agents  
 
 TYPE STANDARD TABLE OF SWHACTOR,"TABLES PARAM
wa_agents
 
 LIKE LINE OF it_agents
,
it_deadline_agents  
 
 TYPE STANDARD TABLE OF SWHACTOR,"TABLES PARAM
wa_deadline_agents
 
 LIKE LINE OF it_deadline_agents
,
it_desired_end_agents  
 
 TYPE STANDARD TABLE OF SWHACTOR,"TABLES PARAM
wa_desired_end_agents
 
 LIKE LINE OF it_desired_end_agents
,
it_latest_start_agents  
 
 TYPE STANDARD TABLE OF SWHACTOR,"TABLES PARAM
wa_latest_start_agents
 
 LIKE LINE OF it_latest_start_agents
,
it_excluded_agents  
 
 TYPE STANDARD TABLE OF SWHACTOR,"TABLES PARAM
wa_excluded_agents
 
 LIKE LINE OF it_excluded_agents
,
it_notification_agents  
 
 TYPE STANDARD TABLE OF SWHACTOR,"TABLES PARAM
wa_notification_agents
 
 LIKE LINE OF it_notification_agents
,
it_secondary_methods  
 
 TYPE STANDARD TABLE OF SWWMETHODS,"TABLES PARAM
wa_secondary_methods
 
 LIKE LINE OF it_secondary_methods
,
it_wi_container  
 
 TYPE STANDARD TABLE OF SWCONT,"TABLES PARAM
wa_wi_container
 
 LIKE LINE OF it_wi_container
,
it_comp_events  
 
 TYPE STANDARD TABLE OF SWWCOMPEVT,"TABLES PARAM
wa_comp_events
 
 LIKE LINE OF it_comp_events
,
it_return_codes  
 
 TYPE STANDARD TABLE OF SWP_RETURN,"TABLES PARAM
wa_return_codes
 
 LIKE LINE OF it_return_codes
,
it_om_bind_def  
 
 TYPE STANDARD TABLE OF SWABINDEF,"TABLES PARAM
wa_om_bind_def
 
 LIKE LINE OF it_om_bind_def
,
it_method_exec_list  
 
 TYPE STANDARD TABLE OF SWWMETHODS,"TABLES PARAM
wa_method_exec_list
 
 LIKE LINE OF it_method_exec_list
.


DATA(ld_wi_container_handle) = 'Check type of data required'.
 

SELECT single WI_CBFB 
  FROM SWWWIHEAD 
  INTO @DATA(ld_callback_fb).

 

SELECT single WI_CHCKWI 
  FROM SWWWIHEAD 
  INTO @DATA(ld_checked_wi).

 

SELECT single WI_CONFIRM 
  FROM SWWWIHEAD 
  INTO @DATA(ld_confirm).

 

SELECT single WI_CREATOR 
  FROM SWWWIHEAD 
  INTO @DATA(ld_creator).


DATA(ld_desired_end_action) = 'Check type of data required'.

DATA(ld_desired_end_date) = 'Check type of data required'.

DATA(ld_desired_end_time) = 'Check type of data required'.

DATA(ld_desired_start_date) = 'Check type of data required'.

DATA(ld_desired_start_time) = 'Check type of data required'.
 

SELECT single WI_LANG 
  FROM SWWWIHEAD 
  INTO @DATA(ld_language).


DATA(ld_latest_end_action) = 'Check type of data required'.

DATA(ld_latest_end_date) = 'Check type of data required'.

DATA(ld_latest_end_escalation) = 'Check type of data required'.

DATA(ld_latest_end_time) = 'Check type of data required'.

DATA(ld_latest_start_action) = 'Check type of data required'.

DATA(ld_latest_start_date) = 'Check type of data required'.

DATA(ld_latest_start_time) = 'Check type of data required'.
 

SELECT single MAX_COUNT 
  FROM SWWEI 
  INTO @DATA(ld_max_event_count).

 

SELECT single MAX_RETRY 
  FROM SWWWIHEAD 
  INTO @DATA(ld_max_retry_count).

 

SELECT single WI_PRIO 
  FROM SWWWIHEAD 
  INTO @DATA(ld_priority).

 

SELECT single WI_RH_TASK 
  FROM SWWWIHEAD 
  INTO @DATA(ld_task).

 

SELECT single WI_TYPE 
  FROM SWWWIHEAD 
  INTO @DATA(ld_workitem_type).



DATA(ld_do_commit) = some text here


DATA(ld_do_sync_callback) = some text here
 

SELECT single WI_TEXT 
  FROM SWWWIHEAD 
  INTO @DATA(ld_text).

 

SELECT single SYNCCHAIN 
  FROM SWWWIHEAD 
  INTO @DATA(ld_do_sync_wi_chain).


DATA(ld_created_by_user) = 'some text here'.

DATA(ld_created_by_address) = 'some text here'.


DATA(ld_called_in_background) = some text here
 

SELECT single LOGSYS 
  FROM TBDLS 
  INTO @DATA(ld_logical_system).

 

SELECT single WLC_DISPL 
  FROM SWWWIHEAD 
  INTO @DATA(ld_step_modeled_wi_display).



DATA(ld_no_deadline_parameters) = some text here
 

SELECT single WI_RESTLOG 
  FROM SWWWIHEAD 
  INTO @DATA(ld_restricted_log).

 

SELECT single TIMEOUT 
  FROM SWWWIHEAD 
  INTO @DATA(ld_seconds_until_timeout).



DATA(ld_create_event) = some text here
 

SELECT single STATUS_EVT 
  FROM SWWWIHEAD 
  INTO @DATA(ld_status_event).


DATA(ld_xml_protocol) = 'some text here'.
 

SELECT single WLC_FLAGS 
  FROM SWWWIHEAD 
  INTO @DATA(ld_wlc_flags).


DATA(ld_properties) = 'some text here'.

DATA(ld_status) = 'some text here'.


DATA(ld_use_wiid_as_objid) = some text here

DATA(ld_node_type) = 'some text here'.

DATA(ld_wi_rejectable) = 'some text here'.
 

"populate fields of struture and append to itab
append wa_agents to it_agents.
 

"populate fields of struture and append to itab
append wa_deadline_agents to it_deadline_agents.
 

"populate fields of struture and append to itab
append wa_desired_end_agents to it_desired_end_agents.
 

"populate fields of struture and append to itab
append wa_latest_start_agents to it_latest_start_agents.
 

"populate fields of struture and append to itab
append wa_excluded_agents to it_excluded_agents.
 

"populate fields of struture and append to itab
append wa_notification_agents to it_notification_agents.
 

"populate fields of struture and append to itab
append wa_secondary_methods to it_secondary_methods.
 

"populate fields of struture and append to itab
append wa_wi_container to it_wi_container.
 

"populate fields of struture and append to itab
append wa_comp_events to it_comp_events.
 

"populate fields of struture and append to itab
append wa_return_codes to it_return_codes.
 

"populate fields of struture and append to itab
append wa_om_bind_def to it_om_bind_def.
 

"populate fields of struture and append to itab
append wa_method_exec_list to it_method_exec_list.
.

CALL FUNCTION 'SWW_WI_CREATE'
* EXPORTING
*   callback_fb =                ld_callback_fb
*   checked_wi =                 ld_checked_wi
*   confirm =                    ld_confirm
*   creator =                    ld_creator
*   desired_end_action =         ld_desired_end_action
*   desired_end_date =           ld_desired_end_date
*   desired_end_time =           ld_desired_end_time
*   desired_start_date =         ld_desired_start_date
*   desired_start_time =         ld_desired_start_time
*   language =                   ld_language
*   latest_end_action =          ld_latest_end_action
*   latest_end_date =            ld_latest_end_date
*   latest_end_escalation =      ld_latest_end_escalation
*   latest_end_time =            ld_latest_end_time
*   latest_start_action =        ld_latest_start_action
*   latest_start_date =          ld_latest_start_date
*   latest_start_time =          ld_latest_start_time
*   max_event_count =            ld_max_event_count
*   max_retry_count =            ld_max_retry_count
*   priority =                   ld_priority
*   task =                       ld_task
*   workitem_type =              ld_workitem_type
*   do_commit =                  ld_do_commit
*   do_sync_callback =           ld_do_sync_callback
*   text =                       ld_text
*   do_sync_wi_chain =           ld_do_sync_wi_chain
*   created_by_user =            ld_created_by_user
*   created_by_address =         ld_created_by_address
*   called_in_background =       ld_called_in_background
*   logical_system =             ld_logical_system
*   step_modeled_wi_display =    ld_step_modeled_wi_display
*   no_deadline_parameters =     ld_no_deadline_parameters
*   restricted_log =             ld_restricted_log
*   seconds_until_timeout =      ld_seconds_until_timeout
*   create_event =               ld_create_event
*   status_event =               ld_status_event
*   xml_protocol =               ld_xml_protocol
*   wlc_flags =                  ld_wlc_flags
*   properties =                 ld_properties
*   status =                     ld_status
*   use_wiid_as_objid =          ld_use_wiid_as_objid
*   node_type =                  ld_node_type
*   wi_rejectable =              ld_wi_rejectable
  IMPORTING
    wi_id =                      ld_wi_id
    wi_header =                  ld_wi_header
    ex_wi_handle =               ld_ex_wi_handle
    ex_wi_exception =            ld_ex_wi_exception
* TABLES
*   agents =                     it_agents
*   deadline_agents =            it_deadline_agents
*   desired_end_agents =         it_desired_end_agents
*   latest_start_agents =        it_latest_start_agents
*   excluded_agents =            it_excluded_agents
*   notification_agents =        it_notification_agents
*   secondary_methods =          it_secondary_methods
*   wi_container =               it_wi_container
*   comp_events =                it_comp_events
*   return_codes =               it_return_codes
*   om_bind_def =                it_om_bind_def
*   method_exec_list =           it_method_exec_list
* CHANGING
*   wi_container_handle =        ld_wi_container_handle
  EXCEPTIONS
    ID_NOT_CREATED =             1
    READ_FAILED =                2
    .  "  SWW_WI_CREATE

IF SY-SUBRC EQ 0.
  "All OK
ELSEIF SY-SUBRC EQ 1. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 2. "Exception
  "Add code for exception here
ENDIF.