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

RPLWPON0 SAP ABAP Report - Eligibility for Perm. Invalidity Benefit (Restrictions) Act Overview







RPLWPON0 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This report is used generate an overview of the activities that are stored in the Eligibility for Permanent Invalidity Benefit (Restrictions) Act 0764) infotype...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.

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


Transaction Code(s):

Below is a list of transaction codes which are relevant to this SAP report

PC00_M05_LWPO - Poortwachter Overview


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 RPLWPON0. "Basic submit
SUBMIT RPLWPON0 AND RETURN. "Return to original report after report execution complete
SUBMIT RPLWPON0 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Selection Text: PA_FORM = Form
Selection Text: P_SAPS = SAPscript
Selection Text: P_WORD = Word
Title: Eligibility for Perm. Invalidity Benefit (Restrictions) Act Overview
Text Symbol: 001 = Reprt statistic
Text Symbol: 002 = Counter type
Text Symbol: 003 = Print parameters
Text Symbol: 004 = Text obsolete
Text Symbol: 005 = Person has no cases of sickness
Text Symbol: 007 = No relation found for legal person
Text Symbol: 008 = and organiz.
Text Symbol: 009 = No UWV legal person found between
Text Symbol: 010 = &
Text Symbol: 011 = No legal person found between
Text Symbol: 012 = Open form
Text Symbol: 028 = No address found in table T536C for


INCLUDES used within this REPORT RPLWPON0

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:

HR_REFRESH_ERROR_LIST CALL FUNCTION 'HR_REFRESH_ERROR_LIST'.

HR_REFRESH_STAT_LIST CALL FUNCTION 'HR_REFRESH_STAT_LIST'.

DISPLAY_FORM_TREE_F4 * CALL FUNCTION 'DISPLAY_FORM_TREE_F4' * EXPORTING ** P_TREE_NAME = 'SAP_ALL' * p_display_mode = 'D' "only display no change ** I_FORM_NAME = * IMPORTING * p_form_name = pa_form ** p_form_language = sy-langu "LLEAC0K020339 * EXCEPTIONS * cancelled = 1 * parameter_error = 2 * not_found = 3 * OTHERS = 4.

READ_FORM * CALL FUNCTION 'READ_FORM' * EXPORTING ** CLIENT = SY-MANDT * form = pa_form ** LANGUAGE = SY-LANGU * IMPORTING * form_header = g_itcta.

READ_FORM * CALL FUNCTION 'READ_FORM' * EXPORTING * client = '000' * form = pa_form ** LANGUAGE = SY-LANGU * IMPORTING * form_header = g_itcta.

READ_FORM * CALL FUNCTION 'READ_FORM' * EXPORTING * form = pa_form * language = 'N' * IMPORTING * form_header = g_itcta.

READ_FORM * CALL FUNCTION 'READ_FORM' * EXPORTING * client = '000' * form = pa_form * language = 'N' * IMPORTING * form_header = g_itcta.

HR_ADDRESS_GET CALL FUNCTION 'HR_ADDRESS_GET' "b EXPORTING "b struc_content = pme36 "b kind_of_error = space "b begda = p0764-begda "b endda = p0764-endda "b TABLES "b pp0006 = p0006 "b EXCEPTIONS "b subtype_not_found = 1 "b feature_not_okay = 2 "b OTHERS = 3. "b

HR_NL_PW_GET_RELATED_ILLNESSES CALL FUNCTION 'HR_NL_PW_GET_RELATED_ILLNESSES' EXPORTING pernr = p0764-pernr intbegda = p0764-begda intendda = p0764-endda param = c_pw_overview "LLEL4HK047737 TABLES itabill = gt_ill EXCEPTIONS error_reading_infotype = 1 no_records_2001 = 2 OTHERS = 3.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p0764-pernr arbgb = '5N' msgty = 'E' msgno = '284' msgv1 = p0764-begda msgv2 = p0764-endda.

LVC_FIELDCATALOG_MERGE * CALL FUNCTION 'LVC_FIELDCATALOG_MERGE' * EXPORTING * i_structure_name = 'P05_PW_PRINT_STRUCTURE' * CHANGING * ct_fieldcat = it_fieldcat_lvc * EXCEPTIONS * inconsistent_interface = 1 * program_error = 2 * OTHERS = 3.

WS_ULDL_PATH * CALL FUNCTION 'WS_ULDL_PATH' * IMPORTING * download_path = ws_uldl_path.

MS_WORD_OLE_FORMLETTER * CALL FUNCTION 'MS_WORD_OLE_FORMLETTER' * EXPORTING * word_document = ole_word_file_name "UWV WORD docu ** HIDDEN = 0 ** WORD_PASSWORD = ** PASSWORD_OPTION = 1 ** FILE_NAME = '' ** NEW_DOCUMENT = ' ' * download_path = ole_data_file_name ** PRINT = ' ' * TABLES * data_tab = gt_print * fieldnames = coltab * EXCEPTIONS * invalid_fieldnames = 1 * user_cancelled = 2 * download_problem = 3 * communication_error = 4 * OTHERS = 5 * .

HR_99S_GET_LFORM_PROPERTIES CALL FUNCTION 'HR_99S_GET_LFORM_PROPERTIES' EXPORTING i_folname = pa_form IMPORTING e_fopname = lv_efnme e_fotype = lv_ftype e_fogroup = lv_fgrp EXCEPTIONS type_name_not_maintained = 1 form_name_not_found = 2 OTHERS = 3.

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

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = wa_ziektes-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Persoon heeft geen ziekte gevallen'(005).

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = wa_print-pernr infty = '2001' begda = wa_texts-utdte endda = wa_texts-endte TABLES infty_tab = gt_2001.

HR_APPEND_STAT_LIST CALL FUNCTION 'HR_APPEND_STAT_LIST' EXPORTING selected = g_selected processed = g_processed rejected = g_reject.

HR_EXTEND_STAT_LIST





CALL FUNCTION 'HR_EXTEND_STAT_LIST' EXPORTING msgno = 7 number = g_errors.

HR_DISPLAY_STAT_LIST * CALL FUNCTION 'HR_DISPLAY_STAT_LIST' "LLEAC0K020339 * EXPORTING " * no_popup = 'X' " Ausgabe mit Write " * no_print = ' ' " * listheader = text-001 " * colheader = text-002 " * hidemsg = 'X'. " LINE-SELECTION unterstützen "

HR_GET_ERROR_LIST * CALL FUNCTION 'HR_GET_ERROR_LIST' " * EXCEPTIONS " * no_errors = 1 " * OTHERS = 2. "

HR_DISPLAY_ERROR_LIST * CALL FUNCTION 'HR_DISPLAY_ERROR_LIST' " * EXPORTING " * no_popup = 'X' "Ausgabe mit WRITE " * no_print = ' ' " * no_img = ' ' " * no_msgno = ' ' " * linesize = sy-linsz " * listheader = ' ' " * colheader = ' ' " * hidemsg = 'X' "mit HIDE-Option für Lang- " * "texte bei Doppelklick " ** TABLES " ** error = " * EXCEPTIONS " * invalid_linesize = 1 " * OTHERS = 2. "

HR_PAL_LOG_DISPLAY CALL FUNCTION 'HR_PAL_LOG_DISPLAY' " EXPORTING " i_s_display_profile = dispprof " EXCEPTIONS " program_error = 1 " no_logs = 2 " OTHERS = 3. "

HR_DISPLAY_ERROR_LONGTEXT * CALL FUNCTION 'HR_DISPLAY_ERROR_LONGTEXT'. "

HR_DISPLAY_STAT_LONGTEXT * CALL FUNCTION 'HR_DISPLAY_STAT_LONGTEXT'. "LLEAC0K020339

SELECT_TEXT CALL FUNCTION 'SELECT_TEXT' EXPORTING client = sy-mandt database_only = 'X' * TEXTMEMORY_ONLY = ' ' object = 'HR_NL_WP01' * name = 'WP01' id = 'WP01' "LULAC0K002759 language = sy-langu "LULAC0K002759 * ARCHIVE_HANDLE = 0 * LOCAL_CAT = ' ' * IMPORTING * ENTRIES = TABLES selections = p_gt_textid * T_OBJECT = * t_name = * T_ID = * T_LANGUAGE = EXCEPTIONS wrong_access_to_archive = 1 OTHERS = 2 .

SELECT_TEXT CALL FUNCTION 'SELECT_TEXT' EXPORTING client = sy-mandt database_only = 'X' * TEXTMEMORY_ONLY = ' ' object = 'HR_NL_WP01' name = p_name id = 'WP01' "LULAC0K002759 language = sy-langu "LULAC0K002759 * ARCHIVE_HANDLE = 0 * LOCAL_CAT = ' ' IMPORTING entries = p_entries * TABLES * selections = lt_thead * T_OBJECT = * T_NAME = * T_ID = * T_LANGUAGE = EXCEPTIONS wrong_access_to_archive = 1 OTHERS = 2 .

READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING * CLIENT = SY-MANDT id = 'WP01' "p_wa_texts-textid-tdid language = sy-langu "p_wa_texts-textid-tdspras name = p_wa_texts-textid-tdname object = 'HR_NL_WP01' "p_wa_texts-textid-tdobject * ARCHIVE_HANDLE = 0 * LOCAL_CAT = ' ' * IMPORTING * header = header TABLES lines = l_lines EXCEPTIONS id = 1 language = 2 name = 3 not_found = 4 object = 5 reference_check = 6 wrong_access_to_archive = 7 OTHERS = 8.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p_wa_texts-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Tekst bestaat niet'(004).

HR_NL_GET_REPERS CALL FUNCTION 'HR_NL_GET_REPERS' EXPORTING date = p_begda soort = '01' " UVI repers uvis = 'A' pernr = p0001-pernr IMPORTING error = l_error TABLES relmngtab = relmngtab_uv errortab = l_errortab.

HR_NL_GET_RELATIONS CALL FUNCTION 'HR_NL_GET_RELATIONS' EXPORTING date = p_begda TABLES relmngtab = relmngtab_uv errortab = l_errortab.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p0001-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Geen relatie gevonden voor rechtspersoon'(007) msgv2 = relmngtab_uv-reper msgv3 = 'en instantie'(008) msgv4 = relmngtab_uv-insta.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'CR' i_ankey = relmngtab_uv-ctprp * I_ADRNR = IMPORTING error = l_error adres = adrnl_wg2uv.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'RP' i_ankey = relmngtab_uv-ctprp IMPORTING error = l_error adres = adrnl_wg2uv.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'RP' i_ankey = relmngtab_uv-adrrp * I_ADRNR = IMPORTING error = l_error adres = adrnl_wg2uv.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'CI' i_ankey = relmngtab_uv-ctpei * I_ADRNR = IMPORTING error = l_error adres = adrnl_uv.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'EI' i_ankey = relmngtab_uv-ctpei IMPORTING error = l_error adres = adrnl_uv.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'EI' i_ankey = relmngtab_uv-adrei * I_ADRNR = IMPORTING error = l_error adres = adrnl_uv.




HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p0001-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Geen UWV rechtspersoon gevonden tussen'(009) msgv2 = p_begda msgv3 = 'en'(010) msgv4 = p_endda.

HR_NL_GET_REPERS CALL FUNCTION 'HR_NL_GET_REPERS' EXPORTING date = p_begda soort = '06' "arbodienst repers * UVIS = 'A' pernr = p0001-pernr IMPORTING error = l_error TABLES relmngtab = relmngtab_ad errortab = l_errortab .

HR_NL_GET_RELATIONS CALL FUNCTION 'HR_NL_GET_RELATIONS' EXPORTING date = p_begda TABLES relmngtab = relmngtab_ad errortab = l_errortab.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p0001-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Geen relatie gevonden voor rechtspersoon'(007) msgv2 = relmngtab_ad-reper msgv3 = 'en instantie'(008) msgv4 = relmngtab_ad-insta.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'CR' i_ankey = relmngtab_ad-ctprp * I_ADRNR = IMPORTING error = l_error adres = adrnl_wg2ad.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'RP' i_ankey = relmngtab_ad-ctprp IMPORTING error = l_error adres = adrnl_wg2ad.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'RP' i_ankey = relmngtab_ad-adrrp * I_ADRNR = IMPORTING error = l_error adres = adrnl_wg2ad.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'CI' i_ankey = relmngtab_ad-ctpei * I_ADRNR = IMPORTING error = l_error adres = adrnl_ad.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'EI' i_ankey = relmngtab_ad-ctpei IMPORTING error = l_error adres = adrnl_ad.

HR_NL_GET_ADDRESS CALL FUNCTION 'HR_NL_GET_ADDRESS' EXPORTING i_date = p_begda i_anart = 'EI' i_ankey = relmngtab_ad-adrei * I_ADRNR = IMPORTING error = l_error adres = adrnl_ad.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p0001-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Geen rechtspersoon gevonden tussen'(011) msgv2 = p_begda msgv3 = 'en'(010) msgv4 = p_endda.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p0001-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Geen adres in tabel T536C gevonden voor'(028) msgv2 = relmngtab_ad-reper msgv3 = relmngtab_ad-insta msgv4 = relmngtab_ad-adrrp.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p0001-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Geen adres in tabel T536C gevonden voor'(028) msgv2 = relmngtab_ad-reper msgv3 = relmngtab_ad-insta msgv4 = relmngtab_ad-adrrp.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p0001-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Geen relatie gevonden voor rechtspersoon'(007) msgv2 = relmngtab_ad-reper msgv3 = 'en instantie'(008) msgv4 = relmngtab_ad-insta.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p0001-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Geen adres in tabel T536C gevonden voor'(028) msgv2 = relmngtab_uv-reper msgv3 = relmngtab_uv-insta msgv4 = relmngtab_uv-adrrp.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p0001-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Geen adres in tabel T536C gevonden voor'(028) msgv2 = relmngtab_uv-reper msgv3 = relmngtab_uv-insta msgv4 = relmngtab_uv-adrrp.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = p0001-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Geen relatie gevonden voor rechtspersoon'(007) msgv2 = relmngtab_uv-reper msgv3 = 'en instantie'(008) msgv4 = relmngtab_uv-insta.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = wa_ziektes-pernr infty = '2001' begda = wa_ziektes-begda endda = wa_ziektes-endda TABLES infty_tab = gt_2001 EXCEPTIONS infty_not_found = 1 OTHERS = 2.

HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING pernr = wa_ziektes-pernr arbgb = '5N' msgty = 'E' msgno = '016' msgv1 = 'Persoon heeft geen ziekte gevallen'(005).

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = wa_print-pernr infty = '2001' begda = wa_texts-utdte endda = wa_texts-endte TABLES infty_tab = gt_2001.

HR_99S_OUTPUT_LFORM CALL FUNCTION 'HR_99S_OUTPUT_LFORM' EXPORTING i_folname = pa_form i_fotype = lv_ftype i_date = sy-datum i_data_struc = gs_str_pdf EXCEPTIONS error = 1 OTHERS = 2.

HR_COUNTRYGROUPING_GET CALL FUNCTION 'HR_COUNTRYGROUPING_GET' EXPORTING pernr = p_pernr tclas = 'A' IMPORTING molga = g_molga EXCEPTIONS not_found = 1 OTHERS = 2.

HR_99S_CONV_PRIPARMS_TO_ITCPO *CALL FUNCTION 'HR_99S_CONV_PRIPARMS_TO_ITCPO' * EXPORTING * P_PARAMS = PRI_PARAMS * IMPORTING * P_ITCPO = PRI_OPTIONS * EXCEPTIONS * ERROR = 1 * OTHERS = 2 * .

HR_99S_CONV_PRIPARMS_TO_SSFCOM *CALL FUNCTION 'HR_99S_CONV_PRIPARMS_TO_SSFCOM' * EXPORTING * P_PARAMS = pri_params * IMPORTING * P_SFPARAMS = P_OUTPUT_OPT * .



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 RPLWPON0 or its description.