PCCOMTH1 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 PCCOMTH1 into the relevant SAP transactions such as SE38 or SE80
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.
Title: Common Form Routines for Thailand
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
HR_DISPLAY_ERROR_LIST CALL FUNCTION 'HR_DISPLAY_ERROR_LIST' EXPORTING NO_POPUP = 'X' NO_PRINT = ' ' NO_IMG = ' ' * linesize = TABLES ERROR = HR_ERROR.
OPEN_FORM CALL FUNCTION 'OPEN_FORM' EXPORTING * APPLICATION = 'TX' * ARCHIVE_INDEX = ' ' * ARCHIVE_PARAMS = ' ' * DEVICE = 'PRINTER' DIALOG = 'X' FORM = P_FORM LANGUAGE = SY-LANGU * OPTIONS = ' ' * IMPORTING * LANGUAGE = * NEW_ARCHIVE_PARAMS = * RESULT = EXCEPTIONS CANCELED = 1 DEVICE = 2 FORM = 3 OPTIONS = 4 UNCLOSED = 5 OTHERS = 6.
CLOSE_FORM CALL FUNCTION 'CLOSE_FORM'.
START_FORM CALL FUNCTION 'START_FORM' EXPORTING * ARCHIVE_INDEX = ' ' FORM = P_FORM LANGUAGE = SYST-LANGU STARTPAGE = P_STARTPAGE * PROGRAM = ' ' * importing * language = ' ' EXCEPTIONS FORM = 1 FORMAT = 2 UNENDED = 3 UNOPENED = 4 UNUSED = 5 OTHERS = 6.
END_FORM CALL FUNCTION 'END_FORM'.
WRITE_FORM CALL FUNCTION 'WRITE_FORM' EXPORTING ELEMENT = P_ELEMENT FUNCTION = P_FUNCTION TYPE = P_TYPE WINDOW = P_WINDOW.
RP_HIRE_FIRE CALL FUNCTION 'RP_HIRE_FIRE' EXPORTING * beg = end = l_fire_date IMPORTING * fire_date = hire_date = l_hire_date TABLES pphifi = lt_pphifi pp0000 = p0000 pp0001 = p0001.
COMPUTE_YEARS_BETWEEN_DATES CALL FUNCTION 'COMPUTE_YEARS_BETWEEN_DATES' EXPORTING first_date = l_hire_date * MODIFY_INTERVAL = ' ' second_date = l_fire_date IMPORTING years_between_dates = p_ee_yrs_of_serv.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.