SAP Reports / Programs | Logistics Execution | Mobile data entry(LE-MOB) SAP LE

RLMOBINV SAP ABAP INCLUDE - Mobile Computing: Inventory count common routines







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


Text pool values


Title: Mobile Computing: Inventory count common routines


INCLUDES used within this REPORT RLMOBINV

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:

L_INV_SELECT CALL FUNCTION 'L_INV_SELECT' EXPORTING I_TCODE = SY-TCODE I_UNAME = SY-UNAME i_lgnum = whs_id TABLES X_INV = SYS_INV EXCEPTIONS NO_ACTIVE_BIN_FOUND = 01 NO_AUTHORITY = 02 ERROR_MESSAGE = 99.

DEQUEUE_ALL CALL FUNCTION 'DEQUEUE_ALL' EXPORTING _SYNCHRON = con_x.

L_MATNR_READ CALL FUNCTION 'L_MATNR_READ' EXPORTING I06_MATNR = E1LINVX-MATNR I06_WERKS = E1LINVX-WERKS I06_LGNUM = E1LINVX-LGNUM IMPORTING E_MLVS = LS_MLVS TABLES E_MAT = MAT_DATA EXCEPTIONS ERROR_MESSAGE = 99.

L_T340D_READ CALL FUNCTION 'L_T340D_READ' EXPORTING I05_LGNUM = E1LINVX-LGNUM IMPORTING E_T340D = LS_T340D EXCEPTIONS ERROR_MESSAGE = 99.

CALL_SCREEN_152 CALL FUNCTION 'CALL_SCREEN_152' EXPORTING I_QUINV = LINV-QUINV I_LINV = E1LINVX I_TCODE = SY-TCODE I_RLMOB_CLENUM = RLMOB-CLENUM I_PROCESSED = DETAIL_LINV-PROCESSED I_TOTAL_LINES = TOTAL_LINES I_INV_INDEX = INV_INDEX I_POS_MANAGED = GV_POS_MANAGED IMPORTING E_QUINV = LINV-QUINV E_LINV = E1LINVX E_SCREEN_FCODE = SCREEN_FCODE E_RLMOB_CLENUM = RLMOB-CLENUM CHANGING C_NEWITEM = SAV_NEWITEM EXCEPTIONS FAIL_IN_PHYSICAL_SCREEN_NUMBER = 01.

L_T331_READ CALL FUNCTION 'L_T331_READ' "v_823493 EXPORTING I_LGNUM = E1LINVX-LGNUM I_LGTYP = E1LINVX-LGTYP IMPORTING E_T331 = EV_T331 EXCEPTIONS NO_ENTRY_FOUND = 99.

RF_SW_LINV_READ CALL FUNCTION 'RF_SW_LINV_READ' EXPORTING I_LGNUM = ILAGP-LGNUM * I_IVNUM = I_NANUM = '00' * I_ISTAT = I_LGTYP = ILAGP-LGTYP I_LGPLA = ILAGP-LGPLA TABLES EV_LINV = INV EXCEPTIONS NO_ENTRY_FOUND = 1 FUNCTION_NOT_EXIST = 2 NO_PARAMETERS_FOUND = 3 OTHERS = 4 .

L_INV_COUNT_ERROR CALL FUNCTION 'L_INV_COUNT_ERROR' EXPORTING I_E1LINVX = E1LINVX.

ENQUEUE_ELLINKE CALL FUNCTION 'ENQUEUE_ELLINKE' EXPORTING LGNUM = P_LGNUM IVNUM = P_IVNUM EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2.

L_PLATZ_POSITION_MISCHEN CALL FUNCTION 'L_PLATZ_POSITION_MISCHEN' EXPORTING LGPLA = P_LGPLA PLPOS = P_PLPOS IMPORTING O_LGPLA = P_BIN.

L_T331_READ CALL FUNCTION 'L_T331_READ' EXPORTING I_LGNUM = P_ULGNUM I_LGTYP = P_ULGTYP IMPORTING E_T331 = T331 EXCEPTIONS NO_ENTRY_FOUND = 01.

L_PLATZ_POSITION_TRENNEN CALL FUNCTION 'L_PLATZ_POSITION_TRENNEN' EXPORTING LGNUM = P_ULGNUM LGTYP = P_ULGTYP LGPLA = P_ULGPLA IMPORTING O_LGPLA = P_ULGPLA O_PLPOS = P_POS EXCEPTIONS NOT_FOUND = 99 OVERFLOW = 99 ERROR_MESSAGE = 99.

MLGN_SINGLE_READ CALL FUNCTION 'MLGN_SINGLE_READ' EXPORTING MATNR = P_MATNR LGNUM = P_LGNUM IMPORTING WMLGN = MLGN EXCEPTIONS LOCK_ON_MLGN = 01 LOCK_SYSTEM_ERROR = 01 WRONG_CALL = 01 NOT_FOUND = 01 ERROR_MESSAGE = 01.

MAKT_SINGLE_READ CALL FUNCTION 'MAKT_SINGLE_READ' EXPORTING MATNR = P_MATNR SPRAS = SY-LANGU IMPORTING WMAKT = MAKT EXCEPTIONS WRONG_CALL = 01 NOT_FOUND = 01 ERROR_MESSAGE = 01.

L_STORAGE_UNIT_CHECK CALL FUNCTION 'L_STORAGE_UNIT_CHECK' TABLES CNT04_INV = LT_LINV CHANGING I04_INV = LS_LINV EXCEPTIONS error_message = 99.

L_INV_COUNT_EXT CALL FUNCTION 'L_INV_COUNT_EXT' EXPORTING I_CHECK_ONLY = CON_X IMPORTING ALLE_LGNUM = DUMMY_LGNUM ALLE_IVNUM = DUMMY_IVNUM ALLE_NVERS = DUMMY_NVERS TABLES S_LINV = CHECK_INV EXCEPTIONS ERROR_MESSAGE = 99.

GET_BIN_FROM_VERIF CALL FUNCTION 'GET_BIN_FROM_VERIF' EXPORTING I_LGNUM = P_LGNUM I_LGTYP = P_LGTYP I_VERIF = LAGP-VERIF I_LGPLA = P_LGPLA TABLES X_LGPLA = ILAGP EXCEPTIONS NO_ENTRIES_FOUND = 01 ERROR_MESSAGE = 99.

BAR_CODE_TRANS CALL FUNCTION 'BAR_CODE_TRANS' EXPORTING I_BAR_CODE_STRING = P_STRING I_APP_FIELD = P_APPLI I_WHS_ID = P_LGNUM IMPORTING O_BIN_VER = LAGP-VERIF O_SU = LINV-LENUM O_MAT = INIT_MAT O_EAN = INIT_EAN O_ALTMAT = INIT_ALTMAT O_QTY = INIT_MENGE EXCEPTIONS ILLEGAL_BAR_CODE = 01 CONVERSION_ERROR = 02 SYSTEM_ERROR = 03 ERROR_MESSAGE = 99.

L_INV_COUNT_EXT





CALL FUNCTION 'L_INV_COUNT_EXT' EXPORTING I_COMMIT = CON_X * IMPORTING * ALLE_LGNUM = OBJECT_CREATED-LGNUM * ALLE_IVNUM = OBJECT_CREATED-IVNUM * ALLE_NVERS = OBJECT_CREATED-NVERS TABLES S_LINV = SLINV EXCEPTIONS ERROR_MESSAGE = 99.

L_SONUM_CONV_INT_EXT CALL FUNCTION 'L_SONUM_CONV_INT_EXT' EXPORTING SOBKZ = inv-sobkz SONUM = inv-sonum IMPORTING LSONR = zero_count_struct-lsonr.

L_T331_READ CALL FUNCTION 'L_T331_READ' EXPORTING I_LGNUM = P_LGNUM I_LGTYP = P_LGTYP IMPORTING E_T331 = T331 EXCEPTIONS NO_ENTRY_FOUND = 01.

L_MATNR_READ CALL FUNCTION 'L_MATNR_READ' EXPORTING I06_MATNR = E1LINVX-MATNR I06_WERKS = E1LINVX-WERKS I06_LGNUM = E1LINVX-LGNUM IMPORTING E_MLVS = LS_MLVS TABLES E_MAT = LT_MAT EXCEPTIONS PLANT_LGN_MAT_MISSING = 1 ERROR_MESSAGE = 99. "v_n_1223796

L_BATCH_CHECK CALL FUNCTION 'L_BATCH_CHECK' EXPORTING I07_MLVS = LS_MLVS CHANGING I07_INV = LS_LINV EXCEPTIONS BATCH_MISSING = 1 NOT_BATCH_MANAGED = 2 W_VALUATION_REC_DOESNT_EXIST = 3 W_BATCH_DOESNT_EXIST = 4 SU_PROBLEM = 5 OTHERS = 6.

VB_BATCH_GET_DETAIL CALL FUNCTION 'VB_BATCH_GET_DETAIL' EXPORTING MATNR = E1LINVX-MATNR CHARG = E1LINVX-CHARG WERKS = E1LINVX-WERKS IMPORTING YMCHA = LS_MCHA EXCEPTIONS NO_MATERIAL = 1 NO_BATCH = 2 NO_PLANT = 3 MATERIAL_NOT_FOUND = 4 PLANT_NOT_FOUND = 5 NO_AUTHORITY = 6 BATCH_NOT_EXIST = 7 LOCK_ON_BATCH = 8 OTHERS = 9.



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