SAP ICL_DIPLIT_CHECK Function Module for
ICL_DIPLIT_CHECK is a standard icl diplit check SAP function module available within SAP R/3 or S/4 Hana systems, depending on your version and release level. It is used to perform a specific ABAP function and below is the pattern details, showing its interface including any import and export parameters, exceptions etc. there is also a full "cut and paste" ABAP pattern code example, along with implementation ABAP coding, documentation and contribution comments specific to this or related objects.
See here to view full function module documentation and code listing for icl diplit check FM, simply by entering the name ICL_DIPLIT_CHECK into the relevant SAP transaction such as SE37 or SE38.
Function Group: ICL_MI_EXT
Program Name: SAPLICL_MI_EXT
Main Program: SAPLICL_MI_EXT
Appliation area:
Release date: N/A
Mode(Normal, Remote etc): Normal Function Module
Update:

Function ICL_DIPLIT_CHECK pattern details
In-order to call this FM within your sap programs, simply using the below ABAP pattern details to trigger the function call...or see the full ABAP code listing at the end of this article. You can simply cut and paste this code into your ABAP progrom as it is, including variable declarations.CALL FUNCTION 'ICL_DIPLIT_CHECK'".
EXPORTING
IS_DIPLIT = "
IMPORTING
ET_RC = "
EV_RC_OWN_SHARE_ALREADY_SET = "
EV_RC_SHARE_PRC_GT_100 = "
EV_RC_REPID_NOT_FOUND = "
EV_RC_SHARE_PRC_AND_AMT = "
EV_RC_PARTNER_NOT_FOUND = "
ES_RC = "
EV_RC_DIPLIT_ID_IS_INITIAL = "
EV_RC_SUBOBJECT_IS_INITIAL = "
EV_RC_DIPL_ID_NOT_FOUND = "
EV_RC_DIPLIT_NUM_IS_INITIAL = "
EV_RC_DIPLIT_NUM_EXISTS = "
EV_RC_PARTTY_NOT_FOUND = "
EV_RC_SETTY_NOT_FOUND = "
EXCEPTIONS
CX_ICL_CLAIM_IS_INITIAL = 1
IMPORTING Parameters details for ICL_DIPLIT_CHECK
IS_DIPLIT -
Data type: ICL_DIPLITOptional: No
Call by Reference: Yes
EXPORTING Parameters details for ICL_DIPLIT_CHECK
ET_RC -
Data type: ICL_MI_RC_TABOptional: No
Call by Reference: Yes
EV_RC_OWN_SHARE_ALREADY_SET -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
EV_RC_SHARE_PRC_GT_100 -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
EV_RC_REPID_NOT_FOUND -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
EV_RC_SHARE_PRC_AND_AMT -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
EV_RC_PARTNER_NOT_FOUND -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
ES_RC -
Data type: ICL_MI_RCOptional: No
Call by Reference: Yes
EV_RC_DIPLIT_ID_IS_INITIAL -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
EV_RC_SUBOBJECT_IS_INITIAL -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
EV_RC_DIPL_ID_NOT_FOUND -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
EV_RC_DIPLIT_NUM_IS_INITIAL -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
EV_RC_DIPLIT_NUM_EXISTS -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
EV_RC_PARTTY_NOT_FOUND -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
EV_RC_SETTY_NOT_FOUND -
Data type: ICL_MI_RC-RCOptional: No
Call by Reference: Yes
EXCEPTIONS details
CX_ICL_CLAIM_IS_INITIAL -
Data type:Optional: No
Call by Reference: Yes
Copy and paste ABAP code example for ICL_DIPLIT_CHECK Function Module
The ABAP code below is a full code listing to execute function module POPUP_TO_CONFIRM including all data declarations. The code uses the original data declarations rather than 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 newer method of declaring data variables on the fly. 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), which i why i have stuck to the origianl for this example.| DATA: | ||||
| lv_et_rc | TYPE ICL_MI_RC_TAB, " | |||
| lv_is_diplit | TYPE ICL_DIPLIT, " | |||
| lv_cx_icl_claim_is_initial | TYPE ICL_DIPLIT, " | |||
| lv_ev_rc_own_share_already_set | TYPE ICL_MI_RC-RC, " | |||
| lv_ev_rc_share_prc_gt_100 | TYPE ICL_MI_RC-RC, " | |||
| lv_ev_rc_repid_not_found | TYPE ICL_MI_RC-RC, " | |||
| lv_ev_rc_share_prc_and_amt | TYPE ICL_MI_RC-RC, " | |||
| lv_ev_rc_partner_not_found | TYPE ICL_MI_RC-RC, " | |||
| lv_es_rc | TYPE ICL_MI_RC, " | |||
| lv_ev_rc_diplit_id_is_initial | TYPE ICL_MI_RC-RC, " | |||
| lv_ev_rc_subobject_is_initial | TYPE ICL_MI_RC-RC, " | |||
| lv_ev_rc_dipl_id_not_found | TYPE ICL_MI_RC-RC, " | |||
| lv_ev_rc_diplit_num_is_initial | TYPE ICL_MI_RC-RC, " | |||
| lv_ev_rc_diplit_num_exists | TYPE ICL_MI_RC-RC, " | |||
| lv_ev_rc_partty_not_found | TYPE ICL_MI_RC-RC, " | |||
| lv_ev_rc_setty_not_found | TYPE ICL_MI_RC-RC. " |
|   CALL FUNCTION 'ICL_DIPLIT_CHECK' " |
| EXPORTING | ||
| IS_DIPLIT | = lv_is_diplit | |
| IMPORTING | ||
| ET_RC | = lv_et_rc | |
| EV_RC_OWN_SHARE_ALREADY_SET | = lv_ev_rc_own_share_already_set | |
| EV_RC_SHARE_PRC_GT_100 | = lv_ev_rc_share_prc_gt_100 | |
| EV_RC_REPID_NOT_FOUND | = lv_ev_rc_repid_not_found | |
| EV_RC_SHARE_PRC_AND_AMT | = lv_ev_rc_share_prc_and_amt | |
| EV_RC_PARTNER_NOT_FOUND | = lv_ev_rc_partner_not_found | |
| ES_RC | = lv_es_rc | |
| EV_RC_DIPLIT_ID_IS_INITIAL | = lv_ev_rc_diplit_id_is_initial | |
| EV_RC_SUBOBJECT_IS_INITIAL | = lv_ev_rc_subobject_is_initial | |
| EV_RC_DIPL_ID_NOT_FOUND | = lv_ev_rc_dipl_id_not_found | |
| EV_RC_DIPLIT_NUM_IS_INITIAL | = lv_ev_rc_diplit_num_is_initial | |
| EV_RC_DIPLIT_NUM_EXISTS | = lv_ev_rc_diplit_num_exists | |
| EV_RC_PARTTY_NOT_FOUND | = lv_ev_rc_partty_not_found | |
| EV_RC_SETTY_NOT_FOUND | = lv_ev_rc_setty_not_found | |
| EXCEPTIONS | ||
| CX_ICL_CLAIM_IS_INITIAL = 1 | ||
| . " ICL_DIPLIT_CHECK | ||
ABAP code using 7.40 inline data declarations to call FM ICL_DIPLIT_CHECK
The below ABAP code uses the newer in-line data declarations. This allows you to see the coding differences/benefits of the later inline syntax. Please note some of the newer syntax below, such as the @DATA is not available until 4.70 EHP 8.| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_own_share_already_set). | ||||
| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_share_prc_gt_100). | ||||
| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_repid_not_found). | ||||
| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_share_prc_and_amt). | ||||
| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_partner_not_found). | ||||
| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_diplit_id_is_initial). | ||||
| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_subobject_is_initial). | ||||
| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_dipl_id_not_found). | ||||
| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_diplit_num_is_initial). | ||||
| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_diplit_num_exists). | ||||
| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_partty_not_found). | ||||
| "SELECT single RC FROM ICL_MI_RC INTO @DATA(ld_ev_rc_setty_not_found). | ||||
Search for further information about these or an SAP related objects