SAP Reports / Programs

HROCDEC1 SAP ABAP Report - United Declaration D112







HROCDEC1 is a standard Executable ABAP Report 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 HROCDEC1 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 HROCDEC1. "Basic submit
SUBMIT HROCDEC1 AND RETURN. "Return to original report after report execution complete
SUBMIT HROCDEC1 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: PA_ALTXO = Add All Tax Offices
Selection Text: PA_COLF = Collect Fiscal Codes
Selection Text: PA_FAX = Fax
Selection Text: PA_FDLG = Filename Save Dialog
Selection Text: PA_FILE = XML Files Path
Selection Text: PA_FONLY = Only data file
Selection Text: PA_FUNCT = Function
Selection Text: PA_HTAXO = Head Tax Office
Selection Text: PA_MAIL = Mail
Selection Text: PA_NUMEA = Last name
Selection Text: PA_PREA = First name
Selection Text: PA_RETRO = Generate Retro Declaration
Selection Text: PA_SUB82 = Sick Leave Addit. Inf. Subtype
Selection Text: PA_TEL = Phone
Selection Text: PA_TMPDO = Template
Selection Text: PA_TMPDR = Directory for data file
Selection Text: PA_VARIA = Secondary Office ALV Variant
Selection Text: PA_WORD = Transfer data to Word
Title: United Declaration D112
Text Symbol: T01 = Tax Offices
Text Symbol: S13 = Retro Reason
Text Symbol: S12 = Add All Tax Offices
Text Symbol: S11 = For Period
Text Symbol: S10 = grouping T7RO01P-GETFUL
Text Symbol: S09 = Infotype 519
Text Symbol: S08 = Get Tax Office from
Text Symbol: S07 = /122
Text Symbol: S06 = /112
Text Symbol: S05 = B2_5 Wage Type
Text Symbol: S04 = A_codOblig="439" variant
Text Symbol: 001 = Sector
Text Symbol: 002 = Str.
Text Symbol: 003 = nr.
Text Symbol: 004 = Sc.
Text Symbol: 005 = Ap.
Text Symbol: 006 = etj.
Text Symbol: 007 = jud.
Text Symbol: 008 = F.2. Secondary tax offce





Text Symbol: 009 = Crt. No.
Text Symbol: 010 = Secondary tax office registration code
Text Symbol: 011 = TaxOffCode
Text Symbol: 012 = Payment Amount
Text Symbol: 013 = PayAmt
Text Symbol: 014 = Code
Text Symbol: 015 = Retro Declaration Reason
Text Symbol: 050 = Rectifying Declaration
Text Symbol: 051 = Rectifying Declaration for accordance of incomes based on judge decisions
Text Symbol: 052 = Rectifying Declaration based on a fiscal inspection
Text Symbol: E01 = Please fill in retro For Period
Text Symbol: H01 = Output
Text Symbol: H02 = Sign
Text Symbol: H03 = Options
Text Symbol: H04 = Retro Declaration
Text Symbol: H05 = Print-Out
Text Symbol: P01 = Processing PERNR:
Text Symbol: P02 = Collecting data ...
Text Symbol: P03 = Preparing XML file ...
Text Symbol: S01 = Field C2_7 variant
Text Symbol: S02 = variant 1
Text Symbol: S03 = variant 2


INCLUDES used within this REPORT HROCDEC1

INCLUDE HROIREP0.
INCLUDE HROICLS0.


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_RO_READ_PYRES_INTERVAL CALL FUNCTION 'HR_RO_READ_PYRES_INTERVAL' EXPORTING pernr = p_pernr mode = 'B' begda = lv_pbegd endda = pn-endda tprun = '' tpall = '' initb = 'X' TABLES runs = lt_runs myrg = lt_myrg rtdet = lt_rtdet.

RP_HIRE_FIRE CALL FUNCTION 'RP_HIRE_FIRE' EXPORTING beg = pn-begda end = pn-endda IMPORTING fire_date = wa_insured-datasf hire_date = wa_insured-dataang TABLES pphifi = lt_phifi pp0000 = p0000 pp0001 = p0001.

HR_RO_WORKDAYS_IN_INTERVAL * CALL FUNCTION 'HR_RO_WORKDAYS_IN_INTERVAL' * EXPORTING * begda = wa_insured-datasf * endda = wa_insured-datasf * mofid = lw_t001p-mofid * TABLES * i2003 = p2003 * CHANGING * wrkdays = lv_i.

HR_RO_WORKDAYS_IN_INTERVAL CALL FUNCTION 'HR_RO_WORKDAYS_IN_INTERVAL' EXPORTING begda = lw_rtdet2-evp-fpbeg endda = wa_insured-datasf mofid = lw_t001p-mofid TABLES i2003 = p2003 CHANGING wrkdays = lv_i.

HR_RO_WORKDAYS_IN_INTERVAL CALL FUNCTION 'HR_RO_WORKDAYS_IN_INTERVAL' EXPORTING begda = lv_date endda = lt_phifi-begda mofid = lw_t001p-mofid CHANGING wrkdays = lv_i.

HR_RO_READ_PYRES_INTERVAL CALL FUNCTION 'HR_RO_READ_PYRES_INTERVAL' EXPORTING pernr = wa_ce-pernr mode = 'B' begda = lw_myrg-fpbeg endda = lw_myrg-fpend tprun = '' tpall = '' initb = 'X' TABLES runs = lt_runs2 myrg = lt_myrg2 rtdet = lt_rtdet2.

HR_RO_WORKDAYS_IN_INTERVAL





CALL FUNCTION 'HR_RO_WORKDAYS_IN_INTERVAL' EXPORTING begda = lw_rtdet-evp-fpbeg endda = lw_rtdet-evp-fpend mofid = lw_t001p-mofid TABLES i2003 = p2003 CHANGING wrkdays = lv_pwk.

SLS_MISC_GET_LAST_DAY_OF_MONTH CALL FUNCTION 'SLS_MISC_GET_LAST_DAY_OF_MONTH' EXPORTING day_in = lv_pn_obegd IMPORTING last_day_of_month = lv_pn_oendd EXCEPTIONS day_in_not_valid = 1 OTHERS = 2.

HR_RO_READ_PYRES_INTERVAL CALL FUNCTION 'HR_RO_READ_PYRES_INTERVAL' EXPORTING pernr = p_pernr mode = 'A' begda = lv_pn_obegd endda = lv_pn_oendd inper = lw_rtdet-inter-versc-inper tprun = '' tpall = '' TABLES runs = lt_runs2 myrg = lt_myrg2 rtdet = lt_rtdet2.

HR_RO_GET_AVGAC CALL FUNCTION 'HR_RO_GET_AVGAC' EXPORTING p_datum = lw_myrg-fpend IMPORTING p_avgac = lv_avgac p_decimals = lv_dec.

SLS_MISC_GET_LAST_DAY_OF_MONTH CALL FUNCTION 'SLS_MISC_GET_LAST_DAY_OF_MONTH' EXPORTING day_in = lv_pn_obegd IMPORTING last_day_of_month = lv_pn_oendd EXCEPTIONS day_in_not_valid = 1 OTHERS = 2.

HR_RO_READ_PYRES_INTERVAL CALL FUNCTION 'HR_RO_READ_PYRES_INTERVAL' EXPORTING pernr = pernr-pernr mode = 'A' begda = lv_pn_obegd endda = lv_pn_oendd inper = lw_rtdet-evp-inper tprun = '' tpall = '' TABLES runs = lt_runs2 myrg = lt_myrg2 rtdet = lt_rtdet2.

HR_RO_GENWS_IN_INTERVAL CALL FUNCTION 'HR_RO_GENWS_IN_INTERVAL' EXPORTING begda = p_fpbeg endda = p_fpend mofid = p_mofid TABLES i0000 = p0000 i2003 = p2003 gpsp = lt_gws.

HR_RO_SPLIT_COMPLETE_FILENAME CALL FUNCTION 'HR_RO_SPLIT_COMPLETE_FILENAME' EXPORTING complete_filename = lv_fname IMPORTING drive = lv_drive extension = lv_exten name = lv_fname path = lv_fpath EXCEPTIONS invalid_drive = 1 invalid_extension = 2 invalid_name = 3 invalid_path = 4 OTHERS = 5.

GUI_FILE_SAVE_DIALOG CALL FUNCTION 'GUI_FILE_SAVE_DIALOG' EXPORTING window_title = 'Save XML file' default_file_name = lv_fnames initial_directory = lv_fpaths IMPORTING fullpath = lv_fnames filename = lv_str.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING text = p_text.

HELP_VALUES_GET_NO_DD_NAME CALL FUNCTION 'HELP_VALUES_GET_NO_DD_NAME' EXPORTING selectfield = 'TAXOF' titel = text-t01 no_display_of_pers_values = 'X' IMPORTING ind = sy-tabix TABLES fields = tab_fields full_table = tab_taxof EXCEPTIONS OTHERS = 4.

DYNP_VALUES_UPDATE CALL FUNCTION 'DYNP_VALUES_UPDATE' EXPORTING dyname = sy-cprog dynumb = sy-dynnr TABLES dynpfields = tab_update EXCEPTIONS OTHERS = 8.

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING retfield = 'RETRE' dynpprog = sy-cprog dynpnr = sy-dynnr dynprofield = 'PA_RETRE' window_title = text-015 value_org = 'S' TABLES value_tab = lt_retre field_tab = lt_fieldtab.

REUSE_ALV_GRID_DISPLAY

REUSE_ALV_LIST_DISPLAY * CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' EXPORTING i_callback_program = lv_repid is_layout = ls_layout is_print = ls_print it_fieldcat = pt_fieldcat i_save = 'X' is_variant = ls_variant it_sort = pt_sort[] it_events = pt_events TABLES t_outtab = pt_outtab EXCEPTIONS program_error = 1 OTHERS = 2.

REUSE_ALV_COMMENTARY_WRITE CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' EXPORTING it_list_commentary = gt_alv_header.

REUSE_ALV_EVENTS_GET CALL FUNCTION 'REUSE_ALV_EVENTS_GET' EXPORTING i_list_type = 0 IMPORTING et_events = pt_events[].



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