SAP Reports / Programs | Environment, Health and Safety | Occupational Health(EHS-HEA) SAP EHS

REHSH_PRNT_PDF_F02 SAP ABAP INCLUDE - REHSHPRNTPDFF02







REHSH_PRNT_PDF_F02 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 REHSH_PRNT_PDF_F02 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 REHSH_PRNT_PDF_F02. "Basic submit
SUBMIT REHSH_PRNT_PDF_F02 AND RETURN. "Return to original report after report execution complete
SUBMIT REHSH_PRNT_PDF_F02 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 REHSH_PRNT_PDF_F02

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:

EHS00_LB01_PNAME_SINGLE_GET CALL FUNCTION 'EHS00_LB01_PNAME_SINGLE_GET' EXPORTING i_pgroup = ptab_prot-pgroup i_pnumber = ptab_prot-pnumber i_key_date = ptab_prot-date_performed IMPORTING e_pname = ptab_prot-pname.

CONVERT_DATE_TO_EXTERNAL CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL' EXPORTING date_internal = ptab_prot-srv_pres_until IMPORTING date_external = l_date_external EXCEPTIONS date_internal_is_invalid = 1 OTHERS = 2.

EHS00_LB01_REGULATION_BY_PERS CALL FUNCTION 'EHS00_LB01_REGULATION_BY_PERS' EXPORTING i_person_id = l_person_id i_person_flag = l_person_flag i_pgroup = ptab_prot-pgroup i_pnumber = ptab_prot-pnumber i_date_performed = ptab_prot-date_performed IMPORTING E_PROTREG_REC = ls_protreg EXCEPTIONS PARAMETER_MISSING = 1 NOT_FOUND = 2 PERSON_NOT_FOUND = 3 OTHERS = 4.

RH_STRUC_GET CALL FUNCTION 'RH_STRUC_GET' EXPORTING act_otype = 'P' act_objid = p_hr_pernr act_wegid = 'EHSP_OBJ' act_begda = p_begda act_endda = p_endda TABLES result_tab = result_tab result_objec = result_objec result_struc = result_struc EXCEPTIONS no_plvar_found = 1 no_entry_found = 2 OTHERS = 3.

EHS_FIND_AGENTS CALL FUNCTION 'EHS_FIND_AGENTS' EXPORTING im_begda = p_begda im_endda = p_endda TABLES im_objects = result_objec im_struc = result_struc ex_agents_1403 = itab_exp_lta ex_agents_1404 = itab_exp_ste ex_exp_lta = itab_exp_lta_red ex_exp_ste = itab_exp_ste_red EXCEPTIONS no_objects = 1 nothing_found = 2 endda_before_begda = 3 OTHERS = 4. "#EC ENHOK

C1F2_SUBSTANCES_READ CALL FUNCTION 'C1F2_SUBSTANCES_READ' EXPORTING i_scenario = '01' i_addinf = l_addinf i_flg_header = esp1_true IMPORTING e_flg_error = l_flg_error TABLES x_api_header_tab = l_spec_head_tab EXCEPTIONS no_object_specified = 1 parameter_error = 2 internal_error = 3 convmode_set_failed = 4 keydate_or_changenumber_error = 5 interval_access_error = 6 OTHERS = 7.

CBIH_LB47_DELEGATE_NAME CALL FUNCTION 'CBIH_LB47_DELEGATE_NAME' EXPORTING i_addinf = l_addinf i_eptype = l_spec_head_tab-subcat i_epid = ptab_exposure-agent_id IMPORTING e_epnam = ptab_exposure-agent_name EXCEPTIONS not_found = 1 OTHERS = 2.

CONVERT_DATE_TO_EXTERNAL CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL' EXPORTING date_internal = wa_position-vbegda IMPORTING date_external = l_begda_external EXCEPTIONS date_internal_is_invalid = 1 OTHERS = 2.

CONVERT_DATE_TO_EXTERNAL CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL' EXPORTING date_internal = wa_position-vendda IMPORTING date_external = l_endda_external EXCEPTIONS date_internal_is_invalid = 1 OTHERS = 2.

CBIH_LB16_IP_READ CALL FUNCTION 'CBIH_LB16_IP_READ' EXPORTING i_persnr = p_persno i_valdat = sy-datum i_flg_with_message = true i_persgrp = p_persflag i_flg_persdata = true i_flg_orgdata = true i_flg_address = true i_flg_socialins = true i_flg_family = false i_flg_entrydate = true IMPORTING e_pdatfu_wa = l_person_data e_person_persdata_rec = l_persdata_rec e_person_orgdata_rec = lg_orgdata_rec e_person_address_rec = l_address_rec e_person_socialins_rec = l_socialins_rec EXCEPTIONS no_object_specified = 1 internal_error = 2 OTHERS = 3.

HR_LEAVING_DATE CALL FUNCTION 'HR_LEAVING_DATE' EXPORTING persnr = l_persnr begda = sy-datum endda = sy-datum IMPORTING leavingdate = p_persdat-fire_date EXCEPTIONS leaving_date_not_found = 1 pernr_not_assigned = 2 OTHERS = 3.

CBHR_CUST_HEAINS_OFFICE_GET CALL FUNCTION 'CBHR_CUST_HEAINS_OFFICE_GET' EXPORTING i_kvsch = l_person_data-kvsfr i_kvgst = l_person_data-kvgst IMPORTING e_kvsch = lc_str_t5d1k-kvsch e_txt02 = lc_str_t5d1k-txt02 e_txt04 = lc_str_t5d1k-txt04 e_pstlz = lc_str_t5d1k-pstlz e_ort01 = lc_str_t5d1k-ort01 e_telnr = lc_str_t5d1k-telnr.

CBHR_CUST_ADDRESS_GET CALL FUNCTION 'CBHR_CUST_ADDRESS_GET' EXPORTING i_anart = anart i_vargu = l_vargu TABLES e_address_tab = lc_tbl_t536a.

EHS00_CHECK_PERSONID CALL FUNCTION 'EHS00_CHECK_PERSONID' EXPORTING i_person_id = i_person_id i_person_flag = i_person_flag IMPORTING e_intpernr = l_intpernr e_return = l_return.

CBHR_CUST_ADDRESS_GET CALL FUNCTION 'CBHR_CUST_ADDRESS_GET' EXPORTING i_anart = l_anart i_vargu = l_vargu TABLES e_address_tab = lc_tbl_t536a.

CBHR_CUST_HEAINS_OFFICE_GET CALL FUNCTION 'CBHR_CUST_HEAINS_OFFICE_GET' EXPORTING i_kvsch = l_person_data-kvsfr i_kvgst = l_person_data-kvgst i_valdat = sy-datum IMPORTING e_kvsch = lc_str_t5d1k-kvsch e_txt02 = lc_str_t5d1k-txt02 e_txt04 = lc_str_t5d1k-txt04 e_pstlz = lc_str_t5d1k-pstlz e_ort01 = lc_str_t5d1k-ort01 e_telnr = lc_str_t5d1k-telnr.

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = l_person_id IMPORTING output = l_person_id.

EHS00_LB20_PER_CHECK_AUTH CALL FUNCTION 'EHS00_LB20_PER_CHECK_AUTH' EXPORTING i_actype = ic_actype-show i_person_id = l_person_id i_person_flag = l_person_flag i_read_orgdata_flg = true EXCEPTIONS no_authority = 1 parameter_error = 2 OTHERS = 3.

EHS00_LB20_POH_CHECK_AUTH





CALL FUNCTION 'EHS00_LB20_POH_CHECK_AUTH' EXPORTING i_actype = ic_actype-show i_object = ic_oh_object-per_srv i_read_heacent_flg = true i_read_heacent_from = ic_oh_heacent_from-service i_srvnumber = lg_srvnum i_heacent_dummy_flg = false EXCEPTIONS no_authority = 1 parameter_error = 2 OTHERS = 3.

EHS00_LB20_POH_CHECK_AUTH CALL FUNCTION 'EHS00_LB20_POH_CHECK_AUTH' EXPORTING i_actype = ic_actype-show i_object = ic_oh_object-srv_pr i_read_heacent_flg = true i_read_heacent_from = ic_oh_heacent_from-service i_srvnumber = lg_srvnum i_heacent_dummy_flg = false EXCEPTIONS no_authority = 1 parameter_error = 2 OTHERS = 3.

CBIH_LB16_IP_READ CALL FUNCTION 'CBIH_LB16_IP_READ' EXPORTING i_persnr = lc_tbl_srvprot-srv_physician i_valdat = sy-datum i_flg_with_message = false i_persgrp = l_persgrp i_flg_persdata = true i_flg_orgdata = false i_flg_address = true i_flg_socialins = false i_flg_family = false i_flg_entrydate = false IMPORTING e_pdatfu_wa = l_person e_person_persdata_rec = l_persdata e_person_address_rec = l_address EXCEPTIONS no_object_specified = 1 internal_error = 2 OTHERS = 3.

CBIH_LB16_IP_READ CALL FUNCTION 'CBIH_LB16_IP_READ' EXPORTING i_persnr = lc_tbl_service-srv_physician i_valdat = sy-datum i_flg_with_message = false i_persgrp = l_persgrp i_flg_persdata = true i_flg_orgdata = false i_flg_address = true i_flg_socialins = false i_flg_family = false i_flg_entrydate = false IMPORTING e_pdatfu_wa = l_person e_person_persdata_rec = l_persdata e_person_address_rec = l_address EXCEPTIONS no_object_specified = 1 internal_error = 2 OTHERS = 3.

PERIOD_AND_DATE_CONVERT_OUTPUT CALL FUNCTION 'PERIOD_AND_DATE_CONVERT_OUTPUT' EXPORTING internal_date = p_nesched internal_period = '3' IMPORTING external_date = p_next_date EXCEPTIONS date_invalid = 1 periode_invalid = 2 OTHERS = 3.

BUP_PARTNER_GET CALL FUNCTION 'BUP_PARTNER_GET' EXPORTING i_partner = p_physno IMPORTING e_but000_address = l_bu_partdat EXCEPTIONS partner_not_found = 1 wrong_parameters = 2 OTHERS = 3.

CBIH_LB16_IP_READ CALL FUNCTION 'CBIH_LB16_IP_READ' EXPORTING i_persnr = l_pernr I_VALDAT = SY-DATUM I_FLG_WITH_MESSAGE = true I_PERSGRP = ic_persgrp-internal I_FLG_PERSDATA = true I_FLG_ORGDATA = false I_FLG_ADDRESS = false I_FLG_SOCIALINS = false I_FLG_FAMILY = false I_FLG_ENTRYDATE = false IMPORTING E_PDATFU_WA = l_person_data E_PERSON_PERSDATA_REC = l_persdata_rec EXCEPTIONS NO_OBJECT_SPECIFIED = 1 INTERNAL_ERROR = 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 REHSH_PRNT_PDF_F02 or its description.