MSVIMF321 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 MSVIMF321 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.
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
TR_TADIR_INTERFACE CALL FUNCTION 'TR_TADIR_INTERFACE' EXPORTING WI_DELETE_TADIR_ENTRY = I_DELE WI_TEST_MODUS = I_MODUS WI_TADIR_PGMID = CORR_PGMID WI_TADIR_OBJECT = adir_info-OBJECT WI_TADIR_DEVCLASS = adir_info-devclass WI_TADIR_OBJ_NAME = ADIR_INFO-OBJNAME WI_READ_ONLY = I_READ * WI_REMOVE_REPAIR_FLAG = ' ' * WI_SET_REPAIR_FLAG = ' ' * WI_TADIR_KORRNUM = ' ' WI_TADIR_SRCSYSTEM = adir_info-srcsystem WI_TADIR_AUTHOR = sy-uname WI_TADIR_MASTERLANG = sy-langu * WI_TADIR_CPROJECT = ' ' * WI_TADIR_VERSID = ' ' * WI_REMOVE_GENFLAG = ' ' * WI_SET_GENFLAG = ' ' * IV_SET_EDTFLAG = ' ' IMPORTING * NEW_GTADIR_ENTRY = NEW_TADIR_ENTRY = NEW_ADIR EXCEPTIONS TADIR_ENTRY_NOT_EXISTING = 1 * TADIR_ENTRY_ILL_TYPE = 2 * NO_SYSTEMNAME = 3 * NO_SYSTEMTYPE = 4 * ORIGINAL_SYSTEM_CONFLICT = 5 * OBJECT_RESERVED_FOR_DEVCLASS = 6 * OBJECT_EXISTS_GLOBAL = 7 * OBJECT_EXISTS_LOCAL = 8 * OBJECT_IS_DISTRIBUTED = 9 * OBJ_SPECIFICATION_NOT_UNIQUE = 10 * NO_AUTHORIZATION_TO_DELETE = 11 * DEVCLASS_NOT_EXISTING = 12 * SIMULTANIOUS_SET_REMOVE_REPAIR = 13 * ORDER_MISSING = 14 * NO_MODIFICATION_OF_HEAD_SYST = 15 * PGMID_OBJECT_NOT_ALLOWED = 16 * MASTERLANGUAGE_NOT_SPECIFIED = 17 * DEVCLASS_NOT_SPECIFIED = 18 * SPECIFY_OWNER_UNIQUE = 19 * LOC_PRIV_OBJS_NO_REPAIR = 20 * GTADIR_NOT_REACHED = 21 * OBJECT_LOCKED_FOR_ORDER = 22 * CHANGE_OF_CLASS_NOT_ALLOWED = 23 * NO_CHANGE_FROM_SAP_TO_TMP = 24 OTHERS = 25 .
TRINT_TADIR_INTERFACE CALL FUNCTION 'TRINT_TADIR_INTERFACE' EXPORTING * WI_DELETE_TADIR_ENTRY = ' ' * WI_REMOVE_REPAIR_FLAG = ' ' * WI_SET_REPAIR_FLAG = ' ' WI_TEST_MODUS = space WI_TADIR_PGMID = corr_pgmid WI_TADIR_OBJECT = adir_info-object WI_TADIR_OBJ_NAME = adir_info-objname * WI_TADIR_KORRNUM = ' ' WI_TADIR_SRCSYSTEM = adir_info-srcsystem WI_TADIR_AUTHOR = sy-uname WI_TADIR_DEVCLASS = adir_info-devclass WI_TADIR_MASTERLANG = sy-langu * WI_TADIR_CPROJECT = ' ' * WI_TADIR_VERSID = ' ' * WI_REMOVE_GENFLAG = ' ' * WI_SET_GENFLAG = ' ' * WI_READ_ONLY = ' ' * IV_SET_EDTFLAG = ' ' IV_WBO_INTERNAL = i_modus * IV_INSERT_MODE = ' ' * IV_NO_PAK_CHECK = ' ' * IV_OBJ_STABILITY = ' ' IMPORTING * NEW_GTADIR_ENTRY = NEW_TADIR_ENTRY = new_adir EXCEPTIONS * TADIR_ENTRY_NOT_EXISTING = 1 * TADIR_ENTRY_ILL_TYPE = 2 * NO_SYSTEMNAME = 3 * NO_SYSTEMTYPE = 4 * ORIGINAL_SYSTEM_CONFLICT = 5 * OBJECT_RESERVED_FOR_DEVCLASS = 6 * OBJECT_EXISTS_GLOBAL = 7 * OBJECT_EXISTS_LOCAL = 8 * OBJECT_IS_DISTRIBUTED = 9 * OBJ_SPECIFICATION_NOT_UNIQUE = 10 * NO_AUTHORIZATION_TO_DELETE = 11 * DEVCLASS_NOT_EXISTING = 12 * SIMULTANIOUS_SET_REMOVE_REPAIR = 13 * ORDER_MISSING = 14 * NO_MODIFICATION_OF_HEAD_SYST = 15 * PGMID_OBJECT_NOT_ALLOWED = 16 * MASTERLANGUAGE_NOT_SPECIFIED = 17 * DEVCLASS_NOT_SPECIFIED = 18 * SPECIFY_OWNER_UNIQUE = 19 * LOC_PRIV_OBJS_NO_REPAIR = 20 * GTADIR_NOT_REACHED = 21 * OBJECT_LOCKED_FOR_ORDER = 22 * CHANGE_OF_CLASS_NOT_ALLOWED = 23 * NO_CHANGE_FROM_SAP_TO_TMP = 24 OTHERS = 25 .
TR_GTADIR_LIST_QUERY CALL FUNCTION 'TR_GTADIR_LIST_QUERY' EXPORTING COMMAND = 'GETLIST' TABLES E_TABLE = E_TABLE I_TABLE = I_TABLE EXCEPTIONS TR_DENY_ACCESS = 1 OTHERS = 2.
TR_DEVCLASS_GET CALL FUNCTION 'TR_DEVCLASS_GET' EXPORTING IV_DEVCLASS = adir_info-devclass IV_LANGU = SY-LANGU IMPORTING ES_TDEVC = STRU_DEVC EXCEPTIONS DEVCLASS_NOT_FOUND = 01.
TR_GET_TRANSPORT_TARGET CALL FUNCTION 'TR_GET_TRANSPORT_TARGET' EXPORTING * IV_USE_DEFAULT = * IV_GET_LAYER_ONLY = ' ' IV_DEVELOPMENT_CLASS = adir_info-devclass * IV_TRANSPORT_LAYER = * IV_SOURCE_SYSTEM = IV_SOURCE_CLIENT = SY-MANDT IMPORTING EV_TARGET = ADIR_INFO-TARGET EV_LAYER = adir_info-layer EXCEPTIONS * WRONG_CALL = 1 * INVALID_INPUT = 2 * CTS_INITIALIZATION_FAILURE = 3 OTHERS = 4 .
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.