SAP Reports / Programs | Personnel Management | Personnel Administration(PA-PA) SAP PA

RPSTA2GR SAP ABAP INCLUDE - documentation and ABAP source code







RPSTA2GR 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 RPSTA2GR 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 RPSTA2GR. "Basic submit
SUBMIT RPSTA2GR AND RETURN. "Return to original report after report execution complete
SUBMIT RPSTA2GR 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 RPSTA2GR

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:

GUI_GET_PARENT_DYNPRO CALL FUNCTION 'GUI_GET_PARENT_DYNPRO' IMPORTING PARENT = PID.

CONTROL_INIT CALL FUNCTION 'CONTROL_INIT'.

COMBOBOX_CREATE CALL FUNCTION 'COMBOBOX_CREATE' EXPORTING OWNER_REPID = THIS_REPID DYNNR = THIS_DYNNR LEFT = LEFT_COL1 TOP = 0 WIDTH = 30 REGISTER_EVENT_CLICK = 'X' PARENTID = PID CHANGING HANDLE = COMBO1 EXCEPTIONS CREATE_ERROR = 1.

COMBOBOX_ADD_ITEMS CALL FUNCTION 'COMBOBOX_ADD_ITEMS' EXPORTING HANDLE = COMBO1 TABLES INTERNAL_TABLE = ITEM_TAB.

COMBOBOX_SELECT_ITEM CALL FUNCTION 'COMBOBOX_SELECT_ITEM' EXPORTING HANDLE = COMBO1 INDEX = INDEX1 EXCEPTIONS CNTL_SYSTEM_ERROR = 1 CNTL_ERROR = 2 OTHERS = 3.

COMBOBOX_EVENT_CB_CLICK CALL FUNCTION 'COMBOBOX_EVENT_CB_CLICK' EXPORTING CALLBACK_FORM = 'COMBO_CLICK' CHANGING HANDLE = COMBO1 EXCEPTIONS CB_NOT_FOUND = 1 OTHERS = 2.

COMBOBOX_CREATE CALL FUNCTION 'COMBOBOX_CREATE' EXPORTING OWNER_REPID = THIS_REPID DYNNR = THIS_DYNNR LEFT = 50 TOP = 0 WIDTH = 30 REGISTER_EVENT_CLICK = 'X' PARENTID = PID CHANGING HANDLE = COMBO2 EXCEPTIONS CREATE_ERROR = 1.

COMBOBOX_ADD_ITEMS CALL FUNCTION 'COMBOBOX_ADD_ITEMS' EXPORTING HANDLE = COMBO2 TABLES INTERNAL_TABLE = ITEM_TAB.

COMBOBOX_SELECT_ITEM CALL FUNCTION 'COMBOBOX_SELECT_ITEM' EXPORTING HANDLE = COMBO2 INDEX = INDEX2 EXCEPTIONS CNTL_SYSTEM_ERROR = 1 CNTL_ERROR = 2 OTHERS = 3.

COMBOBOX_EVENT_CB_CLICK CALL FUNCTION 'COMBOBOX_EVENT_CB_CLICK' EXPORTING CALLBACK_FORM = 'COMBO_CLICK' CHANGING HANDLE = COMBO2 EXCEPTIONS CB_NOT_FOUND = 1 OTHERS = 2.

COMBOBOX_CREATE * CALL FUNCTION 'COMBOBOX_CREATE' * EXPORTING * OWNER_REPID = THIS_REPID * DYNNR = THIS_DYNNR * LEFT = 11 * TOP = 1 * WIDTH = 30 * REGISTER_EVENT_CLICK = 'X' * PARENTID = PID * CHANGING * HANDLE = COMBO3 * EXCEPTIONS * CREATE_ERROR = 1.

COMBOBOX_ADD_ITEMS * CALL FUNCTION 'COMBOBOX_ADD_ITEMS' * EXPORTING * HANDLE = COMBO3 * TABLES * INTERNAL_TABLE = NUM_ITEM_TAB.

COMBOBOX_SELECT_ITEM * CALL FUNCTION 'COMBOBOX_SELECT_ITEM' * EXPORTING * HANDLE = COMBO3 * INDEX = 0 * EXCEPTIONS * CNTL_SYSTEM_ERROR = 1 * CNTL_ERROR = 2 * OTHERS = 3.

COMBOBOX_EVENT_CB_CLICK * CALL FUNCTION 'COMBOBOX_EVENT_CB_CLICK' * EXPORTING * CALLBACK_FORM = 'COMBO_CLICK' * CHANGING * HANDLE = COMBO3 * EXCEPTIONS * CB_NOT_FOUND = 1 * OTHERS = 2.

COMBOBOX_CREATE * CALL FUNCTION 'COMBOBOX_CREATE' * EXPORTING * OWNER_REPID = THIS_REPID * DYNNR = THIS_DYNNR * LEFT = 11 * TOP = 2 * WIDTH = 30 * REGISTER_EVENT_CLICK = 'X' * PARENTID = PID * CHANGING * HANDLE = COMBO4 * EXCEPTIONS * CREATE_ERROR = 1.

COMBOBOX_EVENT_CB_CLICK * CALL FUNCTION 'COMBOBOX_EVENT_CB_CLICK' * EXPORTING * CALLBACK_FORM = 'COMBO_CLICK' * CHANGING * HANDLE = COMBO4 * EXCEPTIONS * CB_NOT_FOUND = 1 * OTHERS = 2.

COMBOBOX_CREATE CALL FUNCTION 'COMBOBOX_CREATE' EXPORTING OWNER_REPID = THIS_REPID DYNNR = THIS_DYNNR LEFT = LEFT_COL1 TOP = 1 WIDTH = 20 REGISTER_EVENT_CLICK = 'X' PARENTID = PID CHANGING HANDLE = COMBO5 EXCEPTIONS CREATE_ERROR = 1.

COMBOBOX_EVENT_CB_CLICK CALL FUNCTION 'COMBOBOX_EVENT_CB_CLICK' EXPORTING CALLBACK_FORM = 'COMBO_CLICK' CHANGING HANDLE = COMBO5 EXCEPTIONS CB_NOT_FOUND = 1 OTHERS = 2.

COMBOBOX_DELETE_ITEMS





CALL FUNCTION 'COMBOBOX_DELETE_ITEMS' EXPORTING HANDLE = COMBO5 INDEX = 1.

COMBOBOX_DELETE_ITEMS CALL FUNCTION 'COMBOBOX_DELETE_ITEMS' EXPORTING HANDLE = COMBO5 INDEX = 1.

COMBOBOX_DELETE_ITEMS CALL FUNCTION 'COMBOBOX_DELETE_ITEMS' EXPORTING HANDLE = COMBO5 INDEX = 1.

COMBOBOX_ADD_ITEMS CALL FUNCTION 'COMBOBOX_ADD_ITEMS' EXPORTING HANDLE = COMBO5 TABLES INTERNAL_TABLE = GRAPH_ITEM_TAB.

COMBOBOX_SELECT_ITEM CALL FUNCTION 'COMBOBOX_SELECT_ITEM' EXPORTING HANDLE = COMBO5 INDEX = SEL_INDEX EXCEPTIONS CNTL_SYSTEM_ERROR = 1 CNTL_ERROR = 2 OTHERS = 3.

CONTROL_DESTROY CALL FUNCTION 'CONTROL_DESTROY' CHANGING H_CONTROL = GOCX EXCEPTIONS OTHERS = 1.

CONTROL_EXIT CALL FUNCTION 'CONTROL_EXIT'.

COMBOBOX_GET_SELECTION CALL FUNCTION 'COMBOBOX_GET_SELECTION' EXPORTING HANDLE = COMBO1 IMPORTING ITEM = OBJECT INDEX = INDEX1 EXCEPTIONS CNTL_SYSTEM_ERROR = 1 CNTL_ERROR = 2 OTHERS = 3.

COMBOBOX_GET_SELECTION CALL FUNCTION 'COMBOBOX_GET_SELECTION' EXPORTING HANDLE = COMBO2 IMPORTING ITEM = OBJECT INDEX = INDEX2 EXCEPTIONS CNTL_SYSTEM_ERROR = 1 CNTL_ERROR = 2 OTHERS = 3.

COMBOBOX_GET_SELECTION CALL FUNCTION 'COMBOBOX_GET_SELECTION' EXPORTING HANDLE = COMBO3 IMPORTING ITEM = OBJECT INDEX = VAL_INDEX EXCEPTIONS CNTL_SYSTEM_ERROR = 1 CNTL_ERROR = 2 OTHERS = 3.

COMBOBOX_GET_SELECTION CALL FUNCTION 'COMBOBOX_GET_SELECTION' EXPORTING HANDLE = COMBO4 IMPORTING ITEM = NAVIG_VALUE INDEX = SEL_INDEX EXCEPTIONS CNTL_SYSTEM_ERROR = 1 CNTL_ERROR = 2 OTHERS = 3.

COMBOBOX_GET_SELECTION CALL FUNCTION 'COMBOBOX_GET_SELECTION' EXPORTING HANDLE = COMBO5 IMPORTING ITEM = GRAPH_TYPE INDEX = SEL_INDEX EXCEPTIONS CNTL_SYSTEM_ERROR = 1 CNTL_ERROR = 2 OTHERS = 3.

GRAPH_2D CALL FUNCTION 'GRAPH_2D' EXPORTING STAT = 'C' WINID = OBJ_ID TITL = DIM1 DISPLAY_TYPE = GRAPH_TYPE"// VB, PI, TP, HB TABLES DATA = DATA_2D.

GRAPH_MATRIX_3D CALL FUNCTION 'GRAPH_MATRIX_3D' EXPORTING * AUTO_CMD_1 = ' ' * AUTO_CMD_2 = ' ' COL1 = COL1 COL2 = COL2 COL3 = COL3 COL4 = COL4 COL5 = COL5 COL6 = COL6 DIM1 = DIM2 DIM2 = DIM1 * INBUF = ' ' INFORM = ' ' * MAIL_ALLOW = ' ' * PWDID = ' ' * SET_FOCUS = 'x' * SMFONT = ' ' * SO_CONTENTS = ' ' * SO_RECEIVER = ' ' * SO_SEND = ' ' * SO_TITLE = ' ' STAT = 'C' * SUPER = ' ' * TIMER = ' ' * TITL = title * VALT = ' ' * WDID = ' ' WINID = OBJ_ID * WINPOS = ' ' * WINSZX = '50' * WINSZY = '50' * X_OPT = ' ' * NOTIFY = ' ' * IMPORTING * B_KEY = * B_TYP = * CUA_ID = * MOD_COL = * MOD_ROW = * MOD_VAL = * M_TYP = * RBUFF = * RWNID = TABLES DATA = DATA_3D OPTS = OPTS EXCEPTIONS OTHERS = 1.

GRAPH_3D * CALL FUNCTION 'GRAPH_3D' * EXPORTING * TITL = TITLE * DIM1 = DIM2 * DIM2 = DIM1 * STAT = 'C' * WINID = OBJ_ID ** display_type = "TO : Towers * TABLES * DATA = DATA_3D.

GRAPH_GETOBJ CALL FUNCTION 'GRAPH_GETOBJ' EXPORTING OBJ_ID = OBJ_ID DELETE = 'x' TABLES OBJECT_TAB = MY_TAB EXCEPTIONS OBJ_UNKNOWN = 1 OTHERS = 2.

CONTROL_CREATE CALL FUNCTION 'CONTROL_CREATE' EXPORTING OWNER_REPID = THIS_REPID CLSID = CLSID SHELLSTYLE = STYLE PARENTID = PID TRY = 'x' CHANGING H_CONTROL = GOCX EXCEPTIONS CREATE_ERROR = 1 OTHERS = 2.

CONTROL_LINK CALL FUNCTION 'CONTROL_LINK' EXPORTING H_CONTROL = GOCX REPID = THIS_REPID DYNNR = THIS_DYNNR EXCEPTIONS OTHERS = 1.

CONTROL_SET_WINDOW_PROPERTY CALL FUNCTION 'CONTROL_SET_WINDOW_PROPERTY' EXPORTING H_CONTROL = GOCX PROPID = PROP_TOP VALUE = TOP NO_FLUSH = 'X'.

CONTROL_SET_WINDOW_PROPERTY CALL FUNCTION 'CONTROL_SET_WINDOW_PROPERTY' EXPORTING H_CONTROL = GOCX PROPID = PROP_ALIGN VALUE = ALIGNMENT NO_FLUSH = 'X'.




DP_CREATE_URL CALL FUNCTION 'DP_CREATE_URL' EXPORTING TYPE = 'APPLICATION' SUBTYPE = 'OCTET-STREAM' SIZE = NOLINES TABLES DATA = MY_TAB CHANGING URL = URL EXCEPTIONS DP_INVALID_PARAMETER = 1 DP_ERROR_PUT_TABLE = 2 DP_ERROR_GENERAL = 3 OTHERS = 4.

CONTROL_SET_FOCUS CALL FUNCTION 'CONTROL_SET_FOCUS' EXPORTING H_CONTROL = COMBO1 NO_FLUSH = 'X' EXCEPTIONS CNTL_SYSTEM_ERROR = 1 CNTL_ERROR = 2 OTHERS = 3.

CONTROL_CALL_METHOD CALL FUNCTION 'CONTROL_CALL_METHOD' EXPORTING H_CONTROL = GOCX METHOD = 'LoadURL' P_COUNT = 1 P1 = URL EXCEPTIONS CNTL_SYSTEM_ERROR = 1 CNTL_ERROR = 2 OTHERS = 3.



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