HOMBNKL0_F01 is a standard ABAP Include available within your SAP system (depending on your version and release level). Below is the standard documentation available for this report and a few details of other objects it interacts with such as tables, function modules, includes etc. If you would like to see the full code listing simply enter HOMBNKL0_F01 into the relevant SAP transaction such as SE38 or SE80
*&-------------------------------* *& INCLUDE HOMBNKL0_F01 *&-------------------------------* *&-------------------------------* *& Form GET_DATA *&-------------------------------* * Get required data for further use *----------------------------------------------------------------------* FORM get_data .
* Select position texts SELECT * FROM t528t CLIENT SPECIFIED INTO TABLE gt_t528t WHERE mandt = sy-mandt AND sprsl = sy-langu AND otype = 'S' AND endda GE sy-datum AND begda LE sy-datum. IF sy-subrc NE 0. ....See full code listing within your SAP system using transactions such as SE80 and SE38
No INCLUDES are used within this report code!
T528T SELECT * FROM t528t CLIENT SPECIFIED INTO TABLE gt_t528t WHERE mandt = sy-mandt AND sprsl = sy-langu AND otype = 'S' AND endda GE sy-datum AND begda LE sy-datum.
BNKA SELECT banks bankl banka provz stras ort01 FROM bnka CLIENT SPECIFIED INTO TABLE gt_bnka WHERE mandt = sy-mandt.
T52RELID SELECT * FROM t52relid INTO TABLE gt_relid WHERE tabname = 'PCL2'.
T001 SELECT bukrs butxt FROM t001 CLIENT SPECIFIED INTO TABLE gt_t001 WHERE mandt = sy-mandt AND bukrs IN pnpbukrs.
HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' EXPORTING persnr = pernr-pernr IMPORTING entrydate = ls_alv-jdate EXCEPTIONS entry_date_not_found = 1 pernr_not_assigned = 2 OTHERS = 3.
SPELL_AMOUNT CALL FUNCTION 'SPELL_AMOUNT' EXPORTING amount = ls_alv-tlsal currency = ls_wgtyp-waers language = sy-langu IMPORTING in_words = ls_spell EXCEPTIONS not_found = 1 too_large = 2 OTHERS = 3.
HRPAYOM_AMOUNT_CURRENCY CALL FUNCTION 'HRPAYOM_AMOUNT_CURRENCY' EXPORTING currency = ls_wgtyp-waers sap_amount = lv_inamt IMPORTING bapi_amount = lv_outamt.
HRPAYOM_AMOUNT_CURRENCY CALL FUNCTION 'HRPAYOM_AMOUNT_CURRENCY' EXPORTING currency = ls_alv-waers sap_amount = lv_inamt IMPORTING bapi_amount = lv_outamt.
HR_99S_GET_EVAL_CLASS_VALUE CALL FUNCTION 'HR_99S_GET_EVAL_CLASS_VALUE' EXPORTING p_molga = gc_molga p_lgart = lv_lgart p_eval_class = gc_evcls p_keydate = sy-datum IMPORTING p_value = lv_value.
RP_EVALUATE_INDIRECTLY_P0008 CALL FUNCTION 'RP_EVALUATE_INDIRECTLY_P0008' EXPORTING pbegda = sy-datum pmolga = gc_molga pp0001 = p0001 pp0007 = p0007 pp0008 = p0008 ppernr = pernr-pernr TABLES ptbindbw = lt_ptbindbw EXCEPTIONS bad_parameters = 1 error_at_indirect_evaluation = 2 OTHERS = 3.
HR_99S_GET_EVAL_CLASS_VALUE CALL FUNCTION 'HR_99S_GET_EVAL_CLASS_VALUE' EXPORTING p_molga = gc_molga p_lgart = p0014-lgart p_eval_class = gc_evcls p_keydate = sy-datum IMPORTING p_value = lv_value.
RP_EVALUATE_INDIRECTLY_P0014 CALL FUNCTION 'RP_EVALUATE_INDIRECTLY_P0014' EXPORTING pbegda = sy-datum pmolga = gc_molga ppernr = pernr-pernr pp0001 = p0001 pp0014 = p0014 TABLES ptbindbw = lt_ptbindbw EXCEPTIONS bad_parameters = 1 error_at_indirect_evaluation = 2 OTHERS = 3.
HR_MX_GET_PAYROLL_PERIOD CALL FUNCTION 'HR_MX_GET_PAYROLL_PERIOD' EXPORTING payroll_area = p0001-abkrs IMPORTING period_begin = lv_begda period_end = lv_endda EXCEPTIONS t549a_error = 1 t549q_error = 2 OTHERS = 3.
HR_99S_GET_EVAL_CLASS_VALUE CALL FUNCTION 'HR_99S_GET_EVAL_CLASS_VALUE' EXPORTING p_molga = gc_molga p_lgart = p0015-lgart p_eval_class = gc_evcls p_keydate = sy-datum IMPORTING p_value = lv_value.
RP_EVALUATE_INDIRECTLY_P0015 CALL FUNCTION 'RP_EVALUATE_INDIRECTLY_P0015' EXPORTING pbegda = sy-datum pmolga = gc_molga ppernr = pernr-pernr pp0001 = p0001 pp0015 = p0015 TABLES ptbindbw = lt_ptbindbw EXCEPTIONS bad_parameters = 1 error_at_indirect_evaluation = 2 OTHERS = 3.
CU_READ_RGDIR CALL FUNCTION 'CU_READ_RGDIR' EXPORTING persnr = pernr-pernr TABLES in_rgdir = lt_rgdir EXCEPTIONS no_record_found = 1 OTHERS = 2.
PYXX_GET_RELID_FROM_PERNR CALL FUNCTION 'PYXX_GET_RELID_FROM_PERNR' EXPORTING employee = pernr-pernr IMPORTING relid = lv_relid EXCEPTIONS error_reading_infotype_0001 = 1 error_reading_molga = 2 error_reading_relid = 3 OTHERS = 4.
CD_READ_LAST CALL FUNCTION 'CD_READ_LAST' EXPORTING begin_date = low-date end_date = high-date IMPORTING out_seqnr = lv_seqnr TABLES rgdir = lt_rgdir EXCEPTIONS no_record_found = 1 OTHERS = 2.
PYXX_READ_PAYROLL_RESULT CALL FUNCTION 'PYXX_READ_PAYROLL_RESULT' EXPORTING employeenumber = pernr-pernr sequencenumber = lv_seqnr CHANGING payroll_result =
EXCEPTIONS illegal_isocode_or_clusterid = 1 error_generating_import = 2 import_mismatch_error = 3 subpool_dir_full = 4 no_read_authority = 5 no_record_found = 6 versions_do_not_match = 7 error_reading_archive = 8 error_reading_relid = 9 OTHERS = 10.
H99B_OPEN_LFORM_JOB CALL FUNCTION 'H99B_OPEN_LFORM_JOB' EXPORTING i_molga = hr99b_form_sel-molga i_fogroup = hr99b_form_sel-fogroup i_folname = hr99b_form_sel-folname options = l_options EXCEPTIONS OTHERS = 99.
H99B_OUTPUT_LFORM CALL FUNCTION 'H99B_OUTPUT_LFORM' EXPORTING i_molga = gc_molga i_fogroup = hr99b_form_sel-fogroup i_folname = hr99b_form_sel-folname i_data_struc = ls_pdf EXCEPTIONS error = 1 OTHERS = 99.
H99B_OPEN_LFORM_JOB CALL FUNCTION 'H99B_OPEN_LFORM_JOB' EXPORTING i_molga = hr99b_form_sel-molga i_fogroup = hr99b_form_sel-fogroup i_folname = hr99b_form_sel-folname options = l_options EXCEPTIONS OTHERS = 99.
H99B_OUTPUT_LFORM CALL FUNCTION 'H99B_OUTPUT_LFORM' EXPORTING i_molga = gc_molga i_fogroup = hr99b_form_sel-fogroup i_folname = hr99b_form_sel-folname i_data_struc = ls_pdf EXCEPTIONS error = 1 OTHERS = 99.
H99B_OPEN_LFORM_JOB CALL FUNCTION 'H99B_OPEN_LFORM_JOB' EXPORTING i_molga = hr99b_form_sel-molga i_fogroup = hr99b_form_sel-fogroup i_folname = hr99b_form_sel-folname options = l_options EXCEPTIONS OTHERS = 99.
H99B_OUTPUT_LFORM CALL FUNCTION 'H99B_OUTPUT_LFORM' EXPORTING i_molga = gc_molga i_fogroup = hr99b_form_sel-fogroup i_folname = hr99b_form_sel-folname i_data_struc = ls_pdf EXCEPTIONS error = 1 OTHERS = 99.
H99B_CLOSE_LFORM_JOB CALL FUNCTION 'H99B_CLOSE_LFORM_JOB' EXCEPTIONS OTHERS = 99.
FP_FUNCTION_MODULE_NAME CALL FUNCTION 'FP_FUNCTION_MODULE_NAME' EXPORTING i_name = pc_frm_nm IMPORTING e_funcname = lv_fm_name.
FP_JOB_OPEN CALL FUNCTION 'FP_JOB_OPEN' CHANGING ie_outputparams = ls_outputparams EXCEPTIONS cancel = 1 usage_error = 2 system_error = 3 internal_error = 4 OTHERS = 5.
FP_JOB_CLOSE CALL FUNCTION 'FP_JOB_CLOSE' EXCEPTIONS usage_error = 1 system_error = 2 internal_error = 3 OTHERS = 4.
SCMS_XSTRING_TO_BINARY CALL FUNCTION 'SCMS_XSTRING_TO_BINARY' EXPORTING buffer = ls_result-pdf TABLES binary_tab = lt_att_content_hex.