MJ7LGI01 SAP ABAP INCLUDE - REA Packaging: Packaging Groups, PAI Modules for SAPMJ7LG

SAP T-Codes / Example ABAP code
ABAP OO / SAP Function Modules
ABAP reports / SAP Error Messages
SAP Tables / SAP Video Training

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

Text pool values

Title: REA Packaging: Packaging Groups, PAI Modules for SAPMJ7LG

INCLUDES used within this REPORT MJ7LGI01

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:

J_7L_VOLUMEN_FLAECHEN_KLASSE ** CALL FUNCTION 'J_7L_VOLUMEN_FLAECHEN_KLASSE' ** EXPORTING ** VRPNR = J_7LKV1-VRPNR ** ENTNR = J_7LE01-ENTNR ** LAND1 = J_7LKM1-LAND1 *** bukrs = j_7lkm1-bukrs ** VPARTS = J_7LKV1-VPARTS ** SOKOA = J_7LKV1-SOKOA ** VPFORMTYP = J_7LKV1-VPFORMTYP ** LAENG = J_7LZDAT-LAENG ** BREIT = J_7LZDAT-BREIT ** HOEHE = J_7LZDAT-HOEHE ** MEABM = J_7LZDAT-MEABM ** NTGEW = J_7LZDAT-NTGEW ** GEWEI = J_7LZDAT-GEWEI ** DATUM = SY-DATUM ** IMPORTING ** VFLKL = J_7LKV1-VFLKL ** EXCEPTIONS ** NOT_FOUND = 1 ** NOT_UNIQUE = 2 ** OTHERS = 3.

J_7L_VERSCHNITT * CALL FUNCTION 'J_7L_VERSCHNITT' * EXPORTING * matnr = j_7lkv1-vrpnr * laeng = j_7lzdat-laeng * breit = j_7lzdat-breit * meabm = j_7lzdat-meabm * fmeng = j_7lkv1-fmeng * meins = j_7lkm1-meins * blfmeng = j_7lzdat-fmeng * blmeins = j_7lzdat-meins * IMPORTING * verschnitt = j_7lkv1-verschnitt * EXCEPTIONS * not_found = 1 * unit_conversion = 2 * not_fit = 3 * OTHERS = 4.

CONVERSION_EXIT_MATN1_INPUT CALL FUNCTION 'CONVERSION_EXIT_MATN1_INPUT' EXPORTING input = matnr_save IMPORTING output = matnr_save EXCEPTIONS length_error = 1 OTHERS = 2.

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING ddic_structure = tabname_save retfield = fieldname_save * PVALKEY = ' ' * DYNPPROG = ' ' * DYNPNR = ' ' * DYNPROFIELD = ' ' * STEPL = 0 window_title = text-049 value = sel_value value_org = 'S' * MULTIPLE_CHOICE = ' ' display = lv_mode * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * MARK_TAB = * IMPORTING * USER_RESET = TABLES value_tab = marm_tab * FIELD_TAB = return_tab = return_tab * DYNPFLD_MAPPING = EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.

CONVERSION_EXIT_CUNIT_INPUT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT' EXPORTING input = return_tab-fieldval IMPORTING output = sel_value EXCEPTIONS unit_not_found = 1 OTHERS = 2.

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = fieldname_save * PVALKEY = ' ' dynpprog = l_prog dynpnr = l_dynp dynprofield = feld * STEPL = 0 * WINDOW_TITLE = * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' display = lv_mode * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * MARK_TAB = * IMPORTING * USER_RESET = TABLES value_tab = t006_tab * FIELD_TAB = return_tab = return_tab * dynpfld_mapping = EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.

CONVERSION_EXIT_CUNIT_INPUT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT' EXPORTING input = sel_value IMPORTING output = meins_save EXCEPTIONS unit_not_found = 1 OTHERS = 2.

UNIT_OF_MEASUREMENT_HELP CALL FUNCTION 'UNIT_OF_MEASUREMENT_HELP' EXPORTING cucol = 0 curow = 0 dimid = 'LENGTH' display = c_display IMPORTING select_unit = j_7lzdat-meabm.

UNIT_OF_MEASUREMENT_HELP CALL FUNCTION 'UNIT_OF_MEASUREMENT_HELP' EXPORTING cucol = 0 curow = 0 dimid = 'MASS' display = c_display IMPORTING select_unit = j_7lzdat-gewei.

UNIT_OF_MEASUREMENT_HELP CALL FUNCTION 'UNIT_OF_MEASUREMENT_HELP' EXPORTING cucol = 0 curow = 0 dimid = 'AAAADL' display = c_display IMPORTING select_unit = j_7lzdat-meins.

CONVERSION_FACTOR_GET CALL FUNCTION 'CONVERSION_FACTOR_GET' EXPORTING no_type_check = 'X' unit_in = j_7lv01-meins unit_out = vpos_tab-meins * IMPORTING * ADD_CONST = * DECIMALS = * DENOMINATOR = * DIMENSION = * NUMERATOR = EXCEPTIONS conversion_not_found = 1 overflow = 2 type_invalid = 3 units_missing = 4 unit_in_not_found = 5 unit_out_not_found = 6 OTHERS = 7.

HELP_VALUES_GET_NO_DD_NAME * CALL FUNCTION 'HELP_VALUES_GET_NO_DD_NAME' * EXPORTING * cucol = 3 * curow = 0 * display = c_display * selectfield = fieldname_save * titel = text-099 * IMPORTING ** IND = * select_value = sel_value * TABLES * fields = fields_tab * full_table = vpart_tab * EXCEPTIONS * no_tablefields_in_dictionary = 1 * no_tablestructure_given = 2 * more_then_one_selectfield = 3 * no_selectfield = 4 * OTHERS = 5.

DYNP_GET_STEPL CALL FUNCTION 'DYNP_GET_STEPL' IMPORTING povstepl = stepl EXCEPTIONS stepl_not_found = 1 OTHERS = 2.

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = fieldname_save * PVALKEY = ' ' dynpprog = dynprog dynpnr = dynpnr dynprofield = 'J_7LKV1-VPARTG' stepl = stepl window_title = text-099 * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * MARK_TAB = * IMPORTING * USER_RESET = TABLES value_tab = vpart_tab * FIELD_TAB = return_tab = return_tab * DYNPFLD_MAPPING = EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = fieldname_save * PVALKEY = ' ' dynpprog = dynprog dynpnr = dynpnr dynprofield = 'J_7LKV1-VPARTS' stepl = stepl window_title = text-099 * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * MARK_TAB = * IMPORTING * USER_RESET = TABLES value_tab = vpart_tab * FIELD_TAB = return_tab = return_tab * DYNPFLD_MAPPING = EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.

HELP_VALUES_GET_NO_DD_NAME * CALL FUNCTION 'HELP_VALUES_GET_NO_DD_NAME' * EXPORTING * cucol = 3 * curow = 0 * display = c_display * selectfield = fieldname_save * titel = text-100 * IMPORTING ** IND = * select_value = sel_value * TABLES * fields = fields_tab * full_table = infok_tab * EXCEPTIONS * no_tablefields_in_dictionary = 1 * no_tablestructure_given = 2 * more_then_one_selectfield = 3 * no_selectfield = 4 * OTHERS = 5.

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = fieldname_save * PVALKEY = ' ' dynpprog = dynprog dynpnr = dynpnr dynprofield = 'J_7LKV1-INFOK' stepl = stepl window_title = text-100 * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * MARK_TAB = * IMPORTING * USER_RESET = TABLES value_tab = infok_tab * FIELD_TAB = return_tab = return_tab * DYNPFLD_MAPPING = EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.

HELP_VALUES_GET_NO_DD_NAME

* CALL FUNCTION 'HELP_VALUES_GET_NO_DD_NAME' * EXPORTING * cucol = 3 * curow = 0 * display = c_display * selectfield = fieldname_save * titel = text-101 * IMPORTING ** IND = * select_value = sel_value * TABLES * fields = fields_tab * full_table = fuellg_tab * EXCEPTIONS * no_tablefields_in_dictionary = 1 * no_tablestructure_given = 2 * more_then_one_selectfield = 3 * no_selectfield = 4 * OTHERS = 5.

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = fieldname_save * PVALKEY = ' ' dynpprog = dynprog dynpnr = dynpnr dynprofield = 'J_7LKV1-FUELLG' stepl = stepl window_title = text-101 * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * MARK_TAB = * IMPORTING * USER_RESET = TABLES value_tab = fuellg_tab * FIELD_TAB = return_tab = return_tab * DYNPFLD_MAPPING = EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.

K_KKB_LIST_FOR_ITEM_SELECTION
  CALL FUNCTION 'K_KKB_LIST_FOR_ITEM_SELECTION'
    EXPORTING
      i_title               = text-011
      i_zebra               = space
      i_screen_start_column = 29
      i_screen_start_line   = 5
      i_screen_end_column   = 72
      i_screen_end_line     = 20
*     I_CHECKBOX_FIELDNAME  =
*     I_SELECTED_LINE       =
*     I_SCROLL_TO_SEL_LINE  = 'X'
      i_tabname             = 'VPGRP_HELP_TAB'
      it_fieldcat           = t_fieldcat[]
    IMPORTING
*     es_selfield           = ls_selfield
      e_exit                = x_exit
    TABLES
      t_outtab              = vpgrp_help_tab
    EXCEPTIONS
      OTHERS                = 1.

K_KKB_LIST_FOR_ITEM_SELECTION
  CALL FUNCTION 'K_KKB_LIST_FOR_ITEM_SELECTION'
    EXPORTING
      i_title               = c_text
      i_zebra               = space
      i_screen_start_column = 29
      i_screen_start_line   = 5
      i_screen_end_column   = 77
      i_screen_end_line     = 20
*     I_CHECKBOX_FIELDNAME  =
*     I_SELECTED_LINE       =
*     I_SCROLL_TO_SEL_LINE  = 'X'
      i_tabname             = 'VRSIO_HELP_TAB'
      it_fieldcat           = t_fieldcat[]
    IMPORTING
      es_selfield           = ls_selfield
      e_exit                = x_exit
    TABLES
      t_outtab              = vrsio_help_tab
    EXCEPTIONS
      OTHERS                = 1.

HELP_VALUES_GET_NO_DD_NAME * CALL FUNCTION 'HELP_VALUES_GET_NO_DD_NAME' * EXPORTING * cucol = 3 * curow = 0 * display = c_display * selectfield = fieldname_save * titel = c_title * IMPORTING ** IND = * select_value = sel_value * TABLES * fields = fields_tab * full_table = vflkl_tab * EXCEPTIONS * no_tablefields_in_dictionary = 1 * no_tablestructure_given = 2 * more_then_one_selectfield = 3 * no_selectfield = 4 * OTHERS = 5.

J_7L_VOLUMEN_FLAECHEN_KLASSE * CALL FUNCTION 'J_7L_VOLUMEN_FLAECHEN_KLASSE' * EXPORTING * VRPNR = J_7LKV1-VRPNR * ENTNR = J_7LE01-ENTNR * LAND1 = J_7LKM1-LAND1 ** bukrs = j_7lkm1-bukrs * VPARTS = J_7LKV1-VPARTS * SOKOA = J_7LKV1-SOKOA * VPFORMTYP = J_7LKV1-VPFORMTYP * LAENG = J_7LZDAT-LAENG * BREIT = J_7LZDAT-BREIT * HOEHE = J_7LZDAT-HOEHE * MEABM = J_7LZDAT-MEABM * NTGEW = J_7LZDAT-NTGEW * GEWEI = J_7LZDAT-GEWEI * DATUM = SY-DATUM * IMPORTING * VFLKL = J_7LKV1-VFLKL * EXCEPTIONS * NOT_FOUND = 1 * NOT_UNIQUE = 2 * OTHERS = 3.

J_7L_VERSCHNITT CALL FUNCTION 'J_7L_VERSCHNITT' EXPORTING matnr = j_7lkv1-vrpnr laeng = j_7lzdat-laeng breit = j_7lzdat-breit meabm = j_7lzdat-meabm fmeng = j_7lkv1-fmeng meins = j_7lkm1-meins blfmeng = j_7lzdat-fmeng blmeins = j_7lzdat-meins IMPORTING verschnitt = j_7lkv1-verschnitt EXCEPTIONS not_found = 1 unit_conversion = 2 not_fit = 3 OTHERS = 4.

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = fieldname_save * PVALKEY = ' ' dynpprog = l_prog dynpnr = l_dynp dynprofield = 'J_7LKM1-BUKRS' "#EC NOTEXT * STEPL = 0 window_title = text-093 * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' display = c_display * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * MARK_TAB = * IMPORTING * USER_RESET = TABLES value_tab = rbukr_tab * FIELD_TAB = return_tab = return_tab * DYNPFLD_MAPPING = EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = fieldname_save * PVALKEY = ' ' dynpprog = dynprog dynpnr = dynpnr * dynprofield = 'J_7LKM1-ENTNA' * stepl = stepl window_title = text-200 * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * MARK_TAB = * IMPORTING * USER_RESET = TABLES value_tab = entna_land_tab * field_tab = field_tab return_tab = return_tab dynpfld_mapping = dynfield_map EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.

F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING ddic_structure = tabname retfield = retfield dynpprog = l_prog dynpnr = l_dynp dynprofield = feld window_title = window_title value_org = 'S' display = lv_mode TABLES value_tab = .

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

MJ7LGI01 - REA Packaging: Packaging Groups, PAI Modules for SAPMJ7LG
MJ7LGF01 - REA Packaging: Packaging Groups FORMs to SAPMJ7LG
MJ7LFTOP - Include MJ7LKTOP
MJ7LFO01 - Include MJ7LKO01
MJ7LFI01 - Include MJ7LKI01
MJ7LFF01 - Include MJ7LKF01

MF05AHLP_F4_NEWKO

MJ59AI0D

MHIER_CAT_GUID_DISPLAY_F04

MF60CF00_WIRTSCHAFTSEINHEIT