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_DIPLIT
Optional: No
Call by Reference: Yes

EXPORTING Parameters details for ICL_DIPLIT_CHECK

ET_RC -

Data type: ICL_MI_RC_TAB
Optional: No
Call by Reference: Yes

EV_RC_OWN_SHARE_ALREADY_SET -

Data type: ICL_MI_RC-RC
Optional: No
Call by Reference: Yes

EV_RC_SHARE_PRC_GT_100 -

Data type: ICL_MI_RC-RC
Optional: No
Call by Reference: Yes

EV_RC_REPID_NOT_FOUND -

Data type: ICL_MI_RC-RC
Optional: No
Call by Reference: Yes

EV_RC_SHARE_PRC_AND_AMT -

Data type: ICL_MI_RC-RC
Optional: No
Call by Reference: Yes

EV_RC_PARTNER_NOT_FOUND -

Data type: ICL_MI_RC-RC
Optional: No
Call by Reference: Yes

ES_RC -

Data type: ICL_MI_RC
Optional: No
Call by Reference: Yes

EV_RC_DIPLIT_ID_IS_INITIAL -

Data type: ICL_MI_RC-RC
Optional: No
Call by Reference: Yes

EV_RC_SUBOBJECT_IS_INITIAL -

Data type: ICL_MI_RC-RC
Optional: No
Call by Reference: Yes

EV_RC_DIPL_ID_NOT_FOUND -

Data type: ICL_MI_RC-RC
Optional: No
Call by Reference: Yes

EV_RC_DIPLIT_NUM_IS_INITIAL -

Data type: ICL_MI_RC-RC
Optional: No
Call by Reference: Yes

EV_RC_DIPLIT_NUM_EXISTS -

Data type: ICL_MI_RC-RC
Optional: No
Call by Reference: Yes

EV_RC_PARTTY_NOT_FOUND -

Data type: ICL_MI_RC-RC
Optional: No
Call by Reference: Yes

EV_RC_SETTY_NOT_FOUND -

Data type: ICL_MI_RC-RC
Optional: 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



Comments on this SAP object

What made you want to lookup this SAP object? Please tell us what you were looking for and anything you would like to be included on this page!