SAPS0KS1 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 SAPS0KS1 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: Subroutine Pool for Cluster CAREAMAINT (Controlling Area Maintenance)
INCLUDE LSVCMCOD.
INCLUDE S0KS1TOP.
INCLUDE L0KS1TUC.
No SAP DATABASE tables are accessed within this REPORT code!
DD_DOMVALUE_TEXT_GET CALL FUNCTION 'DD_DOMVALUE_TEXT_GET' EXPORTING DOMNAME = DOM VALUE = VAL IMPORTING DD07V_WA = DOMVAL_WA RC = RC_GLOBAL .
DD_DOMVALUES_GET CALL FUNCTION 'DD_DOMVALUES_GET' EXPORTING DOMNAME = DOM TEXT = 'T' IMPORTING RC = RC_GLOBAL TABLES DD07V_TAB = TXTTAB .
G_FIELD_READ CALL FUNCTION 'G_FIELD_READ' EXPORTING TABLE = I_TAB FIELDNAME = I_FIELD TEXT_FLAG = 'X' IMPORTING FIELD_ATTR = E_DFIES EXCEPTIONS NOT_FOUND = 1 .
VIEWCLUSTER_SET_SUBSCREEN_TITL CALL FUNCTION 'VIEWCLUSTER_SET_SUBSCREEN_TITL' EXPORTING SUBSCREEN_TITLE = GL_DFIES-SCRTEXT_L .
K_TKA00_CHANGE_CHECK_INIT CALL FUNCTION 'K_TKA00_CHANGE_CHECK_INIT'.
TR_SYS_PARAMS CALL FUNCTION 'TR_SYS_PARAMS' IMPORTING SYSTEMEDIT = PARA-SYSTEMEDIT SYSTEMNAME = PARA-SYSTEMNAME SYSTEMTYPE = PARA-SYSTEMTYPE SYSTEM_CLIENT_EDIT = PARA-SYSTEM_CLIENT_EDIT SYS_CLIINDDEP_EDIT = PARA-SYS_CLIINDDEP_EDIT EV_C_SYSTEM = PARA-EV_C_SYSTEM EXCEPTIONS NO_SYSTEMNAME = 1 NO_SYSTEMTYPE = 2 .
G_PERIOD_GET CALL FUNCTION 'G_PERIOD_GET' EXPORTING VARIANT = V_TKA01_GD_WA-LMONA IMPORTING VARIANT = E_LMONA YEAR = E_GJAHR EXCEPTIONS LEDGER_NOT_ASSIGNED_TO_COMPANY = 1 PERIOD_NOT_DEFINED = 2 VARIANT_NOT_DEFINED = 3 .
VIEW_ENQUEUE CALL FUNCTION 'VIEW_ENQUEUE' EXPORTING VIEW_NAME = I_TAB ACTION = I_MODE ENQUEUE_MODE = 'E' * ENQUEUE_RANGE = VIM_ENQUEUE_RANGE * TABLES * SELLIST =
EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2 TABLE_NOT_FOUND = 5 CLIENT_REFERENCE = 7 .
POPUP_DISPLAY_TEXT CALL FUNCTION 'POPUP_DISPLAY_TEXT' EXPORTING POPUP_TITLE = POTIT START_COLUMN = 3 TEXT_OBJECT = I_TXT EXCEPTIONS TEXT_NOT_FOUND = 1 .
K_FIELD_TEXT_READ CALL FUNCTION 'K_FIELD_TEXT_READ' EXPORTING FIELD = DE TAB = TB LANGU = SY-LANGU WITH_DOTS = SPACE IMPORTING EX_KDFIT = KD .
PCA_GENERATE_T882_T895 CALL FUNCTION 'PCA_GENERATE_T882_T895' TABLES E_SAVE_TAB_PCA = SAVE_TAB_PCA E_TABKEYS = LT_TABKEYS .
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.