SAP Reports / Programs | Payroll | Brazil(PY-BR) SAP PY

PCFICHBR0 SAP ABAP INCLUDE - Include LHRPAYBR98F07







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

INCLUDE RPUMKC00.


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:

DDUT_DOMVALUES_GET * CALL FUNCTION 'DDUT_DOMVALUES_GET' * EXPORTING * name = 'PBR_CIVIL' "#EC NOTEXT * langu = sy-langu * TABLES * dd07v_tab = dd07v_tab * EXCEPTIONS * illegal_input = 1 * OTHERS = 2.

HR_BR_GET_ESTADO_CIVIL CALL FUNCTION 'HR_BR_GET_ESTADO_CIVIL' EXPORTING idioma = sy-langu famst = p_p0002_famst IMPORTING civil = l_civil EXCEPTIONS not_found = 1 OTHERS = 2.

HR_BR_VERIFICA_TIPO_AUSENCIA CALL FUNCTION 'HR_BR_VERIFICA_TIPO_AUSENCIA' EXPORTING moabw = t001p-moabw subty = p2001-subty paydate = p2001-begda IMPORTING tipo_ausencia = tipo EXCEPTIONS ausencia_nao_encontrada = 1 OTHERS = 2.

HR_BR_LE_TIPO_CONTIGENTE CALL FUNCTION 'HR_BR_LE_TIPO_CONTIGENTE' EXPORTING mopgk = t503-konty mozko = t001p-mozko date = p2006-begda IMPORTING per_aquisitivo = range_aquisitivo ferias = ferias * FERIAS_ANTECIPADAS = * ferias_vencidas = ferias_vencidas EXCEPTIONS quota_nao_encontrada = 1 OTHERS = 2.

RP_EDIT_NAME CALL FUNCTION 'RP_EDIT_NAME' EXPORTING pp0002 = p0002 molga = pbr99_molga langu = sy-langu format = '01' IMPORTING edit_name = p_wa_header-employee_name EXCEPTIONS OTHERS = 1.

HR_BR_CONTRACTUAL_SALARY CALL FUNCTION 'HR_BR_CONTRACTUAL_SALARY' EXPORTING begda = p0008-begda endda = p0008-endda perno = pernr-pernr fc_sw_dec = sw_dec calc_currency = pbr99_waers p8_subty = 'BR01' "// Subtype BR01 p_first_salary = 'X' TABLES pp0001 = p0001 pp0007 = p0007 pp0008 = p0008 it = it EXCEPTIONS OTHERS = 1.

HRCA_PAYMENT_CHECK CALL FUNCTION 'HRCA_PAYMENT_CHECK' EXPORTING bank_country = p0009-banks bank_key = p0009-bankl bank_account = p0009-bankn company_country = 'BR' payment_method = p0009-zlsch iban = p0009-iban IMPORTING bank_detail = bnka_bf payment_method_detail = t042z_bf payment_method_text = t042z_l_bf-text1.

HRCA_READ_BANK_ADDRESS_2 CALL FUNCTION 'HRCA_READ_BANK_ADDRESS_2' EXPORTING bank_country = p0009-banks bank_number = p0009-bankl IMPORTING bank_data = p_bnka_bf EXCEPTIONS not_found = 1 OTHERS = 2.

HRCA_PAYMENTMETH_GETDETAIL CALL FUNCTION 'HRCA_PAYMENTMETH_GETDETAIL' EXPORTING country = p_country paymentmethod = p_payment_method IMPORTING t042z_data = l_t042z_bf EXCEPTIONS not_found = 1 OTHERS = 2.

HRCA_PAYMENTMETH_GETNAME CALL FUNCTION 'HRCA_PAYMENTMETH_GETNAME' EXPORTING country = p_country paymentmethod = p_payment_method IMPORTING name = p_wa_header-forma_pagto EXCEPTIONS not_found = 1 OTHERS = 2.

HR_BR_SELECT_WAGETYPES CALL FUNCTION 'HR_BR_SELECT_WAGETYPES' EXPORTING group = 'ADIA' "#EC NOTEXT IMPORTING lgarttab = lgart_tab.

RP_FILL_WAGE_TYPE_TABLE_EXT CALL FUNCTION 'RP_FILL_WAGE_TYPE_TABLE_EXT' EXPORTING appli = const_appli_payroll begda = p_pn_begda endda = p_pn_endda pernr = pernr-pernr * subty = '0 ' TABLES pp0001 = p0001 pp0007 = p0007 pp0008 = p0008 ppbwla = contract_salary_tab EXCEPTIONS error_at_indirect_evaluation = 1 OTHERS = 2.

RP_FILL_WAGE_TYPE_TABLE_EXT CALL FUNCTION 'RP_FILL_WAGE_TYPE_TABLE_EXT' EXPORTING appli = const_appli_payroll begda = p_pn_begda endda = p_pn_endda pernr = pernr-pernr seqnr = tab_seqnr subty = 'BR01' TABLES pp0001 = p0001 pp0007 = p0007 pp0008 = rp0008 ppbwla = contract_salary_tab2 EXCEPTIONS error_at_indirect_evaluation = 1 OTHERS = 2.

HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' EXPORTING persnr = p0000-pernr begda = p_pn_begda endda = p_pn_endda IMPORTING entrydate = p_wa_header-hire_date EXCEPTIONS entry_date_not_found = 1 pernr_not_assigned = 2 OTHERS = 3.

RP_HIRE_FIRE CALL FUNCTION 'RP_HIRE_FIRE' EXPORTING beg = p_pn_begda end = p_pn_endda IMPORTING fire_date = p_wa_header-fire_date TABLES pphifi = phifi pp0000 = p0000 pp0001 = p0001.

RH_GET_PLVAR CALL FUNCTION 'RH_GET_PLVAR' IMPORTING plvar = plvalue wfplvar = plvalue2 EXCEPTIONS no_plvar = 1 OTHERS = 2.

RH_READ_ATTENDEE_HISTORY CALL FUNCTION 'RH_READ_ATTENDEE_HISTORY' EXPORTING plvar = plvalue patyp = t77s0-gsval(2) "'P ' parid = empl * ETYID = begda = p_pn_begda endda = p_pn_endda * WITH_ROOM_RESERV = ' ' TABLES * ATTENDEE_LIST = attendance_list = att EXCEPTIONS nothing_found = 1 OTHERS = 2 .

RH_READ_INFTY_1001 CALL FUNCTION 'RH_READ_INFTY_1001' * EXPORTING * AUTHORITY = 'DISP' * WITH_STRU_AUTH = 'X' * ISTAT = ' ' * EXTEND = 'X' * SUBTY = ' ' * BEGDA = '19000101' * ENDDA = '99991231' * CONDITION = '00000' * SORT = 'X' * WITH_EV = ' ' * ADATA = 'X' TABLES i1001 = wa_1001 OBJECTS = object2 EXCEPTIONS nothing_found = 1 wrong_condition = 2 OTHERS = 3 .

RH_READ_INFTY_1000





CALL FUNCTION 'RH_READ_INFTY_1000' * EXPORTING * AUTHORITY = 'DISP' * WITH_STRU_AUTH = 'X' * ISTAT = ' ' * EXTEND = 'X' * BEGDA = P_PN_BEGDA * ENDDA = P_PN_ENDDA * CONDITION = '00000' * SORT = 'X' TABLES i1000 = wa_1000 OBJECTS = object EXCEPTIONS nothing_found = 1 wrong_condition = 2 OTHERS = 3 .

RH_READ_INFTY_1001 CALL FUNCTION 'RH_READ_INFTY_1001' "// Train. relationshps

CU_READ_RGDIR CALL FUNCTION 'CU_READ_RGDIR' EXPORTING persnr = pernr-pernr * NO_AUTHORITY_CHECK = ' ' IMPORTING molga = fmolga TABLES in_rgdir = rgdir EXCEPTIONS no_record_found = 1 OTHERS = 2 .

CD_READ_DATE_RANGE_WITH_PAYDT CALL FUNCTION 'CD_READ_DATE_RANGE_WITH_PAYDT' EXPORTING begda = p_pn_begda endda = p_pn_endda TABLES rgdir_in = rgdir rgdir_out = res_rgdir EXCEPTIONS * no_record_found = 1 OTHERS = 2.

HR_IMPORT_RGDIR_FROM_PCLX CALL FUNCTION 'HR_IMPORT_RGDIR_FROM_PCLX' EXPORTING employee_number = pernr-pernr cluster_id = t500l-relid TABLES import_rgdir = res_rgdir EXCEPTIONS no_results = 1 no_read_authority = 2 OTHERS = 3.

PYXX_READ_RGDIR_PAYRESULTS CALL FUNCTION 'PYXX_READ_RGDIR_PAYRESULTS' EXPORTING clusterid = t500l-relid employeenumber = pernr-pernr * READ_ONLY_BUFFER = read_only_international = 'X' TABLES rgdir = res_rgdir imported_periods = result EXCEPTIONS import_error = 1 OTHERS = 2.

HR_DWS_RE550_VARIA CALL FUNCTION 'HR_DWS_RE550_VARIA' EXPORTING motpr = p_wa_itab-motpr tprog = p_wa_itab-tprog varia = varia compute_varia = 'USE_HOL_CLASS' date = p_wa_itab-woday "The current week day IMPORTING daygen = daygen beguz = beguz enduz = enduz TABLES dayint = dayint EXCEPTIONS error_occured = 1 OTHERS = 2.

BAPI_EMPLOYEE_ENQUEUE CALL FUNCTION 'BAPI_EMPLOYEE_ENQUEUE' EXPORTING number = p0695-pernr IMPORTING return = return.

BAPI_EMPLOYEE_DEQUEUE CALL FUNCTION 'BAPI_EMPLOYEE_DEQUEUE' EXPORTING number = p0695-pernr IMPORTING return = return.



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