SAP Function Modules

CBIH_IA30_UE_IAL_MAIN_CHECK SAP Function module - EHS: User Exit Template for Checks of Incident/Accident Log Data in APIs







CBIH_IA30_UE_IAL_MAIN_CHECK is a standard SAP function module available within R/3 SAP systems depending on your version and release level. Below is the pattern details for this FM showing its interface including any import and export parameters, exceptions etc as well as any documentation contributions (Comments) specific to the object.

See here to view full function module documentation and code listing, simply by entering the name CBIH_IA30_UE_IAL_MAIN_CHECK into the relevant SAP transaction such as SE37 or SE80.

Associated Function Group: CBIH_IA30
Released Date: Not Released
Processing type: Normal fucntion module
Normal function module settings


Pattern for FM CBIH_IA30_UE_IAL_MAIN_CHECK - CBIH IA30 UE IAL MAIN CHECK





CALL FUNCTION 'CBIH_IA30_UE_IAL_MAIN_CHECK' "EHS: User Exit Template for Checks of Incident/Accident Log Data in APIs
  EXPORTING
    i_called_api =              " char3         Calling API
    i_addinf =                  " rcgaddinf     Additional Information on Object
*   i_flg_check_only = ESP1_FALSE  " esp1_boolean  Indicator: Check data only
*   i_flg_phrasecheck_off = ESP1_FALSE  " esp1_boolean
*   i_flg_fill_exterror = ESP1_FALSE  " esp1_boolean  Indicator: Fill extended error information table
*   i_flg_header = ESP1_FALSE   " esp1_boolean
*   i_flg_result_ltxt = ESP1_FALSE  " esp1_boolean
*   i_flg_action = ESP1_FALSE   " esp1_boolean
*   i_flg_invpers = ESP1_FALSE  " esp1_boolean
*   i_flg_invpers_ltxt = ESP1_FALSE  " esp1_boolean
*   i_flg_affpers = ESP1_FALSE  " esp1_boolean
*   i_flg_aff_intltxt = ESP1_FALSE  " esp1_boolean
*   i_flg_aff_extltxt = ESP1_FALSE  " esp1_boolean
*   i_flg_injuries = ESP1_FALSE  " esp1_boolean
*   i_flg_ia_val = ESP1_FALSE   " esp1_boolean
*   i_flg_ip_val = ESP1_FALSE   " esp1_boolean  Indicator: Classification system value assignments person affected
*   i_flg_check_clvalue = ESP1_TRUE  " esp1_boolean  Indicator: Check value assignment data
*   i_flg_action_ltxt = ESP1_FALSE  " esp1_boolean
*   i_flg_freetext = ESP1_FALSE  " esp1_boolean
*   i_flg_freetext_ltxt = ESP1_FALSE  " esp1_boolean
*   i_flg_rootcause = ESP1_FALSE  " esp1_boolean
*   i_flg_absences = ESP1_FALSE  " esp1_boolean
*   i_flg_restrictions = ESP1_FALSE  " esp1_boolean
  IMPORTING
    e_flg_lockfail =            " esp1_boolean  Lock on at least one record failed indicator
    e_flg_error =               " esp1_boolean  Indicator: Error Updating a Record
    e_flg_warning =             " esp1_boolean  Indicator: Warning Updating a Record
* TABLES
*   x_api_ial_cre_tab =         " cihal_ial_api_tab_type
*   x_api_header_tab =          " cihal_ialhapi_tab_type  Incident/accident log header data
*   x_api_result_ltxt_tab =     " cihal_resltapi_tab_type
*   x_api_action_tab =          " cihac_achapi_tab_type  IHS safety measures
*   x_api_invpersons_tab =      " cihal_ipapi_tab_type  Persons Involved
*   x_api_invpers_ltxt_tab =    " cihal_ipltapi_tab_type
*   x_api_affpersdat_tab =      " cihal_ipevaapi_tab_type  Event data for persons affected
*   x_api_aff_intltxt_tab =     " cihal_ipevaltapi_tab_type
*   x_api_aff_extltxt_tab =     " cihal_ipevaltapi_tab_type
*   x_api_injuries_tab =        " cihal_ipevinjapi_tab_type  Injuries to persons affected
*   x_api_iava_data_tab =       " cih01_ihvalapi_tab_type  Value assignment instances for incident/accident log header
*   x_api_iaprop_data_tab =     " cih01_ihprapi_tab_type  Value Assignment Data (Characteristic Value Assignments) for Inc./Acc. Log
*   x_api_ipva_data_tab =       " cih01_ihvalapi_tab_type  Value assignment instances for person affected
*   x_api_ipprop_data_tab =     " cih01_ihprapi_tab_type  Value Assignment Data (Characteristic Value Assignments) for Person Affected
*   x_api_action_ltxt_tab =     " cihac_acltapi_tab_type  Long Text for Safety Measures
*   x_api_freetext_tab =        " cih01_dftapi_tab_type  User-defined texts and documents
*   x_api_freetext_ltxt_tab =   " cih01_dftltapi_tab_type  Long texts for user-defined texts and documents
*   x_api_rootcause_tab =       " ccihy_rcapi   Accident Causes (Root Cause)
*   x_api_absences_tab =        " ccihy_ipabssapi  Absences of Persons Affected
*   x_api_restrictions_tab =    " ccihy_ipevalimapi  Multiple Restrictions of Person Affected
*   i_ex_api_header_tab =       " cihal_ialhapi_tab_type
*   i_ex_api_result_ltxt_tab =   " cihal_resltapi_tab_type
*   i_ex_api_action_tab =       " cihac_achapi_tab_type
*   i_ex_api_invpersons_tab =   " cihal_ipapi_tab_type  Existing Person Involved
*   i_ex_api_invpers_ltxt_tab =   " cihal_ipltapi_tab_type
*   i_ex_api_affpersdat_tab =   " cihal_ipevaapi_tab_type  Existing event data for person affected
*   i_ex_api_aff_intltxt_tab =   " cihal_ipevaltapi_tab_type
*   i_ex_api_aff_extltxt_tab =   " cihal_ipevaltapi_tab_type
*   i_ex_api_injuries_tab =     " cihal_ipevinjapi_tab_type
*   i_ex_api_iava_data_tab =    " cih01_ihvalapi_tab_type
*   i_ex_api_iaprop_data_tab =   " cih01_ihprapi_tab_type
*   i_ex_api_ipva_data_tab =    " cih01_ihvalapi_tab_type
*   i_ex_api_ipprop_data_tab =   " cih01_ihprapi_tab_type
*   i_ex_api_action_ltxt_tab =   " cihac_acltapi_tab_type
*   i_ex_api_freetext_tab =     " cih01_dftapi_tab_type  Existing user-defined texts and documents
*   i_ex_api_freetext_ltxt_tab =   " cih01_dftltapi_tab_type
*   i_ex_api_rootcause_tab =    " ccihy_rcapi
*   i_ex_api_absences_tab =     " ccihy_ipabssapi  Existing absences for persons affected
*   i_ex_api_restrictions_tab =   " ccihy_ipevalimapi
*   e_error_tab =               " espap_exterror_tab_type  Error Log Table
  EXCEPTIONS
    INTERNAL_ERROR = 1          "               Internal Error or Customizing Error
    .  "  CBIH_IA30_UE_IAL_MAIN_CHECK

ABAP code example for Function Module CBIH_IA30_UE_IAL_MAIN_CHECK





The ABAP code below is a full code listing to execute function module CBIH_IA30_UE_IAL_MAIN_CHECK including all data declarations. The code uses the latest in-line data DECLARATION SYNTAX but I have included an ABAP code snippet at the end to show how declarations would look using the original method of declaring data variables up front. This will allow you to compare and fully understand the new inline method. Please note some of the newer syntax such as the @DATA is not available until a later 4.70 service pack (SP8).

DATA:
ld_e_flg_lockfail  TYPE ESP1_BOOLEAN ,
ld_e_flg_error  TYPE ESP1_BOOLEAN ,
ld_e_flg_warning  TYPE ESP1_BOOLEAN ,
it_x_api_ial_cre_tab  TYPE STANDARD TABLE OF CIHAL_IAL_API_TAB_TYPE,"TABLES PARAM
wa_x_api_ial_cre_tab  LIKE LINE OF it_x_api_ial_cre_tab ,
it_x_api_header_tab  TYPE STANDARD TABLE OF CIHAL_IALHAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_header_tab  LIKE LINE OF it_x_api_header_tab ,
it_x_api_result_ltxt_tab  TYPE STANDARD TABLE OF CIHAL_RESLTAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_result_ltxt_tab  LIKE LINE OF it_x_api_result_ltxt_tab ,
it_x_api_action_tab  TYPE STANDARD TABLE OF CIHAC_ACHAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_action_tab  LIKE LINE OF it_x_api_action_tab ,
it_x_api_invpersons_tab  TYPE STANDARD TABLE OF CIHAL_IPAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_invpersons_tab  LIKE LINE OF it_x_api_invpersons_tab ,
it_x_api_invpers_ltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPLTAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_invpers_ltxt_tab  LIKE LINE OF it_x_api_invpers_ltxt_tab ,
it_x_api_affpersdat_tab  TYPE STANDARD TABLE OF CIHAL_IPEVAAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_affpersdat_tab  LIKE LINE OF it_x_api_affpersdat_tab ,
it_x_api_aff_intltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPEVALTAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_aff_intltxt_tab  LIKE LINE OF it_x_api_aff_intltxt_tab ,
it_x_api_aff_extltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPEVALTAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_aff_extltxt_tab  LIKE LINE OF it_x_api_aff_extltxt_tab ,
it_x_api_injuries_tab  TYPE STANDARD TABLE OF CIHAL_IPEVINJAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_injuries_tab  LIKE LINE OF it_x_api_injuries_tab ,
it_x_api_iava_data_tab  TYPE STANDARD TABLE OF CIH01_IHVALAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_iava_data_tab  LIKE LINE OF it_x_api_iava_data_tab ,
it_x_api_iaprop_data_tab  TYPE STANDARD TABLE OF CIH01_IHPRAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_iaprop_data_tab  LIKE LINE OF it_x_api_iaprop_data_tab ,
it_x_api_ipva_data_tab  TYPE STANDARD TABLE OF CIH01_IHVALAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_ipva_data_tab  LIKE LINE OF it_x_api_ipva_data_tab ,
it_x_api_ipprop_data_tab  TYPE STANDARD TABLE OF CIH01_IHPRAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_ipprop_data_tab  LIKE LINE OF it_x_api_ipprop_data_tab ,
it_x_api_action_ltxt_tab  TYPE STANDARD TABLE OF CIHAC_ACLTAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_action_ltxt_tab  LIKE LINE OF it_x_api_action_ltxt_tab ,
it_x_api_freetext_tab  TYPE STANDARD TABLE OF CIH01_DFTAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_freetext_tab  LIKE LINE OF it_x_api_freetext_tab ,
it_x_api_freetext_ltxt_tab  TYPE STANDARD TABLE OF CIH01_DFTLTAPI_TAB_TYPE,"TABLES PARAM
wa_x_api_freetext_ltxt_tab  LIKE LINE OF it_x_api_freetext_ltxt_tab ,
it_x_api_rootcause_tab  TYPE STANDARD TABLE OF CCIHY_RCAPI,"TABLES PARAM
wa_x_api_rootcause_tab  LIKE LINE OF it_x_api_rootcause_tab ,
it_x_api_absences_tab  TYPE STANDARD TABLE OF CCIHY_IPABSSAPI,"TABLES PARAM
wa_x_api_absences_tab  LIKE LINE OF it_x_api_absences_tab ,
it_x_api_restrictions_tab  TYPE STANDARD TABLE OF CCIHY_IPEVALIMAPI,"TABLES PARAM
wa_x_api_restrictions_tab  LIKE LINE OF it_x_api_restrictions_tab ,
it_i_ex_api_header_tab  TYPE STANDARD TABLE OF CIHAL_IALHAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_header_tab  LIKE LINE OF it_i_ex_api_header_tab ,
it_i_ex_api_result_ltxt_tab  TYPE STANDARD TABLE OF CIHAL_RESLTAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_result_ltxt_tab  LIKE LINE OF it_i_ex_api_result_ltxt_tab ,
it_i_ex_api_action_tab  TYPE STANDARD TABLE OF CIHAC_ACHAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_action_tab  LIKE LINE OF it_i_ex_api_action_tab ,
it_i_ex_api_invpersons_tab  TYPE STANDARD TABLE OF CIHAL_IPAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_invpersons_tab  LIKE LINE OF it_i_ex_api_invpersons_tab ,
it_i_ex_api_invpers_ltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPLTAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_invpers_ltxt_tab  LIKE LINE OF it_i_ex_api_invpers_ltxt_tab ,
it_i_ex_api_affpersdat_tab  TYPE STANDARD TABLE OF CIHAL_IPEVAAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_affpersdat_tab  LIKE LINE OF it_i_ex_api_affpersdat_tab ,
it_i_ex_api_aff_intltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPEVALTAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_aff_intltxt_tab  LIKE LINE OF it_i_ex_api_aff_intltxt_tab ,
it_i_ex_api_aff_extltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPEVALTAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_aff_extltxt_tab  LIKE LINE OF it_i_ex_api_aff_extltxt_tab ,
it_i_ex_api_injuries_tab  TYPE STANDARD TABLE OF CIHAL_IPEVINJAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_injuries_tab  LIKE LINE OF it_i_ex_api_injuries_tab ,
it_i_ex_api_iava_data_tab  TYPE STANDARD TABLE OF CIH01_IHVALAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_iava_data_tab  LIKE LINE OF it_i_ex_api_iava_data_tab ,
it_i_ex_api_iaprop_data_tab  TYPE STANDARD TABLE OF CIH01_IHPRAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_iaprop_data_tab  LIKE LINE OF it_i_ex_api_iaprop_data_tab ,
it_i_ex_api_ipva_data_tab  TYPE STANDARD TABLE OF CIH01_IHVALAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_ipva_data_tab  LIKE LINE OF it_i_ex_api_ipva_data_tab ,
it_i_ex_api_ipprop_data_tab  TYPE STANDARD TABLE OF CIH01_IHPRAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_ipprop_data_tab  LIKE LINE OF it_i_ex_api_ipprop_data_tab ,
it_i_ex_api_action_ltxt_tab  TYPE STANDARD TABLE OF CIHAC_ACLTAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_action_ltxt_tab  LIKE LINE OF it_i_ex_api_action_ltxt_tab ,
it_i_ex_api_freetext_tab  TYPE STANDARD TABLE OF CIH01_DFTAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_freetext_tab  LIKE LINE OF it_i_ex_api_freetext_tab ,
it_i_ex_api_freetext_ltxt_tab  TYPE STANDARD TABLE OF CIH01_DFTLTAPI_TAB_TYPE,"TABLES PARAM
wa_i_ex_api_freetext_ltxt_tab  LIKE LINE OF it_i_ex_api_freetext_ltxt_tab ,
it_i_ex_api_rootcause_tab  TYPE STANDARD TABLE OF CCIHY_RCAPI,"TABLES PARAM
wa_i_ex_api_rootcause_tab  LIKE LINE OF it_i_ex_api_rootcause_tab ,
it_i_ex_api_absences_tab  TYPE STANDARD TABLE OF CCIHY_IPABSSAPI,"TABLES PARAM
wa_i_ex_api_absences_tab  LIKE LINE OF it_i_ex_api_absences_tab ,
it_i_ex_api_restrictions_tab  TYPE STANDARD TABLE OF CCIHY_IPEVALIMAPI,"TABLES PARAM
wa_i_ex_api_restrictions_tab  LIKE LINE OF it_i_ex_api_restrictions_tab ,
it_e_error_tab  TYPE STANDARD TABLE OF ESPAP_EXTERROR_TAB_TYPE,"TABLES PARAM
wa_e_error_tab  LIKE LINE OF it_e_error_tab .

DATA(ld_i_called_api) = 'Check type of data required'.
DATA(ld_i_addinf) = 'Check type of data required'.
DATA(ld_i_flg_check_only) = 'Check type of data required'.
DATA(ld_i_flg_phrasecheck_off) = 'Check type of data required'.
DATA(ld_i_flg_fill_exterror) = 'Check type of data required'.
DATA(ld_i_flg_header) = 'Check type of data required'.
DATA(ld_i_flg_result_ltxt) = 'Check type of data required'.
DATA(ld_i_flg_action) = 'Check type of data required'.
DATA(ld_i_flg_invpers) = 'Check type of data required'.
DATA(ld_i_flg_invpers_ltxt) = 'Check type of data required'.
DATA(ld_i_flg_affpers) = 'Check type of data required'.
DATA(ld_i_flg_aff_intltxt) = 'Check type of data required'.
DATA(ld_i_flg_aff_extltxt) = 'Check type of data required'.
DATA(ld_i_flg_injuries) = 'Check type of data required'.
DATA(ld_i_flg_ia_val) = 'Check type of data required'.
DATA(ld_i_flg_ip_val) = 'Check type of data required'.
DATA(ld_i_flg_check_clvalue) = 'Check type of data required'.
DATA(ld_i_flg_action_ltxt) = 'Check type of data required'.
DATA(ld_i_flg_freetext) = 'Check type of data required'.
DATA(ld_i_flg_freetext_ltxt) = 'Check type of data required'.
DATA(ld_i_flg_rootcause) = 'Check type of data required'.
DATA(ld_i_flg_absences) = 'Check type of data required'.
DATA(ld_i_flg_restrictions) = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_ial_cre_tab to it_x_api_ial_cre_tab.

"populate fields of struture and append to itab
append wa_x_api_header_tab to it_x_api_header_tab.

"populate fields of struture and append to itab
append wa_x_api_result_ltxt_tab to it_x_api_result_ltxt_tab.

"populate fields of struture and append to itab
append wa_x_api_action_tab to it_x_api_action_tab.

"populate fields of struture and append to itab
append wa_x_api_invpersons_tab to it_x_api_invpersons_tab.

"populate fields of struture and append to itab
append wa_x_api_invpers_ltxt_tab to it_x_api_invpers_ltxt_tab.

"populate fields of struture and append to itab
append wa_x_api_affpersdat_tab to it_x_api_affpersdat_tab.

"populate fields of struture and append to itab
append wa_x_api_aff_intltxt_tab to it_x_api_aff_intltxt_tab.

"populate fields of struture and append to itab
append wa_x_api_aff_extltxt_tab to it_x_api_aff_extltxt_tab.

"populate fields of struture and append to itab
append wa_x_api_injuries_tab to it_x_api_injuries_tab.

"populate fields of struture and append to itab
append wa_x_api_iava_data_tab to it_x_api_iava_data_tab.

"populate fields of struture and append to itab
append wa_x_api_iaprop_data_tab to it_x_api_iaprop_data_tab.

"populate fields of struture and append to itab
append wa_x_api_ipva_data_tab to it_x_api_ipva_data_tab.

"populate fields of struture and append to itab
append wa_x_api_ipprop_data_tab to it_x_api_ipprop_data_tab.

"populate fields of struture and append to itab
append wa_x_api_action_ltxt_tab to it_x_api_action_ltxt_tab.

"populate fields of struture and append to itab
append wa_x_api_freetext_tab to it_x_api_freetext_tab.

"populate fields of struture and append to itab
append wa_x_api_freetext_ltxt_tab to it_x_api_freetext_ltxt_tab.

"populate fields of struture and append to itab
append wa_x_api_rootcause_tab to it_x_api_rootcause_tab.

"populate fields of struture and append to itab
append wa_x_api_absences_tab to it_x_api_absences_tab.

"populate fields of struture and append to itab
append wa_x_api_restrictions_tab to it_x_api_restrictions_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_header_tab to it_i_ex_api_header_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_result_ltxt_tab to it_i_ex_api_result_ltxt_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_action_tab to it_i_ex_api_action_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_invpersons_tab to it_i_ex_api_invpersons_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_invpers_ltxt_tab to it_i_ex_api_invpers_ltxt_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_affpersdat_tab to it_i_ex_api_affpersdat_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_aff_intltxt_tab to it_i_ex_api_aff_intltxt_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_aff_extltxt_tab to it_i_ex_api_aff_extltxt_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_injuries_tab to it_i_ex_api_injuries_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_iava_data_tab to it_i_ex_api_iava_data_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_iaprop_data_tab to it_i_ex_api_iaprop_data_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_ipva_data_tab to it_i_ex_api_ipva_data_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_ipprop_data_tab to it_i_ex_api_ipprop_data_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_action_ltxt_tab to it_i_ex_api_action_ltxt_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_freetext_tab to it_i_ex_api_freetext_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_freetext_ltxt_tab to it_i_ex_api_freetext_ltxt_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_rootcause_tab to it_i_ex_api_rootcause_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_absences_tab to it_i_ex_api_absences_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_restrictions_tab to it_i_ex_api_restrictions_tab.

"populate fields of struture and append to itab
append wa_e_error_tab to it_e_error_tab. . CALL FUNCTION 'CBIH_IA30_UE_IAL_MAIN_CHECK' EXPORTING i_called_api = ld_i_called_api i_addinf = ld_i_addinf * i_flg_check_only = ld_i_flg_check_only * i_flg_phrasecheck_off = ld_i_flg_phrasecheck_off * i_flg_fill_exterror = ld_i_flg_fill_exterror * i_flg_header = ld_i_flg_header * i_flg_result_ltxt = ld_i_flg_result_ltxt * i_flg_action = ld_i_flg_action * i_flg_invpers = ld_i_flg_invpers * i_flg_invpers_ltxt = ld_i_flg_invpers_ltxt * i_flg_affpers = ld_i_flg_affpers * i_flg_aff_intltxt = ld_i_flg_aff_intltxt * i_flg_aff_extltxt = ld_i_flg_aff_extltxt * i_flg_injuries = ld_i_flg_injuries * i_flg_ia_val = ld_i_flg_ia_val * i_flg_ip_val = ld_i_flg_ip_val * i_flg_check_clvalue = ld_i_flg_check_clvalue * i_flg_action_ltxt = ld_i_flg_action_ltxt * i_flg_freetext = ld_i_flg_freetext * i_flg_freetext_ltxt = ld_i_flg_freetext_ltxt * i_flg_rootcause = ld_i_flg_rootcause * i_flg_absences = ld_i_flg_absences * i_flg_restrictions = ld_i_flg_restrictions IMPORTING e_flg_lockfail = ld_e_flg_lockfail e_flg_error = ld_e_flg_error e_flg_warning = ld_e_flg_warning * TABLES * x_api_ial_cre_tab = it_x_api_ial_cre_tab * x_api_header_tab = it_x_api_header_tab * x_api_result_ltxt_tab = it_x_api_result_ltxt_tab * x_api_action_tab = it_x_api_action_tab * x_api_invpersons_tab = it_x_api_invpersons_tab * x_api_invpers_ltxt_tab = it_x_api_invpers_ltxt_tab * x_api_affpersdat_tab = it_x_api_affpersdat_tab * x_api_aff_intltxt_tab = it_x_api_aff_intltxt_tab * x_api_aff_extltxt_tab = it_x_api_aff_extltxt_tab * x_api_injuries_tab = it_x_api_injuries_tab * x_api_iava_data_tab = it_x_api_iava_data_tab * x_api_iaprop_data_tab = it_x_api_iaprop_data_tab * x_api_ipva_data_tab = it_x_api_ipva_data_tab * x_api_ipprop_data_tab = it_x_api_ipprop_data_tab * x_api_action_ltxt_tab = it_x_api_action_ltxt_tab * x_api_freetext_tab = it_x_api_freetext_tab * x_api_freetext_ltxt_tab = it_x_api_freetext_ltxt_tab * x_api_rootcause_tab = it_x_api_rootcause_tab * x_api_absences_tab = it_x_api_absences_tab * x_api_restrictions_tab = it_x_api_restrictions_tab * i_ex_api_header_tab = it_i_ex_api_header_tab * i_ex_api_result_ltxt_tab = it_i_ex_api_result_ltxt_tab * i_ex_api_action_tab = it_i_ex_api_action_tab * i_ex_api_invpersons_tab = it_i_ex_api_invpersons_tab * i_ex_api_invpers_ltxt_tab = it_i_ex_api_invpers_ltxt_tab * i_ex_api_affpersdat_tab = it_i_ex_api_affpersdat_tab * i_ex_api_aff_intltxt_tab = it_i_ex_api_aff_intltxt_tab * i_ex_api_aff_extltxt_tab = it_i_ex_api_aff_extltxt_tab * i_ex_api_injuries_tab = it_i_ex_api_injuries_tab * i_ex_api_iava_data_tab = it_i_ex_api_iava_data_tab * i_ex_api_iaprop_data_tab = it_i_ex_api_iaprop_data_tab * i_ex_api_ipva_data_tab = it_i_ex_api_ipva_data_tab * i_ex_api_ipprop_data_tab = it_i_ex_api_ipprop_data_tab * i_ex_api_action_ltxt_tab = it_i_ex_api_action_ltxt_tab * i_ex_api_freetext_tab = it_i_ex_api_freetext_tab * i_ex_api_freetext_ltxt_tab = it_i_ex_api_freetext_ltxt_tab * i_ex_api_rootcause_tab = it_i_ex_api_rootcause_tab * i_ex_api_absences_tab = it_i_ex_api_absences_tab * i_ex_api_restrictions_tab = it_i_ex_api_restrictions_tab * e_error_tab = it_e_error_tab EXCEPTIONS INTERNAL_ERROR = 1 . " CBIH_IA30_UE_IAL_MAIN_CHECK
IF SY-SUBRC EQ 0. "All OK ELSEIF SY-SUBRC EQ 1. "Exception "Add code for exception here ENDIF.







ABAP code to compare 7.40 inline data declaration with original syntax

The below ABAP code uses the older none in-line data declarations. This allows you to see the coding differences/benefits of the later inline syntax. It may also be useful if you are using an older version of SAP as some of the newer syntax above, such as the @DATA is not available until 4.70 EHP 8.

DATA:
ld_e_flg_lockfail  TYPE ESP1_BOOLEAN ,
ld_i_called_api  TYPE CHAR3 ,
it_x_api_ial_cre_tab  TYPE STANDARD TABLE OF CIHAL_IAL_API_TAB_TYPE ,
wa_x_api_ial_cre_tab  LIKE LINE OF it_x_api_ial_cre_tab,
ld_e_flg_error  TYPE ESP1_BOOLEAN ,
ld_i_addinf  TYPE RCGADDINF ,
it_x_api_header_tab  TYPE STANDARD TABLE OF CIHAL_IALHAPI_TAB_TYPE ,
wa_x_api_header_tab  LIKE LINE OF it_x_api_header_tab,
ld_e_flg_warning  TYPE ESP1_BOOLEAN ,
ld_i_flg_check_only  TYPE ESP1_BOOLEAN ,
it_x_api_result_ltxt_tab  TYPE STANDARD TABLE OF CIHAL_RESLTAPI_TAB_TYPE ,
wa_x_api_result_ltxt_tab  LIKE LINE OF it_x_api_result_ltxt_tab,
ld_i_flg_phrasecheck_off  TYPE ESP1_BOOLEAN ,
it_x_api_action_tab  TYPE STANDARD TABLE OF CIHAC_ACHAPI_TAB_TYPE ,
wa_x_api_action_tab  LIKE LINE OF it_x_api_action_tab,
ld_i_flg_fill_exterror  TYPE ESP1_BOOLEAN ,
it_x_api_invpersons_tab  TYPE STANDARD TABLE OF CIHAL_IPAPI_TAB_TYPE ,
wa_x_api_invpersons_tab  LIKE LINE OF it_x_api_invpersons_tab,
ld_i_flg_header  TYPE ESP1_BOOLEAN ,
it_x_api_invpers_ltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPLTAPI_TAB_TYPE ,
wa_x_api_invpers_ltxt_tab  LIKE LINE OF it_x_api_invpers_ltxt_tab,
ld_i_flg_result_ltxt  TYPE ESP1_BOOLEAN ,
it_x_api_affpersdat_tab  TYPE STANDARD TABLE OF CIHAL_IPEVAAPI_TAB_TYPE ,
wa_x_api_affpersdat_tab  LIKE LINE OF it_x_api_affpersdat_tab,
it_x_api_aff_intltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPEVALTAPI_TAB_TYPE ,
wa_x_api_aff_intltxt_tab  LIKE LINE OF it_x_api_aff_intltxt_tab,
ld_i_flg_action  TYPE ESP1_BOOLEAN ,
ld_i_flg_invpers  TYPE ESP1_BOOLEAN ,
it_x_api_aff_extltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPEVALTAPI_TAB_TYPE ,
wa_x_api_aff_extltxt_tab  LIKE LINE OF it_x_api_aff_extltxt_tab,
ld_i_flg_invpers_ltxt  TYPE ESP1_BOOLEAN ,
it_x_api_injuries_tab  TYPE STANDARD TABLE OF CIHAL_IPEVINJAPI_TAB_TYPE ,
wa_x_api_injuries_tab  LIKE LINE OF it_x_api_injuries_tab,
ld_i_flg_affpers  TYPE ESP1_BOOLEAN ,
it_x_api_iava_data_tab  TYPE STANDARD TABLE OF CIH01_IHVALAPI_TAB_TYPE ,
wa_x_api_iava_data_tab  LIKE LINE OF it_x_api_iava_data_tab,
it_x_api_iaprop_data_tab  TYPE STANDARD TABLE OF CIH01_IHPRAPI_TAB_TYPE ,
wa_x_api_iaprop_data_tab  LIKE LINE OF it_x_api_iaprop_data_tab,
ld_i_flg_aff_intltxt  TYPE ESP1_BOOLEAN ,
it_x_api_ipva_data_tab  TYPE STANDARD TABLE OF CIH01_IHVALAPI_TAB_TYPE ,
wa_x_api_ipva_data_tab  LIKE LINE OF it_x_api_ipva_data_tab,
ld_i_flg_aff_extltxt  TYPE ESP1_BOOLEAN ,
it_x_api_ipprop_data_tab  TYPE STANDARD TABLE OF CIH01_IHPRAPI_TAB_TYPE ,
wa_x_api_ipprop_data_tab  LIKE LINE OF it_x_api_ipprop_data_tab,
ld_i_flg_injuries  TYPE ESP1_BOOLEAN ,
it_x_api_action_ltxt_tab  TYPE STANDARD TABLE OF CIHAC_ACLTAPI_TAB_TYPE ,
wa_x_api_action_ltxt_tab  LIKE LINE OF it_x_api_action_ltxt_tab,
ld_i_flg_ia_val  TYPE ESP1_BOOLEAN ,
it_x_api_freetext_tab  TYPE STANDARD TABLE OF CIH01_DFTAPI_TAB_TYPE ,
wa_x_api_freetext_tab  LIKE LINE OF it_x_api_freetext_tab,
ld_i_flg_ip_val  TYPE ESP1_BOOLEAN ,
it_x_api_freetext_ltxt_tab  TYPE STANDARD TABLE OF CIH01_DFTLTAPI_TAB_TYPE ,
wa_x_api_freetext_ltxt_tab  LIKE LINE OF it_x_api_freetext_ltxt_tab,
ld_i_flg_check_clvalue  TYPE ESP1_BOOLEAN ,
ld_i_flg_action_ltxt  TYPE ESP1_BOOLEAN ,
it_x_api_rootcause_tab  TYPE STANDARD TABLE OF CCIHY_RCAPI ,
wa_x_api_rootcause_tab  LIKE LINE OF it_x_api_rootcause_tab,
ld_i_flg_freetext  TYPE ESP1_BOOLEAN ,
it_x_api_absences_tab  TYPE STANDARD TABLE OF CCIHY_IPABSSAPI ,
wa_x_api_absences_tab  LIKE LINE OF it_x_api_absences_tab,
ld_i_flg_freetext_ltxt  TYPE ESP1_BOOLEAN ,
it_x_api_restrictions_tab  TYPE STANDARD TABLE OF CCIHY_IPEVALIMAPI ,
wa_x_api_restrictions_tab  LIKE LINE OF it_x_api_restrictions_tab,
ld_i_flg_rootcause  TYPE ESP1_BOOLEAN ,
it_i_ex_api_header_tab  TYPE STANDARD TABLE OF CIHAL_IALHAPI_TAB_TYPE ,
wa_i_ex_api_header_tab  LIKE LINE OF it_i_ex_api_header_tab,
ld_i_flg_absences  TYPE ESP1_BOOLEAN ,
it_i_ex_api_result_ltxt_tab  TYPE STANDARD TABLE OF CIHAL_RESLTAPI_TAB_TYPE ,
wa_i_ex_api_result_ltxt_tab  LIKE LINE OF it_i_ex_api_result_ltxt_tab,
ld_i_flg_restrictions  TYPE ESP1_BOOLEAN ,
it_i_ex_api_action_tab  TYPE STANDARD TABLE OF CIHAC_ACHAPI_TAB_TYPE ,
wa_i_ex_api_action_tab  LIKE LINE OF it_i_ex_api_action_tab,
it_i_ex_api_invpersons_tab  TYPE STANDARD TABLE OF CIHAL_IPAPI_TAB_TYPE ,
wa_i_ex_api_invpersons_tab  LIKE LINE OF it_i_ex_api_invpersons_tab,
it_i_ex_api_invpers_ltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPLTAPI_TAB_TYPE ,
wa_i_ex_api_invpers_ltxt_tab  LIKE LINE OF it_i_ex_api_invpers_ltxt_tab,
it_i_ex_api_affpersdat_tab  TYPE STANDARD TABLE OF CIHAL_IPEVAAPI_TAB_TYPE ,
wa_i_ex_api_affpersdat_tab  LIKE LINE OF it_i_ex_api_affpersdat_tab,
it_i_ex_api_aff_intltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPEVALTAPI_TAB_TYPE ,
wa_i_ex_api_aff_intltxt_tab  LIKE LINE OF it_i_ex_api_aff_intltxt_tab,
it_i_ex_api_aff_extltxt_tab  TYPE STANDARD TABLE OF CIHAL_IPEVALTAPI_TAB_TYPE ,
wa_i_ex_api_aff_extltxt_tab  LIKE LINE OF it_i_ex_api_aff_extltxt_tab,
it_i_ex_api_injuries_tab  TYPE STANDARD TABLE OF CIHAL_IPEVINJAPI_TAB_TYPE ,
wa_i_ex_api_injuries_tab  LIKE LINE OF it_i_ex_api_injuries_tab,
it_i_ex_api_iava_data_tab  TYPE STANDARD TABLE OF CIH01_IHVALAPI_TAB_TYPE ,
wa_i_ex_api_iava_data_tab  LIKE LINE OF it_i_ex_api_iava_data_tab,
it_i_ex_api_iaprop_data_tab  TYPE STANDARD TABLE OF CIH01_IHPRAPI_TAB_TYPE ,
wa_i_ex_api_iaprop_data_tab  LIKE LINE OF it_i_ex_api_iaprop_data_tab,
it_i_ex_api_ipva_data_tab  TYPE STANDARD TABLE OF CIH01_IHVALAPI_TAB_TYPE ,
wa_i_ex_api_ipva_data_tab  LIKE LINE OF it_i_ex_api_ipva_data_tab,
it_i_ex_api_ipprop_data_tab  TYPE STANDARD TABLE OF CIH01_IHPRAPI_TAB_TYPE ,
wa_i_ex_api_ipprop_data_tab  LIKE LINE OF it_i_ex_api_ipprop_data_tab,
it_i_ex_api_action_ltxt_tab  TYPE STANDARD TABLE OF CIHAC_ACLTAPI_TAB_TYPE ,
wa_i_ex_api_action_ltxt_tab  LIKE LINE OF it_i_ex_api_action_ltxt_tab,
it_i_ex_api_freetext_tab  TYPE STANDARD TABLE OF CIH01_DFTAPI_TAB_TYPE ,
wa_i_ex_api_freetext_tab  LIKE LINE OF it_i_ex_api_freetext_tab,
it_i_ex_api_freetext_ltxt_tab  TYPE STANDARD TABLE OF CIH01_DFTLTAPI_TAB_TYPE ,
wa_i_ex_api_freetext_ltxt_tab  LIKE LINE OF it_i_ex_api_freetext_ltxt_tab,
it_i_ex_api_rootcause_tab  TYPE STANDARD TABLE OF CCIHY_RCAPI ,
wa_i_ex_api_rootcause_tab  LIKE LINE OF it_i_ex_api_rootcause_tab,
it_i_ex_api_absences_tab  TYPE STANDARD TABLE OF CCIHY_IPABSSAPI ,
wa_i_ex_api_absences_tab  LIKE LINE OF it_i_ex_api_absences_tab,
it_i_ex_api_restrictions_tab  TYPE STANDARD TABLE OF CCIHY_IPEVALIMAPI ,
wa_i_ex_api_restrictions_tab  LIKE LINE OF it_i_ex_api_restrictions_tab,
it_e_error_tab  TYPE STANDARD TABLE OF ESPAP_EXTERROR_TAB_TYPE ,
wa_e_error_tab  LIKE LINE OF it_e_error_tab.

ld_i_called_api = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_ial_cre_tab to it_x_api_ial_cre_tab.
ld_i_addinf = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_header_tab to it_x_api_header_tab.
ld_i_flg_check_only = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_result_ltxt_tab to it_x_api_result_ltxt_tab.
ld_i_flg_phrasecheck_off = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_action_tab to it_x_api_action_tab.
ld_i_flg_fill_exterror = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_invpersons_tab to it_x_api_invpersons_tab.
ld_i_flg_header = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_invpers_ltxt_tab to it_x_api_invpers_ltxt_tab.
ld_i_flg_result_ltxt = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_affpersdat_tab to it_x_api_affpersdat_tab.

"populate fields of struture and append to itab
append wa_x_api_aff_intltxt_tab to it_x_api_aff_intltxt_tab.
ld_i_flg_action = 'Check type of data required'.
ld_i_flg_invpers = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_aff_extltxt_tab to it_x_api_aff_extltxt_tab.
ld_i_flg_invpers_ltxt = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_injuries_tab to it_x_api_injuries_tab.
ld_i_flg_affpers = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_iava_data_tab to it_x_api_iava_data_tab.

"populate fields of struture and append to itab
append wa_x_api_iaprop_data_tab to it_x_api_iaprop_data_tab.
ld_i_flg_aff_intltxt = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_ipva_data_tab to it_x_api_ipva_data_tab.
ld_i_flg_aff_extltxt = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_ipprop_data_tab to it_x_api_ipprop_data_tab.
ld_i_flg_injuries = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_action_ltxt_tab to it_x_api_action_ltxt_tab.
ld_i_flg_ia_val = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_freetext_tab to it_x_api_freetext_tab.
ld_i_flg_ip_val = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_freetext_ltxt_tab to it_x_api_freetext_ltxt_tab.
ld_i_flg_check_clvalue = 'Check type of data required'.
ld_i_flg_action_ltxt = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_rootcause_tab to it_x_api_rootcause_tab.
ld_i_flg_freetext = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_absences_tab to it_x_api_absences_tab.
ld_i_flg_freetext_ltxt = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_x_api_restrictions_tab to it_x_api_restrictions_tab.
ld_i_flg_rootcause = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_i_ex_api_header_tab to it_i_ex_api_header_tab.
ld_i_flg_absences = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_i_ex_api_result_ltxt_tab to it_i_ex_api_result_ltxt_tab.
ld_i_flg_restrictions = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_i_ex_api_action_tab to it_i_ex_api_action_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_invpersons_tab to it_i_ex_api_invpersons_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_invpers_ltxt_tab to it_i_ex_api_invpers_ltxt_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_affpersdat_tab to it_i_ex_api_affpersdat_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_aff_intltxt_tab to it_i_ex_api_aff_intltxt_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_aff_extltxt_tab to it_i_ex_api_aff_extltxt_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_injuries_tab to it_i_ex_api_injuries_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_iava_data_tab to it_i_ex_api_iava_data_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_iaprop_data_tab to it_i_ex_api_iaprop_data_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_ipva_data_tab to it_i_ex_api_ipva_data_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_ipprop_data_tab to it_i_ex_api_ipprop_data_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_action_ltxt_tab to it_i_ex_api_action_ltxt_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_freetext_tab to it_i_ex_api_freetext_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_freetext_ltxt_tab to it_i_ex_api_freetext_ltxt_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_rootcause_tab to it_i_ex_api_rootcause_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_absences_tab to it_i_ex_api_absences_tab.

"populate fields of struture and append to itab
append wa_i_ex_api_restrictions_tab to it_i_ex_api_restrictions_tab.

"populate fields of struture and append to itab
append wa_e_error_tab to it_e_error_tab.

SAP Documentation for FM CBIH_IA30_UE_IAL_MAIN_CHECK


This function module is used to check incident/accident log data.
The function module is also available as a reference function module ...See here for full SAP fm documentation

Contribute (Add Comments)

Please help keep this info upto date and use the comments section below to add useful hints, tips and information specific to this SAP function. This will then be available for you and other users to easily find by simply searching on the object name CBIH_IA30_UE_IAL_MAIN_CHECK or its description.