PCLJSPL1 SAP ABAP INCLUDE - Payroll Journal: FORM Routines
PCLJSPL1 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 PCLJSPL1 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 PCLJSPL1. "Basic submit
SUBMIT PCLJSPL1 AND RETURN. "Return to original report after report execution complete
SUBMIT PCLJSPL1 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 PCLJSPL1
INCLUDE RPCF4C00. "VKIK045853
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:
SET_PRINT_PARAMETERS CALL FUNCTION 'SET_PRINT_PARAMETERS' EXPORTING LINE_COUNT = 65.
DDIF_TABL_GET CALL FUNCTION 'DDIF_TABL_GET' EXPORTING NAME = $TABNAME * STATE = 'A' LANGU = $LANGU TABLES DD03P_TAB = FIELDTAB EXCEPTIONS OTHERS = 2.
RP_OPTIONS_INTO_STRING CALL FUNCTION 'RP_OPTIONS_INTO_STRING' EXPORTING DELIMITER_SIGN = '/' TEXT_TITLE = TEXT-T0T TEXT_LEFT = TEXT-T0L TEXT_RIGHT = TEXT-T0R STATUS = 'ORDER' TEXT_OBJECT = 'LJN_SORT_INFO' IMPORTING RETURN_CODE = RETCODE TABLES TEXT_SYMBOL_RELATION_TAB = $SEL_TAB CHANGING STRING_VALUE = $OPTION EXCEPTIONS TABLE_STRING_INCONSISTENCY = 01 UNKNOWN_STATUS = 02 OTHERS = 03.
RP_OPTIONS_INTO_STRINGTAB CALL FUNCTION 'RP_OPTIONS_INTO_STRINGTAB' EXPORTING DELIMITER_SIGN = '/' TEXT_TITLE = TEXT-T1T LIST_HEADER = TEXT-T0R TEXT_OBJECT = 'LJN_SORT_DETAIL' IMPORTING RETURN_CODE = RETCODE TABLES TEXT_SYMBOL_RELATION_TAB = SELTAB2 INTER_TAB = VALTAB EXCEPTIONS TABLE_STRING_INCONSISTENCY = 1 TABLE_LINES_INCONSISTENCY = 2 OTHERS = 3.
F4_POPUP_FORML CALL FUNCTION 'F4_POPUP_FORML' EXPORTING MOLGA = $MOLGA FCLASS = 'CLJN' IMPORTING FORML = $FORM EXCEPTIONS OTHERS = 1.
HR_LJN_FORM_PARAMETERS CALL FUNCTION 'HR_LJN_FORM_PARAMETERS' EXPORTING FORM_NAME = $FNAME CHANGING VAL_PRT_APER = $APER VAL_PRT_LINE = $LINE.
HR_LJN_RETRO_PARAMETERS CALL FUNCTION 'HR_LJN_RETRO_PARAMETERS' EXPORTING MODE_PRT_RCAL = 'S' MODE_TYP_RCAL = 'G' MODE_SRT_RCAL = 'G' EXCLUDE_PRT = '/L/' EXCLUDE_TYP = EXCL_TYP EXCLUDE_SRT = ' ' ALLOW_CANCEL = ' ' CHANGING VAL_PRT_RCAL = $PRT VAL_TYP_RCAL = $TYP VAL_SRT_RCAL = $SRT VAL_PRT_OSR = $OSR. " WLIAHRK059064
HELP_VALUES_GET_NO_DD_NAME CALL FUNCTION 'HELP_VALUES_GET_NO_DD_NAME' EXPORTING SELECTFIELD = SELFD REDUCED_STATUS_ONLY = 'X' IMPORTING SELECT_VALUE = SELVL TABLES FIELDS = FLIST FULL_TABLE = FTAB EXCEPTIONS OTHERS = 6.
RP_GET_CURRENCY CALL FUNCTION 'RP_GET_CURRENCY' EXPORTING MOLGA = $MOLGA BEGDA = PN-ENDDA ENDDA = PN-ENDDA IMPORTING WAERS = $SELCUR EXCEPTIONS MOLGA_NOT_IN_T001P = 1 NO_ENTRY_FOUND_IN_TABLE_T001 = 2 NO_ENTRY_FOUND_IN_TABLE_T500P = 3 NO_ENTRY_FOUND_IN_TABLE_T500C = 4 OTHERS = 5.
RP_SET_NAME_FORMAT CALL FUNCTION 'RP_SET_NAME_FORMAT' EXPORTING REPID = REPID IMPORTING FORMAT = FORMAT. " WLIAHRK057346
CD_SELECT_SRTZA CALL FUNCTION 'CD_SELECT_SRTZA' EXPORTING RECORD_TYPE = CD_C-ACTUAL TABLES IN_RGDIR = XEVP OUT_RGDIR = TMP_EVP.
CD_RETROCALC_PERIOD CALL FUNCTION 'CD_RETROCALC_PERIOD' EXPORTING ENTRY = SEL_EVP IMPORTING CALCD = RETRO.
CD_SELECT_VOID CALL FUNCTION 'CD_SELECT_VOID' "WLIK058694 EXPORTING "WLIK058694 VOID_INDICATOR = CD_C-VOID_FALSE "WLIK058694 TABLES "WLIK058694 IN_RGDIR = $RGDIR[] "WLIK058694 OUT_RGDIR = XEVP. "WLIK058694
CD_SELECT_PAYTY_RANGE CALL FUNCTION 'CD_SELECT_PAYTY_RANGE' TABLES IN_RGDIR = XEVP OUT_RGDIR = TMP_EVP PAYTY_TAB = P_PAYTY.
CD_SELECT_PAYID_RANGE CALL FUNCTION 'CD_SELECT_PAYID_RANGE' TABLES IN_RGDIR = TMP_EVP OUT_RGDIR = XEVP PAYID_TAB = P_PAYID.
CD_SELECT_RUNDT CALL FUNCTION 'CD_SELECT_RUNDT' EXPORTING RUNDT_LOW = PN-BEGDA RUNDT_HIGH = PN-ENDDA TABLES IN_RGDIR = XEVP OUT_RGDIR = TMP_EVP.
CD_SELECT_IPEND_RANGE CALL FUNCTION 'CD_SELECT_IPEND_RANGE' EXPORTING IPBEG_DATE = PN-BEGDA IPEND_DATE = PN-ENDDA TABLES IN_RGDIR = XEVP OUT_RGDIR = TMP_EVP.
CD_RETROCALC_PERIOD CALL FUNCTION 'CD_RETROCALC_PERIOD' EXPORTING ENTRY = SEL_EVP IMPORTING CALCD = RETRO.
CALL FUNCTION 'CD_EVALUATION_PERIODS' EXPORTING BONUS_DATE = $SELDT-IPEND " WLIK021185 * bonus_date = $seldt-bondt "$bondt WLIK021185 INPER = $SELDT-INPER "period INPER_MODIF = $SELDT-IPERM "pn-permo PAY_IDENT = $SELDT-INPID "$payid PAY_TYPE = $SELDT-INPTY "$payty ALL_RESULTS_OF_RUN = FALSE "include 'S-runs'? "VKIK032705 TABLES EVPDIR = OUT_TAB RGDIR = IN_TAB EXCEPTIONS NO_RECORD_FOUND = 01.
CD_CREATE_DUMMY_ENTRIES CALL FUNCTION 'CD_CREATE_DUMMY_ENTRIES' EXPORTING ACTUAL_VALUES = EVP_ACTUAL_VALUES TABLES RGDIR = $RGDIR IN_DIR = $EVP OUT_DIR = EVP_D EXCEPTIONS NO_DUMMIES_CREATED = 01.
CD_CREATE_DUMMY_ENTRIES * CALL FUNCTION 'CD_CREATE_DUMMY_ENTRIES' * EXPORTING * ACTUAL_VALUES = EVP_ACTUAL_VALUES * TABLES * RGDIR = $RGDIR * IN_DIR = $EVP * OUT_DIR = EVP_D * EXCEPTIONS * NO_DUMMIES_CREATED = 01.
CD_SELECT_VOID CALL FUNCTION 'CD_SELECT_VOID' EXPORTING VOID_INDICATOR = CD_C-VOID_FALSE TABLES IN_RGDIR = H02TAB OUT_RGDIR = H01TAB.
CD_SELECT_FPPER CALL FUNCTION 'CD_SELECT_FPPER' EXPORTING FPPER_LOW = $FOR_EVP-FPPER FPPER_HIGH = $FOR_EVP-FPPER TABLES IN_RGDIR = H01TAB OUT_RGDIR = H02TAB.
CD_SELECT_PERMO CALL FUNCTION 'CD_SELECT_PERMO' EXPORTING FORPER_MOD_LOW = $FOR_EVP-PERMO FORPER_MOD_HIGH = $FOR_EVP-PERMO TABLES IN_RGDIR = H02TAB OUT_RGDIR = H01TAB.
CD_SELECT_ABKRS CALL FUNCTION 'CD_SELECT_ABKRS' EXPORTING ABKRS_LOW = $FOR_EVP-ABKRS ABKRS_HIGH = $FOR_EVP-ABKRS TABLES IN_RGDIR = H01TAB OUT_RGDIR = H02TAB.
CD_SELECT_BONDT_RANGE CALL FUNCTION 'CD_SELECT_BONDT_RANGE' TABLES IN_RGDIR = H01TAB OUT_RGDIR = H02TAB BONDT_TAB = RBONDT.
CD_SELECT_PAYTY_RANGE CALL FUNCTION 'CD_SELECT_PAYTY_RANGE' TABLES IN_RGDIR = H02TAB OUT_RGDIR = H01TAB PAYTY_TAB = RPAYTY.
CD_SELECT_PAYID_RANGE CALL FUNCTION 'CD_SELECT_PAYID_RANGE' TABLES IN_RGDIR = H01TAB OUT_RGDIR = H02TAB PAYID_TAB = RPAYID.
CD_RETROCALC_PERIOD CALL FUNCTION 'CD_RETROCALC_PERIOD' EXPORTING ENTRY = RECORD IMPORTING CALCD = RETROC.
HR_APPEND_ERROR_LIST CALL FUNCTION 'HR_APPEND_ERROR_LIST' EXPORTING PERNR = $PERNR "WOGL9BK007905 ARBGB = 'RP' MSGTY = 'E' MSGNO = 016 MSGV1 = TEXT-E06 MSGV2 = $PERNR MSGV3 = $SEQNR.
HR_GET_ERROR_LIST CALL FUNCTION 'HR_GET_ERROR_LIST' TABLES ERROR = ERRLIST * ERRORTEXTS = EXCEPTIONS NO_ERRORS = 1 OTHERS = 2.
HR_DISPLAY_ERROR_LIST CALL FUNCTION 'HR_DISPLAY_ERROR_LIST' EXPORTING NO_POPUP = 'X' NO_PRINT = ' ' * NO_IMG = ' ' * NO_MSGNO = 'X' * LINESIZE = SY-LINSZ LISTHEADER = TEXT-S10 " WLIK020027 COLHEADER = TEXT-S11 " WLIK020027 * HIDEMSG = ' ' TABLES ERROR = MLIST EXCEPTIONS INVALID_LINESIZE = 1 OTHERS = 2.
HRPY_PROCESS_SET_PERNR_STATUS CALL FUNCTION 'HRPY_PROCESS_SET_PERNR_STATUS' EXPORTING IMP_PERNR = P_ERRLIST-PERNR IMP_PARCEL = PYPARAID IMP_SET_ERR = 'X' EXCEPTIONS OTHERS = 0.
HRPY_PROCESS_SET_PERNR_STATUS CALL FUNCTION 'HRPY_PROCESS_SET_PERNR_STATUS' EXPORTING IMP_PERNR = P_PERNR IMP_PARCEL = PYPARAID IMP_SET_SUC = 'X' EXCEPTIONS OTHERS = 0.
CD_RETROCALC_PERIOD CALL FUNCTION 'CD_RETROCALC_PERIOD' EXPORTING ENTRY = IN_PERIOD IMPORTING CALCD = IS_RETRO.
HR_GET_CUMULATION_WINDOW CALL FUNCTION 'HR_GET_CUMULATION_WINDOW' EXPORTING IMP_MOLGA = MOLGA IMPORTING EXP_WINDOW = WINDOW.
HR_GET_FIXED_DAY_FOR_CUMUL CALL FUNCTION 'HR_GET_FIXED_DAY_FOR_CUMUL' EXPORTING IMP_MOLGA = MOLGA IMP_PAYDT = $PERIOD-PAYDT IMP_PBEGD = $PERIOD-FPBEG IMP_PENDD = $PERIOD-FPEND IMPORTING EXP_FIXED_DAY = FIXDT.
HR_GET_CUMULATION_FOR_DATE CALL FUNCTION 'HR_GET_CUMULATION_FOR_DATE' EXPORTING IMP_MOLGA = MOLGA IMP_CUMTY = 'M' IMP_FIXED_DAY = FIXDT IMPORTING EXP_CUMNO = CUMNO EXP_CUMYR = CUMYR EXCEPTIONS OTHERS = 0.
HR_GET_CUMULATION_FOR_DATE CALL FUNCTION 'HR_GET_CUMULATION_FOR_DATE' EXPORTING IMP_MOLGA = MOLGA IMP_CUMTY = 'Q' IMP_FIXED_DAY = FIXDT IMPORTING EXP_CUMNO = CUMNO EXP_CUMYR = CUMYR EXCEPTIONS OTHERS = 0.
HR_GET_CUMULATION_FOR_DATE CALL FUNCTION 'HR_GET_CUMULATION_FOR_DATE' EXPORTING IMP_MOLGA = MOLGA IMP_CUMTY = 'Y' IMP_FIXED_DAY = FIXDT IMPORTING EXP_CUMNO = CUMNO EXP_CUMYR = CUMYR EXCEPTIONS OTHERS = 0.
RP_GET_CUMULATION CALL FUNCTION 'RP_GET_CUMULATION' EXPORTING IMP_MOLGA = MOLGA IMP_DATMO = DATMO IMP_PERMO = $PERIOD-PERMO IMP_PAPER = $PERIOD-FPPER IMP_BONDT = $PERIOD-BONDT IMP_CUMTY = 'M' IMPORTING EXP_CUMNO = CUMNO EXP_CUMYR = CUMYR EXCEPTIONS OTHERS = 4.
RP_GET_CUMULATION CALL FUNCTION 'RP_GET_CUMULATION' EXPORTING IMP_MOLGA = MOLGA IMP_DATMO = DATMO IMP_PERMO = $PERIOD-PERMO IMP_PAPER = $PERIOD-FPPER IMP_BONDT = $PERIOD-BONDT IMP_CUMTY = 'Q' IMPORTING EXP_CUMNO = CUMNO EXP_CUMYR = CUMYR EXCEPTIONS OTHERS = 4.
RP_GET_CUMULATION CALL FUNCTION 'RP_GET_CUMULATION' EXPORTING IMP_MOLGA = MOLGA IMP_DATMO = DATMO IMP_PERMO = $PERIOD-PERMO IMP_PAPER = $PERIOD-FPPER IMP_BONDT = $PERIOD-BONDT IMP_CUMTY = 'Y' IMPORTING EXP_CUMNO = CUMNO EXP_CUMYR = CUMYR EXCEPTIONS OTHERS = 4.
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 PCLJSPL1 or its description.