SAP Reports / Programs | Marketing, Accounting and Pricing | Industry Solution Oil | Marketing, Accounting and Pricing(IS-OIL-DS-MAP) SAP IS

MOICJ200 SAP ABAP INCLUDE - documentation and ABAP source code







MOICJ200 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 MOICJ200 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 MOICJ200. "Basic submit
SUBMIT MOICJ200 AND RETURN. "Return to original report after report execution complete
SUBMIT MOICJ200 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Text Symbol: 001 = Data rec.


INCLUDES used within this REPORT MOICJ200

FORM XD0200_INCLUDE_NAMEN_SETZEN USING VALUE(XI_GRPNO)
FORM XD0200_INCLUDE_REPORT_ANLEGEN.
INSERT REPORT INCLUDE_REPORT_NAME FROM INCLUDE_REPORT.
DELETE REPORT INCLUDE_REPORT_NAME.
FORM XD0200_INCLUDE_REPORT_EDIT.
EDITOR-CALL FOR REPORT INCLUDE_REPORT_NAME DISPLAY-MODE.
EDITOR-CALL FOR REPORT INCLUDE_REPORT_NAME.
FORM XD0200_INCLUDE_REPORT_LESEN USING XI_SUBRC.
READ REPORT INCLUDE_REPORT_NAME INTO INCLUDE_REPORT.
DELETE REPORT INCLUDE_REPORT_NAME.


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:

SYSTEM_STATUS CALL FUNCTION 'SYSTEM_STATUS' IMPORTING STATUS = XA_STATUS.

DOCU_CALL CALL FUNCTION 'DOCU_CALL' EXPORTING DISPL = XD_DISPL DISPL_MODE = XD_DISPL_MODE ID = 'RE' LANGU = SY-LANGU OBJECT = XD_OBJECT.

TR_CHECK_TYPE * CALL FUNCTION 'TR_CHECK_TYPE' * EXPORTING * WI_E071 = XI_E071 * IMPORTING * PE_NAME_TOO_LONG = XI_NAME_TOO_LONG * PE_RESULT = XI_RESULT * WE_E071 = XI_E071 * WE_LOCK_KEY = XI_LOCK_KEY * WE_TADIR = XI_TADIR * WE_COMPLETE_ONLY = XI_COMPLETE_ONLY.

SYSTEM_STATUS CALL FUNCTION 'SYSTEM_STATUS' IMPORTING STATUS = XI_STATUS.

TR_TADIR_INTERFACE * CALL FUNCTION 'TR_TADIR_INTERFACE' * EXPORTING * WI_DELETE_TADIR_ENTRY = ' ' * WI_REMOVE_REPAIR_FLAG = ' ' * WI_SET_REPAIR_FLAG = ' ' * WI_TEST_MODUS = ' ' * WI_TADIR_PGMID = TADIR-PGMID * WI_TADIR_OBJECT = TADIR-OBJECT * WI_TADIR_OBJ_NAME = TADIR-OBJ_NAME * WI_TADIR_KORRNUM = ' ' * WI_TADIR_SRCSYSTEM = TADIR-SRCSYSTEM * WI_TADIR_AUTHOR = TADIR-AUTHOR * WI_TADIR_DEVCLASS = TADIR-DEVCLASS * WI_TADIR_MASTERLANG = ' ' * WI_REMOVE_GENFLAG = ' ' * WI_SET_GENFLAG = TADIR-GENFLAG * WI_READ_ONLY = ' ' * IMPORTING * NEW_TADIR_ENTRY = XI_NEW_TADIR_ENTRY *del error_text = xi_error_text SO4K000371 CM * EXCEPTIONS * ALL (substitute single exception by OTHERS) "SO5K000056del * OTHERS = 01. "SO5K000056 KH

TR_TADIR_INTERFACE call function 'TR_TADIR_INTERFACE' exporting wi_delete_tadir_entry = ' ' wi_remove_repair_flag = ' ' wi_set_repair_flag = ' ' * SOGK000849 SKA Insert *KH PERFORM FCOMMEDITCHECK(RDDINSYS) USING XI_E071 *KH XI_NEW_TADIR_ENTRY *KH XI_DDERR.

TR_TADIR_INTERFACE call function 'TR_TADIR_INTERFACE' exporting wi_delete_tadir_entry = 'X' wi_test_modus = ' ' wi_tadir_pgmid = tadir-pgmid wi_tadir_object = tadir-object wi_tadir_obj_name = tadir-obj_name exceptions others = 1.

TR_TADIR_INTERFACE call function 'TR_TADIR_INTERFACE' exporting wi_delete_tadir_entry = 'X' wi_test_modus = ' ' wi_tadir_pgmid = tadir-pgmid wi_tadir_object = tadir-object wi_tadir_obj_name = tadir-obj_name exceptions others = 1.

INIT_TEXT CALL FUNCTION 'INIT_TEXT' EXPORTING ID = 'SDFO' LANGUAGE = SY-LANGU NAME = ACT_TEXTNAME OBJECT = 'TEXT' IMPORTING HEADER = ACT_THEAD TABLES LINES = TLINETAB EXCEPTIONS ID = 01 LANGUAGE = 02 NAME = 03 OBJECT = 04.

COMMIT_TEXT CALL FUNCTION 'COMMIT_TEXT'.

EDIT_TEXT CALL FUNCTION 'EDIT_TEXT' EXPORTING DISPLAY = TXTDISPLAY HEADER = ACT_THEAD SAVE = CHARX IMPORTING FUNCTION = TXTFUNCTION NEWHEADER = ACT_THEAD TABLES LINES = TLINETAB EXCEPTIONS ID = 01 LANGUAGE = 02 LINESIZE = 03 NAME = 04 OBJECT = 05.

COMMIT_TEXT CALL FUNCTION 'COMMIT_TEXT'.

READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING ID = 'SDFO' LANGUAGE = SY-LANGU NAME = ACT_TEXTNAME OBJECT = 'TEXT' IMPORTING HEADER = ACT_THEAD TABLES LINES = TLINETAB EXCEPTIONS ID = 01 LANGUAGE = 02 NAME = 03 NOT_FOUND = 04 OBJECT = 05 REFERENCE_CHECK = 06.

SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING entry_act = tctrl_formulas-top_line entry_to = xb_tfill loops = id0200_loopc ok_code = fcode * PAGE_GO = DUMMY * PAGE_ACT = DUMMY overlapping = space last_page_full = 'X' IMPORTING entry_new = tctrl_formulas-top_line.

POPUP_GET_VALUES CALL FUNCTION 'POPUP_GET_VALUES' EXPORTING * NO_VALUE_CHECK = ' ' popup_title = text-173 * START_COLUMN = '5' * START_ROW = '5' * IMPORTING * RETURNCODE = TABLES fields = fields * EXCEPTIONS * ERROR_IN_FIELDS = 1 * OTHERS = 2 EXCEPTIONS "SO5K001211 ERROR_IN_FIELDS = 1 "SO5K001211 OTHERS = 2 "SO5K001211 .



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