SAP Reports / Programs | Logistics - General | Logistics Basic Data | Material Master(LO-MD-MM) SAP LO

RMDATIND SAP ABAP Report - Transfer Material Master Data by Direct Input







RMDATIND is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for You use this program to transfer material master records to the SAP system by direct input online for test purposes...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.

If you would like to execute this report or see the full code listing simply enter RMDATIND into the relevant SAP transactions such as SE38 or SE80


Transaction Code(s):

Below is a list of transaction codes which are relevant to this SAP report

OMT8 - Transfer Material Master Data by DI


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


Text pool values


Selection Text: SPERR = Lock mode
Selection Text: PRF_KZ = Fields not ready for input
Selection Text: ONL_STRT = DEBUG: Start with transaction
Selection Text: MAX_ERR = Max. no. of logical errors
Selection Text: MAX_COMM = Transactions per commit unit
Selection Text: LEVEL = Message level (1-4)
Selection Text: LDS_NAME = Name of logical file
Selection Text: KZ_VERW = Set up administrative data
Selection Text: KZ_RONLY = Only import file
Selection Text: KZ_NO_VB = Check data, but do not update
Selection Text: KZ_DISPO = Update planning file entries
Selection Text: KZ_AEND = Create change documents
Selection Text: JOBBB = TEST: Import error data job
Selection Text: FLAG_M = Check required fields
Selection Text: ERF_MELD = Success messages
Title: Transfer Material Master Data by Direct Input
Text Symbol: 887 = NON-Unicode
Text Symbol: 886 = UTF-8
Text Symbol: 885 = Code Page of File
Text Symbol: 884 = Using physical file name:
Text Symbol: 881 = Using logical file name:
Text Symbol: 880 = File access
Text Symbol: 301 = Matl no.:
Text Symbol: 300 = Transaction:
Text Symbol: 101 = Created by test run
Text Symbol: 012 = General data
Text Symbol: 010 = Status control
Text Symbol: 009 = Check file
Text Symbol: 008 = Performance control


INCLUDES used within this REPORT RMDATIND

INCLUDE RMMMBIMX.
INCLUDE MMMGXV30.
INCLUDE RMDATIT1.
INCLUDE RMDATIT2.
INCLUDE RMDATIT5.
INCLUDE RMMMBIMC.
INCLUDE RMMMBIMW.
INCLUDE RMDATIN2.
INCLUDE RMDATIN1.




INCLUDE RMDATINDSELE.
INCLUDE RMDATIN3.


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:

T130S_SINGLE_READ CALL FUNCTION 'T130S_SINGLE_READ' EXPORTING PGNAM = 'SAPMM03M' IMPORTING WT130S = T130S EXCEPTIONS WRONG_CALL = 01.

FILE_GET_NAME * CALL FUNCTION 'FILE_GET_NAME' * EXPORTING * logical_filename = lds_name * IMPORTING * file_name = ds_name * EXCEPTIONS * file_not_found = 01 * others = 99.

BI_GET_STARTING_NUMBER CALL FUNCTION 'BI_GET_STARTING_NUMBER' IMPORTING JOBID = JOBID ACTION = ACTION JOBTEXT = JOBTEXT ACTUAL_NUMBER = STARTNUM * LASTERRNUM = NUMERRORS = GESERROR EXTERNAL_NUMBER = EXTNUM EXCEPTIONS WRONG_STATUS_FOUND = 03 NOT_FOUND = 04 OTHERS = 99.

ENQUEUE_E_TBIER CALL FUNCTION 'ENQUEUE_E_TBIER' EXPORTING JOBNAME = JOBID _SCOPE = '3' EXCEPTIONS FOREIGN_LOCK = 01 SYSTEM_FAILURE = 02.

FILE_VALIDATE_NAME CALL FUNCTION 'FILE_VALIDATE_NAME' "#EC EXISTS EXPORTING logical_filename = lds_name_int CHANGING physical_filename = ds_name EXCEPTIONS OTHERS = 1.

BI_CLOSE_ENTRY CALL FUNCTION 'BI_CLOSE_ENTRY' EXPORTING JOBNAME = JOBID EXCEPTIONS INTERNAL_ERROR = 01 NOT_FOUND = 02 OTHERS = 03.

BI_CLOSE_ENTRY CALL FUNCTION 'BI_CLOSE_ENTRY' EXPORTING JOBNAME = JOBID EXCEPTIONS INTERNAL_ERROR = 01 NOT_FOUND = 02 OTHERS = 03.

COMMIT_TEXT * CALL FUNCTION 'COMMIT_TEXT'. " wird in MATERIAL_MAINTAIN_DARK erl.

DEQUEUE_ALL CALL FUNCTION 'DEQUEUE_ALL'.

TCURM_SINGLE_READ CALL FUNCTION 'TCURM_SINGLE_READ' EXPORTING KZRFB = ' ' IMPORTING WTCURM = TCURM EXCEPTIONS NOT_FOUND = 01 VALUATION_LEVEL_INITIAL = 02 VALUATION_LEVEL_WRONG = 03.

VB_BATCH_DEFINITION CALL FUNCTION 'VB_BATCH_DEFINITION' IMPORTING KZDCH = KZDCH * KZDZV = * MSGID = * MSGTY = * MSGNO = * TABLES * WERKE = EXCEPTIONS OTHERS = 1.

CONVERSION_EXIT_MATN1_INPUT CALL FUNCTION 'CONVERSION_EXIT_MATN1_INPUT' EXPORTING INPUT = BMM00-MATNR IMPORTING OUTPUT = MYMATNR.

BI_END_AKT_NUMBER CALL FUNCTION 'BI_END_AKT_NUMBER' EXPORTING JOBNAME = JOBID ACTUAL_NUMBER = SATZ_COUNT NUMBER_OF_ERRORS = NUMERROR EXTERNAL_NUMBER = EXTNUM EXCEPTIONS INTERNAL_ERROR = 01 NOT_FOUND = 02.

COMMIT_TEXT * CALL FUNCTION 'COMMIT_TEXT'. " wird in MATERIAL_MAINTAIN_DARK erl.

DEQUEUE_ALL CALL FUNCTION 'DEQUEUE_ALL'. "wk/99a

BI_ERRORS_SOLVED CALL FUNCTION 'BI_ERRORS_SOLVED' EXPORTING JOBNAME = JOBID NUMBER_OF_ERRORS = NUMERROR * Ist es sinnvoll, die Matnr zu übergeben ? EXTERNAL_NUMBER = EXTNUM CLOSE_ENTRY = X EXCEPTIONS INTERNAL_ERROR = 01 NOT_FOUND = 02.

BI_ERRORS_CLOSE CALL FUNCTION 'BI_ERRORS_CLOSE' EXPORTING JOBNAME = JOBID EXCEPTIONS INTERNAL_ERROR = 01 NOT_FOUND = 02.

COMMIT_TEXT





* CALL FUNCTION 'COMMIT_TEXT'. " wird in MATERIAL_MAINTAIN_DARK erl.

DEQUEUE_ALL CALL FUNCTION 'DEQUEUE_ALL'.

TVKO_SINGLE_READ CALL FUNCTION 'TVKO_SINGLE_READ' EXPORTING " KZRFB = ' ' VKORG = ORG IMPORTING WTVKO = L_TVKO EXCEPTIONS NOT_FOUND = 01.

T001_SINGLE_READ CALL FUNCTION 'T001_SINGLE_READ' EXPORTING " KZRFB = ' ' " MAXTZ = 0 BUKRS = L_TVKO-BUKRS IMPORTING WT001 = L_T001 EXCEPTIONS NOT_FOUND = 01 WRONG_CALL = 02.

ERSTER_TAG_DER_PERIODE CALL FUNCTION 'ERSTER_TAG_DER_PERIODE' EXPORTING EPERIO = XBMMH4-PRIOD EPERIV = BMMH1-PERIV " PERIV ist nur nötig bei PERKZ == 'P' -> in FB " abgefangen ('abweichendes Geschäftsjahr') EPERKZ = BMMH1-PERKZ IMPORTING IDATE = I_MVEG-ERTAG EXCEPTIONS PERIODE_NICHT_VORHANDEN = 01 T009_NICHT_GEFUNDEN = 02 WOCHE_UNGUELTIG = 03.

ERSTER_TAG_DER_PERIODE CALL FUNCTION 'ERSTER_TAG_DER_PERIODE' EXPORTING EPERIO = XBMMH3-PRIOD EPERIV = BMMH1-PERIV " siehe Verbräuche EPERKZ = BMMH1-PERKZ IMPORTING IDATE = I_MPRW-ERTAG EXCEPTIONS PERIODE_NICHT_VORHANDEN = 01 T009_NICHT_GEFUNDEN = 02 WOCHE_UNGUELTIG = 03.

CURRENCY_CONVERTING_FACTOR CALL FUNCTION 'CURRENCY_CONVERTING_FACTOR' EXPORTING CURRENCY = I_T001-WAERS IMPORTING FACTOR = HELP_FACTOR.

T001W_SINGLE_READ CALL FUNCTION 'T001W_SINGLE_READ' EXPORTING T001W_WERKS = I_MARC_UEB-WERKS IMPORTING WT001W = T001W EXCEPTIONS NOT_FOUND = 1 OTHERS = 2.

CURRENCY_CONVERTING_FACTOR CALL FUNCTION 'CURRENCY_CONVERTING_FACTOR' EXPORTING CURRENCY = I_T001-WAERS IMPORTING FACTOR = HELP_FACTOR.

MATERIAL_MAINTAIN_DARK CALL FUNCTION 'MATERIAL_MAINTAIN_DARK' EXPORTING * kz_activ_cad = ' ' mk/4.0A Call_MODE2

DEQUEUE_ALL CALL FUNCTION 'DEQUEUE_ALL'. "wk/99a

MATERIAL_INIT_TABS CALL FUNCTION 'MATERIAL_INIT_TABS' EXPORTING SOURCENAME = S_BMMH1 NODATA = NODATA CHANGING DATEN = H_BMMH1 EXCEPTIONS OTHERS = 1.



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