SAP Reports / Programs | Personnel Management | Personnel Administration | Japan(PA-PA-JP) SAP PA

comments icon Comments

RPLDTDJ0 SAP ABAP Report - Application form for Employee's income tax and Family Dependant tax







RPLDTDJ0 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for To prepare the year-end adjustment process, you have to collect information about employees' family dependants...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 RPLDTDJ0 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_M22_LDTD - EE's Income Tax & Family Depend. Tax


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 RPLDTDJ0. "Basic submit
SUBMIT RPLDTDJ0 AND RETURN. "Return to original report after report execution complete
SUBMIT RPLDTDJ0 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: P_SPO = Status as Spouse Dependant
Selection Text: P_ADDR = IT0006 subtype
Selection Text: PX_LFVAR = Form Variant
Selection Text: PX_LFORM = Form name
Selection Text: FORM = Form name
Selection Text: DFT_YEAR = Applied Year
Title: Application form for Employee's income tax and Family Dependant tax
Text Symbol: S07 = Print Layout
Text Symbol: S06 = Use IT0002
Text Symbol: S05 = Use IT0021
Text Symbol: S04 = Spouse Dependant Data Source
Text Symbol: S03 = Check IT0006 and IT0145
Text Symbol: S02 = Infotype check
Text Symbol: S01 = SAPscript
Text Symbol: L03 = Printed Employees
Text Symbol: L02 = Rejected employees
Text Symbol: L01 = Processed employees
Text Symbol: I01 = not allowed; print the form in ESS
Text Symbol: F01 = Print control
Text Symbol: E04 = EE rejected :
Text Symbol: E03 = EE processed :
Text Symbol: E02 = IT0145 is missing
Text Symbol: E01 = IT0006 is missing
Text Symbol: C03 = *
Text Symbol: C02 = From '99.04.01
Text Symbol: C01 = O


INCLUDES used within this REPORT RPLDTDJ0

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_PAL_NODE_ADD
  CALL FUNCTION 'HR_PAL_NODE_ADD'
    EXPORTING
      i_relatkey = cl_hr99b_pal=>c_root_node
      i_categ_id = c_pal_categids-pernr_list
      i_node_txt = text-l03
    IMPORTING
      e_node_key = obj_pal_log->g_node_key
    EXCEPTIONS
      OTHERS     = 99.

RP_SET_NAME_FORMAT
 CALL FUNCTION 'RP_SET_NAME_FORMAT'                     "JRMOPH0K007143
      EXPORTING   REPID     =  REPID                    "JRMOPH0K007143
      IMPORTING   FORMAT    =  FORMAT.                  "JRMOPH0K007143

RP_EDIT_NAME
    cALL FUNCTION 'RP_EDIT_NAME'                       "JRKL9CK002901
     EXPORTING                                         "JRKL9CK002901
             LANGU     = SY-LANGU                      "JRKL9CK002901
             MOLGA     = T001P-MOLGA                   "JRKL9CK002901
             FORMAT    = FORMAT                        "JRKL9CK002901
             PP0002    = P0002                         "JRKL9CK002901
     IMPORTING                                         "JRKL9CK002901
            EDIT_NAME  = $EDIT-NAME                    "JRKL9CK002901
            RETCODE    = $RET-CODE.                    "JRKL9CK002901

RP_EDIT_NAME
    call function 'RP_EDIT_NAME'                       "N1004862
      exporting                                        "N1004862
        format          = format                       "N1004862
        langu           = sy-langu                     "N1004862
        molga           = t001p-molga                  "N1004862
        pp0002          = p0002                        "N1004862
      importing                                        "N1004862
        edit_name       = $edit-name                   "N1004862
        retcode         = $ret-code.                   "N1004862

RP_EDIT_NAME
    CALL FUNCTION 'RP_EDIT_NAME'                       "JRKL9CK002901
     EXPORTING                                         "JRKL9CK002901
             LANGU     = SY-LANGU                      "JRKL9CK002901
             MOLGA     = T001P-MOLGA                   "JRKL9CK002901
             FORMAT    = format                        "JRKL9CK002901
             PP0002    = P0002                         "JRKL9CK002901
     IMPORTING                                         "JRKL9CK002901
            EDIT_NAME  = $EDIT-NAME                    "JRKL9CK002901
            RETCODE    = $RET-CODE.                    "JRKL9CK002901

RP_EDIT_NAME
       CALL FUNCTION 'RP_EDIT_NAME'                    "JRKL9CK002901
        EXPORTING                                      "JRKL9CK002901
               LANGU     = SY-LANGU                    "JRKL9CK002901
               MOLGA     = T001P-MOLGA                 "JRKL9CK002901
               FORMAT    = format                      "JRKL9CK002901
               PP0002    = P0002                       "JRKL9CK002901
        IMPORTING                                      "JRKL9CK002901
               EDIT_NAME  = $EDIT-NAME                 "JRKL9CK002901
               RETCODE    = $RET-CODE.                 "JRKL9CK002901

RP_EDIT_NAME
*CALL FUNCTION 'RP_EDIT_NAME'                          "JRMOPH0K007143
*     EXPORTING                                        "JRMOPH0K007143
*          FORMAT    = FORMAT                          "JRMOPH0K007143
*          LANGU     = SY-LANGU                        "JRMOPH0K007143
*          MOLGA     = T001P-MOLGA                     "JRMOPH0K007143
*          PP0002    = P0002                           "JRMOPH0K007143
*     IMPORTING                                        "JRMOPH0K007143
*          EDIT_NAME = $EDIT-NAME                      "JRMOPH0K007143
*          RETCODE   = $RET-CODE.                      "JRMOPH0K007143

HR_DEPENDENT_CHECK
        CALL FUNCTION 'HR_DEPENDENT_CHECK'              "JPITL6BK009870
          EXPORTING                                     "JPITL6BK009870
            I_DEATH   = J0148-DEATH                     "JPITL6BK009870
            I_DP5ID   = J0148-DP5ID                     "JPITL6BK009870
            I_DP1ID   = J0148-DP1ID                     "JPITL6BK009870
            I_DATE1   = J0148-ENDDA                     "JPITL6BK009870
            I_DATE2   = PN-BEGDA                        "JPITL6BK009870
          IMPORTING                                     "JPITL6BK009870
            DEPEND_ST = RC-DEPEND.                      "JPITL6BK009870

HR_GET_ERROR_LIST
  CALL FUNCTION 'HR_GET_ERROR_LIST'    "YANGQ
      TABLES                           "YANGQ
        error      = ERT               "YANGQ
        errortexts = error_texts       "YANGQ
      EXCEPTIONS                       "YANGQ
        no_errors  = 1                 "YANGQ
        OTHERS     = 2.                "YAGNQ

HR_DISPLAY_ERROR_LIST
    CALL FUNCTION 'HR_DISPLAY_ERROR_LIST'               "JNKP30K090842
         EXPORTING                     "JNKP30K090842
           NO_POPUP         = SPACE    "JNKP30K090842
           NO_IMG           = SPACE    "JNKP30K090842
         TABLES                        "JNKP30K090842
           ERROR            =   ERT    "JNKP30K090842
         EXCEPTIONS                    "JNKP30K090842
              INVALID_LINESIZE = 1     "JNKP30K090842
              OTHERS           = 2.    "JNKP30K090842

HR_DISPLAY_ERROR_LIST
      CALL FUNCTION 'HR_DISPLAY_ERROR_LIST'              "JNKP30K090842
           EXPORTING                   "JNKP30K090842
             NO_POPUP         = SPACE  "JNKP30K090842
             NO_IMG           = SPACE  "JNKP30K090842
           TABLES                      "JNKP30K090842
             ERROR            =   ERT  "JNKP30K090842
           EXCEPTIONS                  "JNKP30K090842
                INVALID_LINESIZE = 1   "JNKP30K090842
                OTHERS           = 2.  "JNKP30K090842

RP_EDIT_NAME_J
  CALL FUNCTION 'RP_EDIT_NAME_J'       "JNMP30K028971
       EXPORTING                       "JNMP30K028971
            FORMAT         = PARM-FORMAT                 "JNMP30K028971
            MOLGA          = PARM-MOLGA"JNMP30K028971
            PP0002         = PARM-P0002"JNMP30K028971
       IMPORTING                       "JNMP30K028971
            EDIT_NAME      = $EDIT-NAME"JNMP30K028971
            RETCODE        = $RET-CODE."JNMP30K028971

GET_PRINT_PARAMETERS
  CALL FUNCTION 'GET_PRINT_PARAMETERS'
    EXPORTING
      mode                   = 'CURRENT'
      NO_dialog                 = 'X'
    IMPORTING
      out_parameters         = l_print_parameters
    EXCEPTIONS
      archive_info_not_found = 1
      others                 = 2.

OPEN_FORM
  CALL FUNCTION 'OPEN_FORM'
       EXPORTING
            APPLICATION = 'TX'
            DEVICE      = 'PRINTER'
            DIALOG      = 'X'          "XYHAHRK014661
            FORM        = FORM         "XYHAHRK014661
            LANGUAGE    = SY-LANGU     "XYHAHRK010307
            OPTIONS     = DTD_ITCPO
       IMPORTING
            RESULT      = DTD_ITCPP
       EXCEPTIONS
            CANCELED    = 01
            DEVICE      = 02
            FORM        = 03
            OPTIONS     = 04
            UNCLOSED    = 05
*start of N1527610
            MAIL_OPTIONS       = 06
            ARCHIVE_ERROR      = 07
            OTHERS             = 08.

HR_PAL_NODE_ADD_ROW
        CALL FUNCTION 'HR_PAL_NODE_ADD_ROW'
          EXPORTING
            i_node_key    = obj_pal_log->g_node_key
            i_row_data    = intabl
          EXCEPTIONS
            OTHERS        = 99.

WRITE_FORM
     CALL FUNCTION 'WRITE_FORM'.       "XYHAHRK010307

CLOSE_FORM
    CALL FUNCTION 'CLOSE_FORM'.

RP_CONVERT_JAPAN_DATE_OUT
  CALL FUNCTION 'RP_CONVERT_JAPAN_DATE_OUT'
       EXPORTING
            SEIREKI    = W_SEIREKI
       IMPORTING
            RYAKU      = W_RYAKU
            NENGO      = W_NENGO
            NEN        = W_NEN
            NEN_TEXT   = W_NEN_TEXT
            TSUKI      = W_TSUKI
            TSUKI_TEXT = W_TSUKI_TEXT
            HI         = W_HI
            HI_TEXT    = W_HI_TEXT.

CONTROL_FORM
















  CALL FUNCTION 'CONTROL_FORM'
       EXPORTING
            COMMAND   = STRING
       EXCEPTIONS
            UNOPENED  = 01
            UNSTARTED = 02.

HR_PAL_NODE_ADD_ROW
        CALL FUNCTION 'HR_PAL_NODE_ADD_ROW'
          EXPORTING
            i_node_key    = obj_pal_log->g_node_key
            i_row_data    = intabl
          EXCEPTIONS
            OTHERS        = 99.

H99B_OUTPUT_LFORM
    CALL FUNCTION 'H99B_OUTPUT_LFORM'
      EXPORTING
        i_molga      = hr99b_form_sel-molga
        i_fogroup    = hr99b_form_sel-fogroup
        i_folname    = hr99b_form_sel-folname
        i_fovariant  = hr99b_form_sel-fovariant
        i_data_struc = i_data
      EXCEPTIONS
        OTHERS       = 99.

HR_PAL_FORMS_ROW_ADD
  CALL FUNCTION 'HR_PAL_FORMS_ROW_ADD'
    EXPORTING
*     i_node_key             =
      i_name                 = l_pal_name
      i_form_type            = l_form_type
      i_text                 = l_foltxt
      i_rqid                 = l_rqid
    EXCEPTIONS
      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
      i_fovariant = hr99b_form_sel-fovariant
      OPTIONS     = l_itcpo
   EXCEPTIONS
      OTHERS      = 99.

HR_PAL_STATS_MSG_ADD
    CALL FUNCTION 'HR_PAL_STATS_MSG_ADD'
      EXPORTING
        I_STCNT       = I_STCNT
        I_MSGID       = 'BL'
        I_MSGNO       = '001'
        I_MSGV1       = TEXT-l01
      EXCEPTIONS
        OTHERS        = 99.

HR_PAL_STATS_MSG_ADD
    CALL FUNCTION 'HR_PAL_STATS_MSG_ADD'
      EXPORTING
        I_STCNT       = I_STCNT
        I_MSGID       = 'BL'
        I_MSGNO       = '001'
        I_msgty       = l_msgty
        I_MSGV1       = TEXT-l02
      EXCEPTIONS
        OTHERS        = 99.

FP_FUNCTION_MODULE_NAME
    CALL FUNCTION 'FP_FUNCTION_MODULE_NAME'
    EXPORTING
      i_name      = lv_form
    IMPORTING
      e_funcname  = lv_funcname.

FUNCTION_IMPORT_INTERFACE
  CALL FUNCTION 'FUNCTION_IMPORT_INTERFACE'
    EXPORTING
      funcname           = p_fm_name
    TABLES
      exception_list     = lt_exception_list[]
      export_parameter   = lt_export_parameter[]
      import_parameter   = lt_import_parameter[]
      tables_parameter   = lt_tables_parameter[]
    EXCEPTIONS
      error_message      = 1
      function_not_found = 2
      invalid_name       = 3
      OTHERS             = 4.

HR_APPEND_ERROR_LIST
  CALL FUNCTION 'HR_APPEND_ERROR_LIST'
    EXPORTING
      pernr  = pernr-pernr
      arbgb  = p_msgid      "message-id class
      msgty  = p_msgty      "message type
      msgno  = p_error_no   "number of message-id error
      msgv1  = p_msgv1
      msgv2  = p_msgv2
      msgv3  = p_msgv3
      msgv4  = p_msgv4
    EXCEPTIONS
      OTHERS = 1.

FP_JOB_OPEN
    CALL FUNCTION 'FP_JOB_OPEN'
      CHANGING
        ie_outputparams = p_sfpoutputparams
      EXCEPTIONS
        cancel          = 1
        usage_error     = 2
        system_error    = 3
        internal_error  = 4
        OTHERS          = 5.

FP_JOB_CLOSE
  CALL FUNCTION 'FP_JOB_CLOSE'
    IMPORTING
      E_RESULT       = l_result
    EXCEPTIONS
      usage_error    = 1
      system_error   = 2
      internal_error = 3
        OTHERS         = 4.

RP_CONVERT_JAPAN_DATE_OUT
  CALL FUNCTION 'RP_CONVERT_JAPAN_DATE_OUT'
       EXPORTING
            SEIREKI    = iv_seireki
       IMPORTING
            TSUKI      = lv_tsuki
            TSUKI_TEXT = lv_tsuki_text
            HI         = lv_hi
            HI_TEXT    = lv_hi_text.

RP_CONVERT_JAPAN_DATE_OUT
      CALL FUNCTION 'RP_CONVERT_JAPAN_DATE_OUT'
        EXPORTING
          seireki    = iv_seireki_date
        IMPORTING
          nengo      = lv_nengo
          nen        = lv_nen.


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


   
 

RPLDTDJ0 - Application form for Employee's income tax and Family Dependant tax
RPLDTDJ0 - Application form for Employee's income tax and Family Dependant tax
RPLDRCFT - documentation and ABAP source code
RPLDRCFS - documentation and ABAP source code
RPLDRCFD - documentation and ABAP source code
RPLDRCF3 - documentation and ABAP source code