SAP Reports / Programs | Personnel Management | Personnel Administration | Netherlands(PA-PA-NL) SAP PA

MP076440 SAP ABAP INCLUDE - Extended Table Maintenance: Lower Level







MP076440 is a standard ABAP INCLUDE available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.

If you would like to execute this report or see the full code listing simply enter MP076440 into the relevant SAP transactions such as SE38 or SE80


ABAP code to call this SAP report using the submit statement

This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.






SUBMIT MP076440. "Basic submit
SUBMIT MP076440 AND RETURN. "Return to original report after report execution complete
SUBMIT MP076440 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


INCLUDES used within this REPORT MP076440

No INCLUDES are used within this REPORT code!


TABLES used within REPORT and the associated SELECT statement:





No SAP DATABASE tables are accessed within this REPORT code!


Function Modules used within report and the associated call statement:

SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING entry_act = -top_line entry_from = 1 entry_to = -lines last_page_full = 'X' loops = ok_code = p_ok overlapping = 'X' IMPORTING entry_new = l_tc_new_top_line EXCEPTIONS * NO_ENTRY_OR_PAGE_ACT = 01 * NO_ENTRY_TO = 02 * NO_OK_CODE_OR_PAGE_GO = 03 OTHERS = 0.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = p0764-pernr infty = '2001' begda = tcwpx-utdte endda = tcwpx-endte TABLES infty_tab = t_2001.

HR_COUNTRYGROUPING_GET CALL FUNCTION 'HR_COUNTRYGROUPING_GET' EXPORTING pernr = p0764-pernr tclas = pspar-tclas * BEGDA = '18000101' * ENDDA = '99991231' * WERKS = IMPORTING molga = g_molga EXCEPTIONS not_found = 1 OTHERS = 2 .

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING * TCLAS = 'A' pernr = p0764-pernr infty = '0001' begda = p0764-begda endda = p0764-endda * BYPASS_BUFFER = ' ' * IMPORTING * SUBRC = TABLES infty_tab = t_0001 EXCEPTIONS INFTY_NOT_FOUND = 1 OTHERS = 2.

HR_FEATURE_BACKFIELD CALL FUNCTION 'HR_FEATURE_BACKFIELD' EXPORTING feature = 'NLWPA' struc_content = l_structure * KIND_OF_ERROR = IMPORTING back = l_actgr CHANGING status = l_status EXCEPTIONS dummy = 1 error_operation = 2 no_backvalue = 3 feature_not_generated = 4 invalid_sign_in_funid = 5 field_in_report_tab_in_pe03 = 6 OTHERS = 7 .

HR_NL_PW_GET_ACTIVITY_DATES CALL FUNCTION 'HR_NL_PW_GET_ACTIVITY_DATES' EXPORTING pernr = p0764-pernr pwbegda = p0764-begda pwendda = p0764-endda lgedt = p0764-lgedt IMPORTING newbegda = l_begda newendda = l_endda exbegda = l_exbegda exendda = l_exendda TABLES activities = lt_activities EXCEPTIONS no_activities = 1 initial_not_ok = 2 delete_no_illnesses = 3 delete_regenerate_former = 4 error_read_feature_nlwpa = 5 delete_following_regenerate = 6 other_exception = 7 error_reading_infotype = 8 delete_1_regenerate = 9 delete_inconsistent = 10 pw_doesnt_exist = 11 OTHERS = 12.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = p0764-pernr infty = '2001' begda = wa_tcwpx-utdte endda = wa_tcwpx-endte TABLES infty_tab = t_2001.

HR_FEATURE_BACKFIELD CALL FUNCTION 'HR_FEATURE_BACKFIELD' EXPORTING feature = 'NLWPB' * struc_content = l_structure "YWJL7DK089799 struc_content = l_struc_pme17 "YWJL7DK089799 * KIND_OF_ERROR = IMPORTING back = l_nlwpb CHANGING status = l_status EXCEPTIONS dummy = 1 error_operation = 2 no_backvalue = 3 feature_not_generated = 4 invalid_sign_in_funid = 5 field_in_report_tab_in_pe03 = 6 OTHERS = 7 .

HR_READ_INFOTYPE * CALL FUNCTION 'HR_READ_INFOTYPE' * EXPORTING ** TCLAS = 'A' * pernr = p0764-pernr * infty = '0001' * begda = p0764-begda * endda = p0764-endda ** BYPASS_BUFFER = ' ' ** IMPORTING ** SUBRC = * TABLES * infty_tab = t_0001 ** EXCEPTIONS ** INFTY_NOT_FOUND = 1 ** OTHERS = 2 * .

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = p0764-pernr infty = '2001' begda = tcwpx-utdte TABLES infty_tab = t_2001.

ICON_CREATE CALL FUNCTION 'ICON_CREATE' "LLEAC0K015906 EXPORTING " name = 'icon_create_text' " * info = text-005 " add_stdinf = 'X' " IMPORTING " RESULT = tcwpx-id " EXCEPTIONS " icon_not_found = 1 " outputfield_too_short = 2 " OTHERS = 3 " . "

ICON_CREATE CALL FUNCTION 'ICON_CREATE' "LLEAC0K015906 EXPORTING " name = 'icon_change_text' " * info = text-007 " add_stdinf = 'X' " IMPORTING " RESULT = tcwpx-id " EXCEPTIONS " icon_not_found = 1 " outputfield_too_short = 2 " OTHERS = 3 " . "

ICON_CREATE CALL FUNCTION 'ICON_CREATE' "LLEAC0K015906 EXPORTING " name = 'icon_display_text' " * info = text-006 " add_stdinf = 'X' " IMPORTING " RESULT = tcwpx-id " EXCEPTIONS " icon_not_found = 1 " outputfield_too_short = 2 " OTHERS = 3 " . "

ICON_CREATE CALL FUNCTION 'ICON_CREATE' "LLEAC0K015906 EXPORTING " name = 'icon_change_text' " * info = text-007 " add_stdinf = 'X' " IMPORTING " RESULT = -id " EXCEPTIONS " icon_not_found = 1 " outputfield_too_short = 2 " OTHERS = 3 " . "

ICON_CREATE CALL FUNCTION 'ICON_CREATE' "LLEAC0K015906 EXPORTING " name = 'icon_create_text' " * info = text-005 " add_stdinf = 'X' " IMPORTING " RESULT = -id " EXCEPTIONS " icon_not_found = 1 " outputfield_too_short = 2 " OTHERS = 3 " . "

HR_NL_PW_GET_ACTIVITY_DATES CALL FUNCTION 'HR_NL_PW_GET_ACTIVITY_DATES' EXPORTING pernr = p0764-pernr pwbegda = g_save_begda pwendda = g_save_endda lgedt = g_save_lgedt IMPORTING newbegda = l_begda newendda = l_endda exbegda = l_exbegda exendda = l_exendda TABLES activities = lt_activities EXCEPTIONS no_activities = 1 initial_not_ok = 2 delete_no_illnesses = 3 delete_regenerate_former = 4 error_read_feature_nlwpa = 5 delete_following_regenerate = 6 other_exception = 7 error_reading_infotype = 8 delete_1_regenerate = 9 delete_inconsistent = 10 pw_doesnt_exist = 11 OTHERS = 12.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = p0764-pernr infty = '2001' begda = wa_tcwpx-utdte endda = wa_tcwpx-endte TABLES infty_tab = t_2001.

SELECT_TEXT CALL FUNCTION 'SELECT_TEXT' EXPORTING * CLIENT = SY-MANDT * database_only = 'X' "LULAC0K003307 * TEXTMEMORY_ONLY = ' ' object = c_tdobject "LULAC0K002759 name = p_tdobname id = c_tdid "LULAC0K002759 language = sy-langu "LULAC0K002759 * ARCHIVE_HANDLE = 0 local_cat = 'X' "LULAC0K003307 IMPORTING entries = l_entries * TABLES * selections = p_header * T_OBJECT = * T_NAME = * T_ID = * T_LANGUAGE = * I_NAME = EXCEPTIONS wrong_access_to_archive = 1 OTHERS = 2 .

READ_TEXT





CALL FUNCTION 'READ_TEXT' EXPORTING * CLIENT = SY-MANDT id = c_tdid language = sy-langu name = p_tdobname object = c_tdobject * ARCHIVE_HANDLE = 0 local_cat = 'X' "LULAC0K003307 IMPORTING header = l_header TABLES lines = lt_lines EXCEPTIONS id = 1 language = 2 name = 3 not_found = 4 object = 5 reference_check = 6 wrong_access_to_archive = 7 OTHERS = 8 .

EDIT_TEXT CALL FUNCTION 'EDIT_TEXT' EXPORTING display = displayonly * EDITOR_TITLE = ' ' header = l_header * PAGE = ' ' * WINDOW = ' ' save = ' ' "LULAC0K003307 * save = 'X' "LULAC0K003307 * LINE_EDITOR = ' ' * CONTROL = ' ' * PROGRAM = ' ' local_cat = 'X' "LULAC0K003307 IMPORTING function = p_result newheader = l_header RESULT = l_result "LULAC0K003307 TABLES lines = lt_lines EXCEPTIONS id = 1 language = 2 linesize = 3 name = 4 object = 5 textformat = 6 communication = 7 OTHERS = 8 .

SAVE_TEXT CALL FUNCTION 'SAVE_TEXT' " EXPORTING " * CLIENT = SY-MANDT " header = l_header " * INSERT = ' ' " savemode_direct = ' ' " * OWNER_SPECIFIED = ' ' " local_cat = 'X' " IMPORTING " function = p_result " newheader = l_header " TABLES " lines = lt_lines " EXCEPTIONS " id = 1 " language = 2 " name = 3 " object = 4 " OTHERS = 5 " . "

DELETE_TEXT CALL FUNCTION 'DELETE_TEXT' " EXPORTING " * CLIENT = SY-MANDT " id = c_tdid " language = sy-langu " name = l_header-tdname " object = c_tdobject " * SAVEMODE_DIRECT = ' ' " * TEXTMEMORY_ONLY = ' ' " local_cat = 'X' " EXCEPTIONS " not_found = 1 " OTHERS = 2 " . "

INIT_TEXT CALL FUNCTION 'INIT_TEXT' EXPORTING id = c_tdid language = sy-langu name = p_tdobname object = c_tdobject IMPORTING header = l_header TABLES lines = lt_lines EXCEPTIONS id = 1 language = 2 name = 3 object = 4 OTHERS = 5.

EDIT_TEXT CALL FUNCTION 'EDIT_TEXT' EXPORTING display = ' ' * EDITOR_TITLE = ' ' header = l_header * PAGE = ' ' * WINDOW = ' ' * save = 'X' "LULAC0K003307 save = ' ' "LULAC0K003307 * LINE_EDITOR = ' ' * CONTROL = ' ' * PROGRAM = ' ' local_cat = 'X' "LULAC0K003307 IMPORTING function = p_result newheader = l_header * RESULT = TABLES lines = lt_lines EXCEPTIONS id = 1 language = 2 linesize = 3 name = 4 object = 5 textformat = 6 communication = 7 OTHERS = 8 .

SAVE_TEXT CALL FUNCTION 'SAVE_TEXT' " EXPORTING " * CLIENT = SY-MANDT " header = l_header " insert = 'X' " savemode_direct = ' ' " * OWNER_SPECIFIED = ' ' " local_cat = 'X' " IMPORTING " function = p_result " newheader = l_header " TABLES " lines = lt_lines " EXCEPTIONS " id = 1 " language = 2 " name = 3 " object = 4 " OTHERS = 5 " . "

SELECT_TEXT CALL FUNCTION 'SELECT_TEXT' EXPORTING * CLIENT = SY-MANDT * database_only = 'X' "LULAC0K003307 * TEXTMEMORY_ONLY = ' ' object = c_tdobject "LULAC0K002759 name = wa_itctc-destname id = c_tdid "LULAC0K002759 language = sy-langu "LULAC0K002759 * ARCHIVE_HANDLE = 0 local_cat = 'X' "LULAC0K003307 IMPORTING entries = l_entries * TABLES * SELECTIONS = * T_OBJECT = * T_NAME = * T_ID = * T_LANGUAGE = EXCEPTIONS wrong_access_to_archive = 1 OTHERS = 2 .

COPY_TEXTS * CALL FUNCTION 'COPY_TEXTS' " * EXPORTING " * savemode_direct = 'X' " * INSERT = ' ' " * LOCAL_CAT = ' ' " * IMPORTING " * error = l_subrc " * TABLES " * texts = lt_itctc " * . "

DELETE_TEXT * CALL FUNCTION 'DELETE_TEXT' " * EXPORTING " ** CLIENT = SY-MANDT " * id = wa2_itctc-destid " * language = wa2_itctc-destlang " * name = wa2_itctc-destname " * object = wa2_itctc-destobject " * savemode_direct = 'X' " ** TEXTMEMORY_ONLY = ' ' " ** LOCAL_CAT = ' ' " * EXCEPTIONS " * not_found = 1 " * OTHERS = 2 " * . "

DELETE_TEXT * CALL FUNCTION 'DELETE_TEXT' " * EXPORTING " ** CLIENT = SY-MANDT " * id = wa2_itctc-destid " * language = wa2_itctc-destlang " * name = wa2_itctc-destname " * object = wa2_itctc-destobject " * savemode_direct = 'X' " ** TEXTMEMORY_ONLY = ' ' " ** LOCAL_CAT = ' ' " * EXCEPTIONS " * not_found = 1 " * OTHERS = 2 " * . "

DELETE_TEXT CALL FUNCTION 'DELETE_TEXT' " EXPORTING " * CLIENT = SY-MANDT " id = wa_itctc-destid " language = wa_itctc-destlang " name = wa_itctc-destname " object = wa_itctc-destobject " savemode_direct = ' ' " * TEXTMEMORY_ONLY = ' ' " local_cat = 'X' " EXCEPTIONS " not_found = 1 " OTHERS = 2 " . "

READ_TEXT CALL FUNCTION 'READ_TEXT' " EXPORTING " * CLIENT = SY-MANDT " id = wa_itctc-srcid " language = wa_itctc-srclang " name = wa_itctc-srcname " object = wa_itctc-srcobject " * ARCHIVE_HANDLE = 0 " local_cat = 'X' " IMPORTING " header = l_header " TABLES " lines = lt_lines " EXCEPTIONS " id = 1 " language = 2 " name = 3 " not_found = 4 " object = 5 " reference_check = 6 " wrong_access_to_archive = 7 " OTHERS = 8 " . "

SAVE_TEXT CALL FUNCTION 'SAVE_TEXT' " EXPORTING " * CLIENT = SY-MANDT " header = l_header " insert = 'X' " * SAVEMODE_DIRECT = ' ' " * OWNER_SPECIFIED = ' ' " local_cat = 'X' " * IMPORTING " * FUNCTION = " * NEWHEADER = " TABLES " lines = lt_lines " EXCEPTIONS " id = 1 " language = 2 " name = 3 " object = 4 " OTHERS = 5 " . "

DELETE_TEXT CALL FUNCTION 'DELETE_TEXT' " EXPORTING " * CLIENT = SY-MANDT " id = wa_itctc-srcid " language = wa_itctc-srclang " name = wa_itctc-srcname " object = wa_itctc-srcobject " savemode_direct = ' ' " * TEXTMEMORY_ONLY = ' ' " local_cat = 'X' " EXCEPTIONS " not_found = 1 " OTHERS = 2 " . "

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = 'ACTCO' * PVALKEY = ' ' dynpprog = l_syrepid dynpnr = l_sydynnr dynprofield = 'TCWPX-ACTCO' * STEPL = 0 window_title = text-001 * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' display = l_display * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' TABLES value_tab = value_tab * FIELD_TAB = * RETURN_TAB = * DYNPFLD_MAPPING = * EXCEPTIONS * PARAMETER_ERROR = 1 * NO_VALUES_FOUND = 2 * OTHERS = 3 .

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = 'SACHC' * PVALKEY = ' ' dynpprog = l_syrepid dynpnr = l_sydynnr dynprofield = 'P0764-SACHC' * STEPL = 0 window_title = text-002 * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' TABLES value_tab = value_tab * FIELD_TAB = return_tab = l_t_retval "LLEACRK045198 * DYNPFLD_MAPPING = * EXCEPTIONS * PARAMETER_ERROR = 1 * NO_VALUES_FOUND = 2 * OTHERS = 3 .

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = p0764-pernr infty = '0001' begda = sy-datum endda = sy-datum IMPORTING subrc = l_subrc TABLES infty_tab = l_t_p0001[] EXCEPTIONS infty_not_found = 1 OTHERS = 2.

HR_FEATURE_BACKFIELD CALL FUNCTION 'HR_FEATURE_BACKFIELD' EXPORTING feature = 'NLWPB' struc_content = l_structure * KIND_OF_ERROR = IMPORTING back = l_nlwpb CHANGING status = l_status EXCEPTIONS dummy = 1 error_operation = 2 no_backvalue = 3 feature_not_generated = 4 invalid_sign_in_funid = 5 field_in_report_tab_in_pe03 = 6 OTHERS = 7 .

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' " EXPORTING " pernr = p0764-pernr " infty = '0001' " begda = p0764-begda " endda = p0764-endda " TABLES " infty_tab = t_0001. "




HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING * TCLAS = 'A' pernr = p0764-pernr infty = '2001' begda = p0764-begda endda = p0764-endda * BYPASS_BUFFER = ' ' * IMPORTING * SUBRC = TABLES infty_tab = t_2001 * EXCEPTIONS * INFTY_NOT_FOUND = 1 * OTHERS = 2 .

HR_NL_GET_VALIDITY_OF_APPL CALL FUNCTION 'HR_NL_GET_VALIDITY_OF_APPL' "KWIACRK000554 EXPORTING " imp_application = 'LA06' " imp_datum = p0764-begda " imp_molga = '05' " IMPORTING " exp_valid = la06_valid. "

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING * TCLAS = 'A' pernr = p0764-pernr infty = '0409' begda = p0764-begda endda = p0764-endda * BYPASS_BUFFER = ' ' * IMPORTING * SUBRC = TABLES infty_tab = t_0409 * EXCEPTIONS * INFTY_NOT_FOUND = 1 * OTHERS = 2 .

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' " EXPORTING " * TCLAS = 'A' " pernr = p0764-pernr " infty = '0808' " begda = p0764-begda " endda = p0764-endda " * BYPASS_BUFFER = ' ' " * IMPORTING " * SUBRC = " TABLES " infty_tab = t_0808 " * EXCEPTIONS " * INFTY_NOT_FOUND = 1 " * OTHERS = 2 " . "

DELETE_TEXT * CALL FUNCTION 'DELETE_TEXT' " * EXPORTING " ** CLIENT = SY-MANDT " * id = wa_old_texts-srcid " * language = wa_old_texts-srclang " * name = wa_old_texts-srcname " * object = wa_old_texts-srcobject " * savemode_direct = 'X' " ** TEXTMEMORY_ONLY = ' ' " ** LOCAL_CAT = ' ' " * EXCEPTIONS " * not_found = 1 " * OTHERS = 2 " * . "

DELETE_TEXT * CALL FUNCTION 'DELETE_TEXT' " * EXPORTING " ** CLIENT = SY-MANDT " * id = wa_new_texts-srcid " * language = wa_new_texts-srclang " * name = wa_new_texts-srcname " * object = wa_new_texts-srcobject " * savemode_direct = 'X' " ** TEXTMEMORY_ONLY = ' ' " ** LOCAL_CAT = ' ' " * EXCEPTIONS " * not_found = 1 " * OTHERS = 2 " * . "

DELETE_TEXT * CALL FUNCTION 'DELETE_TEXT' " * EXPORTING " ** CLIENT = SY-MANDT " * id = wa_old_texts-destid " * language = wa_old_texts-destlang " * name = wa_old_texts-destname " * object = wa_old_texts-destobject " * savemode_direct = 'X' " ** TEXTMEMORY_ONLY = ' ' " ** LOCAL_CAT = ' ' " * EXCEPTIONS " * not_found = 1 " * OTHERS = 2 " * . "

HR_NL_PW_GET_INFOTYPE_BEGDA CALL FUNCTION 'HR_NL_PW_GET_INFOTYPE_BEGDA' EXPORTING pernr = p0764-pernr date = p0764-begda IMPORTING begindate = l_begda enddate = l_endda EXCEPTIONS pwdays_not_reached = 1 no_related_illnesses = 2 pwstart_not_reached = 3 pw_to_regenerate = 4 valid_pw_plan = 5 former_pw_to_regenerate = 6 error_read_feature_nlwpa = 7 error_reading_infotype = 8 other_exception = 9 OTHERS = 10.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = p0764-pernr infty = '2001' begda = tcwpx-utdte endda = tcwpx-endte TABLES infty_tab = t_2001.

HR_NL_PW_CHECK_REGENERATE CALL FUNCTION 'HR_NL_PW_CHECK_REGENERATE' "LULAC0K003307 EXPORTING " pernr = p0764-pernr " pwbegda = p0764-begda " pwendda = p0764-endda " lgedt = p0764-lgedt " IMPORTING " regenerate = l_regenerate " newbegda = l_begda " newendda = l_endda " exbegda = l_exbegda " exendda = l_exendda " TABLES " activities = lt_activities " tcwpx = tcwpx " EXCEPTIONS " no_activities = 1 " initial_not_ok = 2 " delete_no_illnesses = 3 " delete_regenerate_former = 4 " error_read_feature_nlwpa = 5 " delete_following_regenerate = 6 " other_exception = 7 " error_reading_infotype = 8 " delete_1_regenerate = 9 " delete_inconsistent = 10 " pw_doesnt_exist = 11 " OTHERS = 12. "

HR_NL_PW_GET_ACTIVITY_DATES * CALL FUNCTION 'HR_NL_PW_GET_ACTIVITY_DATES' " * EXPORTING " * pernr = p0764-pernr " * pwbegda = p0764-begda " * pwendda = p0764-endda " * lgedt = p0764-lgedt " * IMPORTING " * newbegda = l_begda " * newendda = l_endda " * exbegda = l_exbegda " * exendda = l_exendda " * TABLES " * activities = lt_activities " * EXCEPTIONS " * no_activities = 1 " * initial_not_ok = 2 " * delete_no_illnesses = 3 " * delete_regenerate_former = 4 " * error_read_feature_nlwpa = 5 " * delete_following_regenerate = 6 " * other_exception = 7 " * error_reading_infotype = 8 " * delete_1_regenerate = 9 " * delete_inconsistent = 10 " * pw_doesnt_exist = 11 " * OTHERS = 12. "

ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = 'icon_change_text' * TEXT = ' ' info = text-003 add_stdinf = 'X' IMPORTING RESULT = q0764-icon1 EXCEPTIONS icon_not_found = 1 outputfield_too_short = 2 OTHERS = 3 .

ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = 'icon_display_text' * TEXT = ' ' info = text-004 add_stdinf = 'X' IMPORTING RESULT = q0764-icon1 EXCEPTIONS icon_not_found = 1 outputfield_too_short = 2 OTHERS = 3 .

RH_GET_ACTIVE_WF_PLVAR CALL FUNCTION 'RH_GET_ACTIVE_WF_PLVAR' * EXPORTING * ASK_PLVAR_DIALOG = * SET_DEFAULT_PLVAR = IMPORTING act_plvar = g_act_plvar EXCEPTIONS no_active_plvar = 1 OTHERS = 2 .

RH_GET_LEADING_POSITION CALL FUNCTION 'RH_GET_LEADING_POSITION' EXPORTING plvar = g_act_plvar otype = 'P' sobid = g_sobid date = sy-datum auth = 'X' * BUFFER_MODE = ' ' * CONSIDER_VAC_POS = ' ' TABLES leading_pos = gt_hrobject EXCEPTIONS no_lead_pos_found = 1 OTHERS = 2 .

RH_READ_INFTY_1001 CALL FUNCTION 'RH_READ_INFTY_1001' EXPORTING authority = 'DISP' with_stru_auth = 'X' plvar = wa_hrobject-plvar otype = wa_hrobject-otype objid = wa_hrobject-objid istat = '1' extend = 'X' subty = 'A008' begda = sy-datum endda = sy-datum condition = '00000' * SORT = 'X' * WITH_EV = ' ' adata = 'X' * AUTH_SOBID = ' ' TABLES i1001 = gt_p1001 * OBJECTS = EXCEPTIONS nothing_found = 1 wrong_condition = 2 wrong_parameters = 3 OTHERS = 4 .

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING * TCLAS = 'A' pernr = l_pernr infty = '0105' begda = '18000101' endda = '99991231' * BYPASS_BUFFER = ' ' * IMPORTING * SUBRC = TABLES infty_tab = gt_p0105 EXCEPTIONS infty_not_found = 1 OTHERS = 2 .

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = p0764-pernr infty = '2001' begda = p_utdte TABLES infty_tab = t_2001.

ICON_CREATE CALL FUNCTION 'ICON_CREATE' "LLEAC0K015906 EXPORTING " name = 'icon_create_text' " * info = text-005 " add_stdinf = 'X' " IMPORTING " RESULT = p_id " EXCEPTIONS " icon_not_found = 1 " outputfield_too_short = 2 " OTHERS = 3 " . "

ICON_CREATE CALL FUNCTION 'ICON_CREATE' "LLEAC0K015906 EXPORTING " name = 'icon_change_text' " * info = text-007 " add_stdinf = 'X' " IMPORTING " RESULT = p_id " EXCEPTIONS " icon_not_found = 1 " outputfield_too_short = 2 " OTHERS = 3 " . "

ICON_CREATE CALL FUNCTION 'ICON_CREATE' "LLEAC0K015906 EXPORTING " name = 'icon_display_text' " * info = text-006 " add_stdinf = 'X' " IMPORTING " RESULT = p_id " EXCEPTIONS " icon_not_found = 1 " outputfield_too_short = 2 " OTHERS = 3 " . "

COMMIT_TEXT CALL FUNCTION 'COMMIT_TEXT' EXPORTING * OBJECT = '*' * NAME = '*' * ID = '*' * LANGUAGE = '*' savemode_direct = 'X' * KEEP = ' ' local_cat = 'X' IMPORTING commit_count = l_commit_count * TABLES * T_OBJECT = * T_NAME = * T_ID = * T_LANGUAGE = .

ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = 'icon_create_text' * TEXT = ' ' * INFO = ' ' add_stdinf = 'X' IMPORTING RESULT = g_icon_create EXCEPTIONS icon_not_found = 1 outputfield_too_short = 2 OTHERS = 3 .

ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = 'icon_display_text' * TEXT = ' ' * INFO = ' ' add_stdinf = 'X' IMPORTING RESULT = g_icon_display EXCEPTIONS icon_not_found = 1 outputfield_too_short = 2 OTHERS = 3 .

ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = 'icon_change_text' * TEXT = ' ' * INFO = ' ' add_stdinf = 'X' IMPORTING RESULT = g_icon_change EXCEPTIONS icon_not_found = 1 outputfield_too_short = 2 OTHERS = 3 .



Contribute (Add Comments)

Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.

The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.

This will then be available for everyone to easily find by simply searching on the report name MP076440 or its description.