PCINTAN04 SAP ABAP INCLUDE - Include PCINTAN04
PCINTAN04 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 PCINTAN04 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 PCINTAN04. "Basic submit
SUBMIT PCINTAN04 AND RETURN. "Return to original report after report execution complete
SUBMIT PCINTAN04 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 PCINTAN04
INCLUDES used within this REPORT PCINTAN04
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_FEATURE_BACKTABLE CALL FUNCTION 'HR_FEATURE_BACKTABLE' EXPORTING FEATURE = '40ECC' STRUC_CONTENT = wa_PME01 KIND_OF_ERROR = '3' TABLES BACK = ECC_TAB * CHANGING * STATUS = EXCEPTIONS * DUMMY = 1 * ERROR_OPERATION = 2 * NO_BACKVALUE = 3 * FEATURE_NOT_GENERATED = 4 * INVALID_SIGN_IN_FUNID = 5 * TAB_IN_REPORT_FIELD_IN_PE03 = 6 OTHERS = 0 .
CU_READ_RGDIR CALL FUNCTION 'CU_READ_RGDIR' EXPORTING PERSNR = p0185-pernr * BUFFER = * NO_AUTHORITY_CHECK = ' ' IMPORTING MOLGA = molga TABLES IN_RGDIR = rgdir EXCEPTIONS NO_RECORD_FOUND = 1 OTHERS = 2 .
HR_EMPLOYEE_ENQUEUE ** CALL FUNCTION 'HR_EMPLOYEE_ENQUEUE' ** EXPORTING ** NUMBER = p0001-pernr *** IMPORTING *** RETURN = *** LOCKING_USER = ** .
HR_INFOTYPE_OPERATION ** CALL FUNCTION 'HR_INFOTYPE_OPERATION' ** EXPORTING ** INFTY = '0185' ** NUMBER = wa_p0185-pernr ** SUBTYPE = '05' *** OBJECTID = *** LOCKINDICATOR = ** VALIDITYEND = p0001-endda ** VALIDITYBEGIN = begin_date *** RECORDNUMBER = ** RECORD = wa_p0185 ** OPERATION = 'INS' *** TCLAS = 'A' *** DIALOG_MODE = '0' *** NOCOMMIT = *** VIEW_IDENTIFIER = *** SECONDARY_RECORD = ** IMPORTING ** RETURN = ret_err *** KEY = ** .
HR_EMPLOYEE_DEQUEUE **CALL FUNCTION 'HR_EMPLOYEE_DEQUEUE' ** EXPORTING ** NUMBER = p0001-pernr *** IMPORTING *** RETURN = ** .
HR_EMPLOYEE_ENQUEUE ** CALL FUNCTION 'HR_EMPLOYEE_ENQUEUE' ** EXPORTING ** NUMBER = p0001-pernr *** IMPORTING *** RETURN = *** LOCKING_USER = ** .
HR_INFOTYPE_OPERATION ** CALL FUNCTION 'HR_INFOTYPE_OPERATION' ** EXPORTING ** INFTY = '0185' ** NUMBER = p0001-pernr ** SUBTYPE = '05' *** OBJECTID = *** LOCKINDICATOR = *** VALIDITYEND = *** VALIDITYBEGIN = *** RECORDNUMBER = ** RECORD = wa_p0185 ** OPERATION = 'MOD' *** TCLAS = 'A' *** DIALOG_MODE = '0' *** NOCOMMIT = *** VIEW_IDENTIFIER = *** SECONDARY_RECORD = ** IMPORTING ** RETURN = ret_err *** KEY = ** .
HR_EMPLOYEE_DEQUEUE ** CALL FUNCTION 'HR_EMPLOYEE_DEQUEUE' ** EXPORTING ** NUMBER = p0001-pernr *** IMPORTING *** RETURN = ** .
RP_HIRE_FIRE CALL FUNCTION 'RP_HIRE_FIRE' EXPORTING beg = '18000101' end = fyendda IMPORTING hire_date = hdate fire_date = fdate TABLES pp0000 = p0000 "input pp0001 = p0001 "input pphifi = phifi. "output
REUSE_ALV_FIELDCATALOG_MERGE * CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' * EXPORTING * I_PROGRAM_NAME = 'HINUTANU' * I_INTERNAL_TABNAME = 'wa_ITAB1' * I_INCLNAME = 'PCINTAN04' * CHANGING * CT_FIELDCAT = FIELDCAT[] * EXCEPTIONS * INCONSISTENT_INTERFACE = 1 * PROGRAM_ERROR = 2 * OTHERS = 3.
HR_IN_CALC_F16 CALL FUNCTION 'HR_IN_CALC_F16' EXPORTING EMPNO = pernr-pernr MULTIPLE_F16 = 'X' "MDSNT942855 FYBEGDA = '18000101' FYENDDA = '99991231' TABLES P0000 = P0000 P0001 = P0001 P0580 = P0580 COCD = cocd F16 = f16 EXCEPTIONS NO_RGDIR = 1 NO_CLUSTER_RESULT = 2 OTHERS = 3.
GUI_UPLOAD CALL FUNCTION 'GUI_UPLOAD' EXPORTING FILENAME = fol_path FILETYPE = 'ASC' HAS_FIELD_SEPARATOR = 'X' * DAT_MODE = 'X' IMPORTING FILELENGTH = P_FILE_LENGTH TABLES DATA_TAB = itab_file EXCEPTIONS FILE_OPEN_ERROR = 1 FILE_READ_ERROR = 2 NO_BATCH = 3 GUI_REFUSE_FILETRANSFER = 4 INVALID_TYPE = 5 NO_AUTHORITY = 6 UNKNOWN_ERROR = 7 BAD_DATA_FORMAT = 8 HEADER_NOT_ALLOWED = 9 SEPARATOR_NOT_ALLOWED = 10 HEADER_TOO_LONG = 11 UNKNOWN_DP_ERROR = 12 ACCESS_DENIED = 13 DP_OUT_OF_MEMORY = 14 DISK_FULL = 15 DP_TIMEOUT = 16 OTHERS = 17.
CU_READ_RGDIR CALL FUNCTION 'CU_READ_RGDIR' EXPORTING PERSNR = p0185-pernr * BUFFER = * NO_AUTHORITY_CHECK = ' ' IMPORTING MOLGA = molga TABLES IN_RGDIR = rgdir EXCEPTIONS NO_RECORD_FOUND = 1 OTHERS = 2 .
REUSE_ALV_EVENTS_GET CALL FUNCTION 'REUSE_ALV_EVENTS_GET' EXPORTING i_list_type = 0 IMPORTING et_events = gt_events[].
REUSE_ALV_GRID_DISPLAY CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING i_callback_program = g_repid i_callback_top_of_page = 'TOP_OF_PAGE' it_fieldcat = gt_fieldcat[] it_events = gt_events[] TABLES t_outtab = p_itab EXCEPTIONS program_error = 1 OTHERS = 2.
REUSE_ALV_COMMENTARY_WRITE call function 'REUSE_ALV_COMMENTARY_WRITE' exporting * I_LOGO = 'ENJOYSAP_LOGO' it_list_commentary = gt_list_top_of_page.
HR_EMPLOYEE_ENQUEUE CALL FUNCTION 'HR_EMPLOYEE_ENQUEUE' EXPORTING NUMBER = wa_itab-empno IMPORTING RETURN = ret_err * LOCKING_USER = .
HR_INFOTYPE_OPERATION CALL FUNCTION 'HR_INFOTYPE_OPERATION' EXPORTING INFTY = '0185' NUMBER = wa_itab-empno SUBTYPE = '05' * OBJECTID = * LOCKINDICATOR = * VALIDITYEND = wa_itab-endda * VALIDITYBEGIN = begin_date * RECORDNUMBER = RECORD = wa_0185 OPERATION = 'INS' * TCLAS = 'A' * DIALOG_MODE = '0' * NOCOMMIT = * VIEW_IDENTIFIER = * SECONDARY_RECORD = IMPORTING RETURN = ret_err * KEY = .
CALL FUNCTION 'HR_EMPLOYEE_DEQUEUE' EXPORTING NUMBER = p0001-pernr * IMPORTING * RETURN = .
HR_EMPLOYEE_ENQUEUE CALL FUNCTION 'HR_EMPLOYEE_ENQUEUE' EXPORTING NUMBER = wa_itab-empno IMPORTING RETURN = ret_err * LOCKING_USER = .
HR_INFOTYPE_OPERATION CALL FUNCTION 'HR_INFOTYPE_OPERATION' EXPORTING INFTY = '0185' NUMBER = wa_itab-empno SUBTYPE = '05' * OBJECTID = * LOCKINDICATOR = VALIDITYEND = wa_itab-endda VALIDITYBEGIN = wa_itab-begda * RECORDNUMBER = RECORD = wa_0185 OPERATION = 'MOD' * TCLAS = 'A' * DIALOG_MODE = '0' * NOCOMMIT = * VIEW_IDENTIFIER = * SECONDARY_RECORD = IMPORTING RETURN = ret_err * KEY = .
HR_EMPLOYEE_DEQUEUE CALL FUNCTION 'HR_EMPLOYEE_DEQUEUE' EXPORTING NUMBER = p0001-pernr * IMPORTING * 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 PCINTAN04 or its description.