SAP Reports / Programs | Payroll | South Korea(PY-KR) SAP PY

Home SAP Development ABAP Coding SAP Fiori SAP Training SAP Tables SAP Objects...

PCYEDKR3 SAP ABAP INCLUDE - Include PCYEDKR3

SAP T-Codes / Example ABAP code
ABAP OO / SAP Function Modules
ABAP reports / SAP Error Messages
SAP Tables / SAP Video Training

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

Text pool values

Title: Include PCYEDKR3

INCLUDES used within this REPORT PCYEDKR3

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:

CU_READ_RGDIR CALL FUNCTION 'CU_READ_RGDIR' EXPORTING persnr = pernr-pernr TABLES in_rgdir = rgdir EXCEPTIONS no_record_found = 1 OTHERS = 2.

ADDR_GET CALL FUNCTION 'ADDR_GET' EXPORTING address_selection = addr1_sel IMPORTING address_value = address EXCEPTIONS parameter_error = 1 address_not_exist = 2 version_not_exist = 3 internal_error = 4 OTHERS = 5.

HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' "NAN553105 EXPORTING persnr = pernr-pernr IMPORTING entrydate = entda TABLES entry_dates = l_entry_dates EXCEPTIONS entry_date_not_found = 1 pernr_not_assigned = 2 OTHERS = 3.

HR_KR_BUSINESSPLACE_GET_DATA CALL FUNCTION 'HR_KR_BUSINESSPLACE_GET_DATA' EXPORTING * pers_area = wpbp-werks "QU803328 * pers_subarea = wpbp-btrtl "QU803328 pers_area = p0001-werks "QU803328 pers_subarea = p0001-btrtl "QU803328 mode = ' ' address_nation = addr_version IMPORTING bus_place_detail = bupla_detail EXCEPTIONS no_company_code_for_pers_area = 1 no_busplace_for_subarea = 2 no_med_ins_assoc_for_subarea = 3 no_rep_busplace_for_mi_assoc = 4 no_entry_t7krbp_for_bupla = 5 no_businessplace_data = 6 illegal_mode = 7 OTHERS = 8.

HRCA_COMPANYCODE_GETDETAIL CALL FUNCTION 'HRCA_COMPANYCODE_GETDETAIL' EXPORTING * companycode = wpbp-bukrs "QU803328 companycode = p0001-bukrs "QU803328 language = sy-langu IMPORTING comp_name = company-comnm EXCEPTIONS not_found = 1 OTHERS = 2.

RP_EDIT_NAME
  CALL FUNCTION 'RP_EDIT_NAME'
    EXPORTING
      pp0002    = p0002
      molga     = '41'
      langu     = sy-langu
      format    = $$format
    IMPORTING
      edit_name = sname
      retcode   = ret_code.

COMPUTE_YEARS_BETWEEN_DATES CALL FUNCTION 'COMPUTE_YEARS_BETWEEN_DATES' "LIUL9CK062877 EXPORTING first_date = birthday modify_interval = '+' "KIMJEON20001125 second_date = age_endda IMPORTING years_between_dates = age_years EXCEPTIONS sequence_of_dates_not_valid = 1 OTHERS = 2.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = pernr-pernr infty = '0540' begda = begda endda = endda TABLES infty_tab = it0540 EXCEPTIONS infty_not_found = 1 OTHERS = 2.

START_FORM
    CALL FUNCTION 'START_FORM'
      EXPORTING
        form      = form
        language  = sy-langu
        startpage = 'PAGE1'
      EXCEPTIONS
        form      = 1
        format    = 2
        unended   = 3
        unopened  = 4
        unused    = 5
        OTHERS    = 6.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        function  = 'SET'
        type      = 'BODY'
        window    = 'MAIN'
      EXCEPTIONS
        element   = 1
        function  = 2
        type      = 3
        unopened  = 4
        unstarted = 5
        window    = 6
        OTHERS    = 7.

WRITE_FORM
*      CALL FUNCTION 'WRITE_FORM'
*        EXPORTING
*          element   = 'FAMILY'
*          function  = 'SET'
*          type      = 'BODY'
*          window    = 'MAIN'
*        EXCEPTIONS
*          element   = 1
*          function  = 2
*          type      = 3
*          unopened  = 4
*          unstarted = 5
*          window    = 6
*          OTHERS    = 7.

CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING command = 'NEW-PAGE PAGE1'.

WRITE_FORM
        CALL FUNCTION 'WRITE_FORM'
          EXPORTING
            element   = 'FAMILY'
            function  = 'SET'
            type      = 'BODY'
            window    = 'MAIN'
          EXCEPTIONS
            element   = 1
            function  = 2
            type      = 3
            unopened  = 4
            unstarted = 5
            window    = 6
            OTHERS    = 7.

CONTROL_FORM * CALL FUNCTION 'CONTROL_FORM' * EXPORTING * command = 'NEW-PAGE PAGE1'.

WRITE_FORM
        CALL FUNCTION 'WRITE_FORM'
          EXPORTING
            element   = 'FAMILY'
            function  = 'SET'
            type      = 'BODY'
            window    = 'MAIN'
          EXCEPTIONS
            element   = 1
            function  = 2
            type      = 3
            unopened  = 4
            unstarted = 5
            window    = 6
            OTHERS    = 7.

END_FORM CALL FUNCTION 'END_FORM' EXCEPTIONS unopened = 1 OTHERS = 2.

START_FORM
    CALL FUNCTION 'START_FORM'
      EXPORTING
        form      = form
        language  = sy-langu
        startpage = 'PAGE2'
      EXCEPTIONS
        form      = 1
        format    = 2
        unended   = 3
        unopened  = 4
        unused    = 5
        OTHERS    = 6.

WRITE_FORM
    CALL FUNCTION 'WRITE_FORM'
      EXPORTING
        function  = 'SET'
        type      = 'BODY'
        window    = 'MAIN'
      EXCEPTIONS
        element   = 1
        function  = 2
        type      = 3
        unopened  = 4
        unstarted = 5
        window    = 6
        OTHERS    = 7.

END_FORM

CALL FUNCTION 'END_FORM' EXCEPTIONS unopened = 1 OTHERS = 2.

START_FORM
      CALL FUNCTION 'START_FORM'
        EXPORTING
          form      = form
          language  = sy-langu
          startpage = 'PAGE3'
        EXCEPTIONS
          form      = 1
          format    = 2
          unended   = 3
          unopened  = 4
          unused    = 5
          OTHERS    = 6.

WRITE_FORM
      CALL FUNCTION 'WRITE_FORM'
        EXPORTING
          function  = 'SET'
          type      = 'BODY'
          window    = 'MAIN'
        EXCEPTIONS
          element   = 1
          function  = 2
          type      = 3
          unopened  = 4
          unstarted = 5
          window    = 6
          OTHERS    = 7.

END_FORM CALL FUNCTION 'END_FORM' EXCEPTIONS unopened = 1 OTHERS = 2.

CLOSE_FORM CALL FUNCTION 'CLOSE_FORM'.

CLOSE_FORM CALL FUNCTION 'CLOSE_FORM' IMPORTING RESULT = results TABLES otfdata = otf_table EXCEPTIONS unopened = 1 OTHERS = 2.

CONVERT_OTF CALL FUNCTION 'CONVERT_OTF' EXPORTING format = 'PDF' IMPORTING bin_filesize = pdf_fsize TABLES otf = otf_table lines = pdf_content EXCEPTIONS err_max_linewidth = 1 err_format = 2 err_conv_not_possible = 3 err_bad_otf = 4 OTHERS = 5.

HR_YEA_GETDEDUCTDETAIL CALL FUNCTION 'HR_YEA_GETDEDUCTDETAIL' EXPORTING employeenumber = pernr-pernr i_begda = tax_begda "BAIW1013183 i_endda = tax_endda "BAIW1013183 IMPORTING deduct_detail = deduct_detail_tb subtotal = subtotal EXCEPTIONS read_infotype_error = 1.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = pernr-pernr infty = '0540' begda = tax_begda "BAIW1013183 endda = tax_endda "BAIW1013183 TABLES infty_tab = it0540 EXCEPTIONS infty_not_found = 1 OTHERS = 2.

HRPY_CD_READ_LAST_KR CALL FUNCTION 'HRPY_CD_READ_LAST_KR' "JINQUE1285000 EXPORTING year = taxyr IMPORTING out_seqnr = pre_seqnr TABLES rgdir = rgdir EXCEPTIONS no_record_found = 1 no_entry_t549a = 2 no_entry_t54c1 = 3 OTHERS = 4.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = pernr-pernr infty = '0540' begda = tax_begda endda = tax_endda TABLES infty_tab = it0540 EXCEPTIONS infty_not_found = 1 OTHERS = 2.

COMPUTE_YEARS_BETWEEN_DATES CALL FUNCTION 'COMPUTE_YEARS_BETWEEN_DATES' EXPORTING first_date = it0021-fgbdt modify_interval = '' second_date = tax_endda IMPORTING years_between_dates = age_years EXCEPTIONS sequence_of_dates_not_valid = 1 OTHERS = 2.

COMPUTE_YEARS_BETWEEN_DATES CALL FUNCTION 'COMPUTE_YEARS_BETWEEN_DATES' EXPORTING first_date = birthday modify_interval = '+' second_date = age_endda IMPORTING years_between_dates = age_years EXCEPTIONS sequence_of_dates_not_valid = 1 OTHERS = 2.

HR_YEA_GETDEDUCTDETAIL CALL FUNCTION 'HR_YEA_GETDEDUCTDETAIL' EXPORTING employeenumber = pernr-pernr i_begda = tax_begda i_endda = tax_endda IMPORTING deduct_detail = deduct_detail_tb subtotal = subtotal EXCEPTIONS read_infotype_error = 1.

HR_YEA_GETEXPENSE
  CALL FUNCTION 'HR_YEA_GETEXPENSE'
    EXPORTING
      employeenumber      = pernr-pernr
      i_begda             = tax_begda
      i_endda             = tax_endda
    IMPORTING
      subrc               = subrc
      expense_deduct      = expense_deduct
    CHANGING
      subop               = itab_subop  "<<< N1502926
    EXCEPTIONS
      read_infotype_error = 1  ">>> N1502926
      OTHERS              = 2.

HR_ENTRY_DATE CALL FUNCTION 'HR_ENTRY_DATE' EXPORTING persnr = pernr-pernr IMPORTING entrydate = entda TABLES entry_dates = l_entry_dates EXCEPTIONS entry_date_not_found = 1 pernr_not_assigned = 2 OTHERS = 3.

CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING command = 'NEW-PAGE PAGE1'.

CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING command = 'NEW-PAGE PAGE2'.

CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING command = 'NEW-PAGE PAGE3'.

CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING command = 'NEW-PAGE PAGE4'.

CONTROL_FORM CALL FUNCTION 'CONTROL_FORM' EXPORTING command = 'NEW-PAGE PAGE5'.

END_FORM CALL FUNCTION 'END_FORM' EXCEPTIONS unopened = 1 OTHERS = 2.

CLOSE_FORM CALL FUNCTION 'CLOSE_FORM'.

CLOSE_FORM CALL FUNCTION 'CLOSE_FORM' IMPORTING RESULT = results TABLES otfdata = otf_table EXCEPTIONS unopened = 1 OTHERS = 2.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = otab-pernr infty = '0881' begda = tax_begda endda = tax_endda IMPORTING subrc = l_subrc TABLES infty_tab = lt_p0881 EXCEPTIONS infty_not_found = 1 OTHERS = 2.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = pernr-pernr infty = '0858' begda = i_begda endda = i_endda IMPORTING subrc = subrc TABLES infty_tab = p0858 EXCEPTIONS infty_not_found = 1 OTHERS = 2.

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

PCYEDKR3 - Include PCYEDKR3
PCYEDKR2 - Include PCYEDKR2
PCYEDKR1 - Include PCYEDKR1
PCYEAKR6 - Include PCYEAKR6
PCYEAKR5 - Include PCYEAKR5
PCYEAKR4_ALV - Include PCYEAKR4

N3DA_FILL_NSI

MWRFCDT_UPD_CHECK_HIER_INI01

PC31TSI0

P0021RO2

PCTRSBR2

MWMFAO01_BUTTON_SELECT

PCGRYIN2

PCBURQA1_OPQADU