RM07MKBS is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Report
If you would like to execute this report or see the full code listing simply enter RM07MKBS into the relevant SAP transactions such as SE38 or SE80
Below is a list of transaction codes which are relevant to this SAP report
MB54 - Consignment Stocks
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.
Selection Text: WERKS = D .
Selection Text: P_VARI = D .
Selection Text: MATNR = D .
Selection Text: MATKL = D .
Selection Text: LIFNR = D .
Selection Text: LGORT = D .
Selection Text: CHARG = D .
Selection Text: ZERO = Display Zero Stocks
Selection Text: P_WERT = Display Prices/Values
Title: Display Consignment Stocks
Text Symbol: 044 = Purchasing Organization
Text Symbol: 043 = Plant
Text Symbol: 042 = Problems During Determination of Purchasing Organizations
Text Symbol: 041 = Scope of List
Text Symbol: 040 = Database Selections
Text Symbol: 031 = A Vendor
Text Symbol: 030 = A Material
Text Symbol: 026 = Display Options
Text Symbol: 021 = Display Prices and Values
Text Symbol: 020 = Settings
Text Symbol: 019 = Vendor
Text Symbol: 009 = Total Value
Text Symbol: 008 = Total Value
Text Symbol: 007 = Value
Text Symbol: 006 = Total Quantity
Text Symbol: 005 = Tot. Qty
Text Symbol: 004 = Quantity
Text Symbol: 003 = Currency
Text Symbol: 002 = Currency
Text Symbol: 001 = Currency
INCLUDE: RM07MKBD, " REPORTSPEZIFISCHE DATENDEFINITIONEN
MM07MABC, " VARIABLEN ZUM ZEICHENSATZ
RM07MUSR, " TASTENBELEGUNGEN UND TRANSKATIONEN
RM07MEND, " ANFORDERUNGSBILD UND ENDEROUTINE
No SAP DATABASE tables are accessed within this REPORT code!
ME_READ_INFORECORD CALL FUNCTION 'ME_READ_INFORECORD' EXPORTING INCOM = MEICO INPREISSIM = MEPRCK IMPORTING EINADATEN = EINA EINEDATEN = EINE EXCOM = MEICR EXPREISSIM = MEPRO EXCEPTIONS ERROR_MESSAGE = 04.
ME_READ_INFORECORD CALL FUNCTION 'ME_READ_INFORECORD' "n498742 EXPORTING INCOM = MEICO "n498742 INPREISSIM = MEPRCK "n498742 IMPORTING EINADATEN = EINA "n498742 EINEDATEN = EINE "n498742 EXCOM = MEICR "n498742 EXPREISSIM = MEPRO "n498742 EXCEPTIONS "n498742 ERROR_MESSAGE = 04. "n498742
ME_READ_INFORECORD CALL FUNCTION 'ME_READ_INFORECORD' EXPORTING INCOM = MEICO INPREISSIM = MEPRCK IMPORTING EINADATEN = EINA EINEDATEN = EINE EXCOM = MEICR EXPREISSIM = MEPRO EXCEPTIONS ERROR_MESSAGE = 04.
REUSE_ALV_VARIANT_EXISTENCE CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE' EXPORTING I_SAVE = VARIANT_SAVE CHANGING CS_VARIANT = DEF_VARIANTE.
REUSE_ALV_VARIANT_DEFAULT_GET CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET' EXPORTING I_SAVE = VARIANT_SAVE CHANGING CS_VARIANT = DEF_VARIANTE EXCEPTIONS NOT_FOUND = 2.
MB_ADD_PURCHASE_ORDER_QUANTITY CALL FUNCTION 'MB_ADD_PURCHASE_ORDER_QUANTITY' EXPORTING X_ELIKZ = SPACE X_LOEKZ = SPACE X_MATNR = IMARA-MATNR X_MEINS = IMARA-MEINS TABLES XTAB = XTAB XWERKS = WERKS.
REUSE_ALV_HIERSEQ_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY' EXPORTING I_INTERFACE_CHECK = g_flag_check "n676100 I_CALLBACK_PROGRAM = REPID * i_structure_name = 'IMREP_MSEG' I_CALLBACK_PF_STATUS_SET = 'STATUS' I_CALLBACK_USER_COMMAND = 'USER_COMMAND_STD' "n498742 IS_LAYOUT = LAYOUT IT_FIELDCAT = FIELDCAT[] * IT_EXCLUDING = * it_special_groups = gruppen[] * IT_SORT = * IT_FILTER = * IS_SEL_HIDE = * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 I_DEFAULT = 'X' I_SAVE = 'A' IS_VARIANT = VARIANTE IT_EVENTS = g_t_event[] "n498742 * IT_EVENT_EXIT = I_TABNAME_HEADER = 'HEADER' I_TABNAME_ITEM = 'BESTAND' IS_KEYINFO = KEYINFO IS_PRINT = PRINT * IMPORTING * E_EXIT_CAUSED_BY_CALLER = TABLES T_OUTTAB_HEADER = HEADER T_OUTTAB_ITEM = BESTAND "n498742 EXCEPTIONS "n498742 PROGRAM_ERROR = 1 "n498742 OTHERS = 2. "n498742
REUSE_ALV_VARIANT_F4 CALL FUNCTION 'REUSE_ALV_VARIANT_F4' EXPORTING IS_VARIANT = VARIANTE I_SAVE = VARIANT_SAVE * it_default_fieldcat = IMPORTING E_EXIT = VARIANT_EXIT ES_VARIANT = DEF_VARIANTE EXCEPTIONS NOT_FOUND = 2.
ME_SELECT_EKORG_FOR_PLANT CALL FUNCTION 'ME_SELECT_EKORG_FOR_PLANT' "n498742 EXPORTING "n498742 I_WERKS = l_WERKS "n498742 I_KONSI = X "n498742 IMPORTING "n498742 E_EKORG = g_f_eKORG "n498742 EXCEPTIONS "n498742 MORE_THAN_ONE_ORGANIZATION = 01 "n498742 NO_ENTRY_FOUND = 02 "n498742 NO_DEFAULT_FOUND = 03. "n498742
MB_CHECK_T160M CALL FUNCTION 'MB_CHECK_T160M' "n498742 EXPORTING "n498742 I_ARBGB = 'M7' "n498742 I_MSGNR = '376' "n498742 I_MSGVS = '00' "n498742 IMPORTING "n498742 RC = rc. "n498742
MB_CHECK_T160M CALL FUNCTION 'MB_CHECK_T160M' "n498742 EXPORTING "n498742 I_ARBGB = 'M7' "n498742 I_MSGNR = '377' "n498742 I_MSGVS = '00' "n498742 IMPORTING "n498742 RC = rc. "n498742
REUSE_ALV_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' EXPORTING I_INTERFACE_CHECK = g_flag_check "n676100 I_CALLBACK_PROGRAM = REPID I_CALLBACK_PF_STATUS_SET = 'STATUS_LIEFERANT' "n498742 I_CALLBACK_USER_COMMAND = 'USER_COMMAND_LIEF' "n498742 * I_STRUCTURE_NAME = IS_LAYOUT = LAYOUT IT_FIELDCAT = FIELDCAT_LIEFERANT[] * IT_EXCLUDING = * IT_SPECIAL_GROUPS = * IT_SORT = * IT_FILTER = * IS_SEL_HIDE = * I_DEFAULT = 'X' * I_SAVE = ' ' * IS_VARIANT = ' ' IT_EVENTS = lt_event "n1467078 * IT_EVENT_EXIT = * IS_PRINT = * IS_REPREP_ID = * I_SCREEN_START_COLUMN = 0 * I_SCREEN_START_LINE = 0 * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 * IMPORTING * E_EXIT_CAUSED_BY_CALLER = * ES_EXIT_CAUSED_BY_USER = TABLES T_OUTTAB = LIEFSUM "n498742 EXCEPTIONS "n498742 PROGRAM_ERROR = 1 "n498742 OTHERS = 2. "n498742
REUSE_ALV_COMMENTARY_WRITE CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' "n497391 EXPORTING "n497391 IT_LIST_COMMENTARY = G_T_LISTHEADER[]. "n497391
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.