SAP Reports / Programs | Financial Accounting | Localization(FI-LOC) SAP FI

Home SAP Development ABAP Coding SAP Fiori SAP Training SAP Tables SAP Objects...

MJ1IGF01 SAP ABAP INCLUDE - Include MZRAJF01

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

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

Text pool values

Title: Include MZRAJF01

INCLUDES used within this REPORT MJ1IGF01

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:

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'N' textline1 = text-015 textline2 = text-014 titel = text-013 IMPORTING answer = data_loss_flag EXCEPTIONS OTHERS = 1.

J_1I6_MESSAGE CALL FUNCTION 'J_1I6_MESSAGE' EXPORTING arbgb = '8I' msgnr = '695' def_msgty = 'W' msgtx1 = l_exgrp msgtx2 = l_werks.

ENQUEUE_EMMKPF CALL FUNCTION 'ENQUEUE_EMMKPF' EXPORTING MBLNR = t_header-mblnr MJAHR = t_header-mjahr EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2 OTHERS = 3.

ENQUEUE_EJ_1IEXHDR CALL FUNCTION 'ENQUEUE_EJ_1IEXHDR' EXPORTING TRNTYP = 'GRPO' DOCYR = t_header-docyr DOCNO = t_header-docno EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2 OTHERS = 3.

DEQUEUE_EMMKPF CALL FUNCTION 'DEQUEUE_EMMKPF' EXPORTING MODE_MKPF = 'E' MANDT = SY-MANDT MBLNR = t_header-mblnr MJAHR = t_header-mjahr.

DEQUEUE_EJ_1IEXHDR CALL FUNCTION 'DEQUEUE_EJ_1IEXHDR' EXPORTING TRNTYP = 'GRPO' DOCYR = t_header-docyr DOCNO = t_header-docno.

CONVERSION_EXIT_CUNIT_OUTPUT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING INPUT = t_item-meins LANGUAGE = SY-LANGU IMPORTING * LONG_TEXT = OUTPUT = t_item-meins * SHORT_TEXT = EXCEPTIONS UNIT_NOT_FOUND = 1 OTHERS = 2.

J_1I6_DETERMINE_EXCISE_RATE CALL FUNCTION 'J_1I6_DETERMINE_EXCISE_RATE' EXPORTING bukrs = t_header-bukrs werks = t_item-werks matnr = t_item-matnr vendor = t_header-shipfrom kalsm = t005-kalsm mwskz = j_1iexcdef-j_1itxcode menge = t_item-menge kawrt = 0 unit = t_item-meins IMPORTING exc_amount = t_local_exc-exbed exc_perc = t_local_exc-bedrate ECS_AMOUNT = t_local_exc-ecs "Note 1175362 ECS_PERC = t_local_exc-ecsrate "Note 1175362 * 2006 new taxes BEGIN EXADDTAX1_AMOUNT = t_local_exc-EXADDTAX1 EXADDTAX1_PERC = t_local_exc-EXADDRATE1 EXADDTAX2_AMOUNT = t_local_exc-EXADDTAX2 EXADDTAX2_PERC = t_local_exc-EXADDRATE2 EXADDTAX3_AMOUNT = t_local_exc-EXADDTAX3 EXADDTAX3_PERC = t_local_exc-EXADDRATE3 * 2006 new taxes end add_amount = t_local_exc-exaed add_perc = t_local_exc-aedrate sed_amount = t_local_exc-exsed sed_perc = t_local_exc-sedrate cess_amount = t_local_exc-cess cess_perc = t_local_exc-cessrate *NCCD changes starts nccd_amount = t_local_exc-nccd nccd_perc = t_local_exc-nccdrate *NCCD changes ends EXCEPTIONS chapter_id_missing = 1 vendor_missing = 5 excise_rate_missing = 7 OTHERS = 8.

J_1I4_GET_ECESS CALL FUNCTION 'J_1I4_GET_ECESS' EXPORTING * Y_KOMK = * Y_KOMP = e_bed_amount = t_local_exc-exbed e_aed_amount = t_local_exc-exaed e_sed_amount = t_local_exc-exsed cess = t_local_exc-cess e_nccd_amount = t_local_exc-nccd E_ECS = t_local_exc-ecs "Note 1175362 E_ECS_RATE = t_local_exc-ecsrate "Note 1175362 IMPORTING x_ecs = t_local_exc-ecs x_ecs_rate = t_local_exc-ecsrate.

CONVERSION_EXIT_CUNIT_OUTPUT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING INPUT = t_item-meins LANGUAGE = SY-LANGU IMPORTING * LONG_TEXT = OUTPUT = temp_meins * SHORT_TEXT = * EXCEPTIONS * UNIT_NOT_FOUND = 1 * OTHERS = 2 .

J_1I6_MESSAGE CALL FUNCTION 'J_1I6_MESSAGE' EXPORTING arbgb = '8I' msgnr = '647' DEF_MSGTY = 'W'.

J_1I6_MESSAGE CALL FUNCTION 'J_1I6_MESSAGE' EXPORTING arbgb = '8I' msgnr = '647' def_msgty = 'W'.

CONVERSION_EXIT_CUNIT_OUTPUT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = t_item-meins language = sy-langu IMPORTING * LONG_TEXT = output = t_item-meins * SHORT_TEXT = EXCEPTIONS unit_not_found = 1 OTHERS = 2.

J_1I6_MESSAGE CALL FUNCTION 'J_1I6_MESSAGE' EXPORTING arbgb = '8I' msgnr = '647' DEF_MSGTY = 'W'.

J_1I6_MESSAGE CALL FUNCTION 'J_1I6_MESSAGE' EXPORTING arbgb = '8I' msgnr = '647' def_msgty = 'W'.

CONVERSION_EXIT_CUNIT_OUTPUT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = t_item-meins language = sy-langu IMPORTING * LONG_TEXT = OUTPUT = t_item-meins * SHORT_TEXT = EXCEPTIONS UNIT_NOT_FOUND = 1 OTHERS = 2.

J_1I6_UNIT_CONVERSION CALL FUNCTION 'J_1I6_UNIT_CONVERSION' EXPORTING matnr_imp = t_item-matnr unit_new_imp = t_local_exc-mengr_uom unit_old_imp = t_local_exc-meins value_old_imp = t_local_exc-menge IMPORTING value_new_exp = converted_qty EXCEPTIONS overflow = 1 OTHERS = 2.

J_1I6_UNIT_CONVERSION

CALL FUNCTION 'J_1I6_UNIT_CONVERSION' EXPORTING matnr_imp = t_item-matnr unit_new_imp = t_local_exc-mengr_uom unit_old_imp = t_local_exc-meins value_old_imp = tj_1iexcdtl-menge IMPORTING value_new_exp = converted_qty EXCEPTIONS overflow = 1 OTHERS = 2.

J_1I6_MESSAGE_TYPE CALL FUNCTION 'J_1I6_MESSAGE_TYPE' EXPORTING ARBGB = '8I' MSGNR = '669' CHANGING DEF_MSGTY = j_msgty.

J_1I6_MESSAGE_TYPE CALL FUNCTION 'J_1I6_MESSAGE_TYPE' EXPORTING ARBGB = '8I' MSGNR = '347' CHANGING DEF_MSGTY = j_msgty.

J_1I6_MESSAGE
    CALL FUNCTION 'J_1I6_MESSAGE'
      EXPORTING
        arbgb     = '8I'
        msgnr     = '540'
        def_msgty = 'W'
        msgtx1    = msg_exnum
        msgtx2    = msg_exdat
        msgtx3    = msg_zeile.

J_1I6_MESSAGE
    CALL FUNCTION 'J_1I6_MESSAGE'
      EXPORTING
        arbgb     = '8I'
        msgnr     = '540'
        def_msgty = 'W'
        msgtx1    = msg_exnum
        msgtx2    = msg_exdat
        msgtx3    = msg_zeile.

J_1I4_GET_ECESS CALL FUNCTION 'J_1I4_GET_ECESS' EXPORTING * Y_KOMK = * Y_KOMP = E_BED_AMOUNT = t_local_exc-exbed E_AED_AMOUNT = t_local_exc-exaed E_SED_AMOUNT = t_local_exc-exsed CESS = t_local_exc-cess E_NCCD_AMOUNT = t_local_exc-nccd E_ECS = t_local_exc-ecs "Note 1175362 * E_BED_INVENTORY = * E_AED_INVENTORY = * E_SED_INVENTORY = * E_NCCD_INVENTORY = * E_ECS_INVENTORY = E_ECS_RATE = t_local_exc-ecsrate "Note 1175362 * ADDLDATA1 = * ADDLDATA2 = * ADDLDATA3 = * ADDLDATA4 = * ADDLVAL1 = * ADDLVAL2 = * ADDLVAL3 = * ADDLVAL4 = IMPORTING X_ECS = t_local_exc-ecs x_ecs_rate = t_local_exc-ecsrate.

J_1I7_USEREXIT_UNIT_MULTIPLE CALL FUNCTION 'J_1I7_USEREXIT_UNIT_MULTIPLE' * changes for uom conversion at depot * EXPORTING * E_MENGE = T_LOCAL_EXC-MENGE * E_MENGA = T_LOCAL_EXC-MENGA * E_MEINS = T_LOCAL_EXC-MEINS * E_MENGR_UOM = T_LOCAL_EXC-MENGR_UOM * E_MENGE_ITEM = T_ITEM-MENGE * E_MEINS_ITEM = T_ITEM-MEINS * IMPORTING * X_MENGE_ITEM = T_ITEM-MENGE * X_MEINS_ITEM = T_ITEM-MEINS * X_MENGE = T_LOCAL_EXC-MENGE * X_MENGA = T_LOCAL_EXC-MENGA * TABLES * X_MSEG = IT_MSEG.

J_1I6_UNIT_CONVERSION CALL FUNCTION 'J_1I6_UNIT_CONVERSION' EXPORTING matnr_imp = t_item-matnr unit_new_imp = t_item-meins unit_old_imp = t_local_exc-meins value_old_imp = t_local_exc-menge IMPORTING value_new_exp = converted_qty EXCEPTIONS overflow = 1 OTHERS = 2.

J_1I7_USEREXIT_UNIT_MULTIPLE CALL FUNCTION 'J_1I7_USEREXIT_UNIT_MULTIPLE'
* changes for uom conversion at depot * EXPORTING * E_MENGE = T_LOCAL_EXC-MENGE * E_MENGA = T_LOCAL_EXC-MENGA * E_MEINS = T_LOCAL_EXC-MEINS * E_MENGR_UOM = T_LOCAL_EXC-MENGR_UOM * E_MENGE_ITEM = T_ITEM-MENGE * E_MEINS_ITEM = T_ITEM-MEINS * IMPORTING * X_MENGE_ITEM = T_ITEM-MENGE * X_MEINS_ITEM = T_ITEM-MEINS * X_MENGE = T_LOCAL_EXC-MENGE * X_MENGA = T_LOCAL_EXC-MENGA * TABLES * X_MSEG = IT_MSEG.

J_1I7_USEREXIT_UNIT_CONVERSION CALL FUNCTION 'J_1I7_USEREXIT_UNIT_CONVERSION' EXPORTING x_mblnr = t_header-mblnr x_mjahr = t_header-mjahr x_zeile = t_item-zeile x_msehi = t_local_exc-meins CHANGING x_menge = t_item-menge x_meins = t_item-meins.

J_1I6_MESSAGE
    CALL FUNCTION 'J_1I6_MESSAGE'
      EXPORTING
        arbgb     = '8I'
        msgnr     = '539'
        def_msgty = 'W'
        msgtx1    = msg_txt1
        msgtx2    = msg_txt2
      EXCEPTIONS
        OTHERS    = 1.

J_1I6_MESSAGE CALL FUNCTION 'J_1I6_MESSAGE' EXPORTING arbgb = '8I' msgnr = '577' DEF_MSGTY = 'W'.

J_1I7_USEREXIT_EXCISE_BEF_SAVE CALL FUNCTION 'J_1I7_USEREXIT_EXCISE_BEF_SAVE' EXPORTING exchdr = j_1iexchdr TABLES excdtl = tj_1iexcdtl EXCEPTIONS OTHERS = 1.

J_1I7_USEREXIT_DEPOT_BEF_SAVE CALL FUNCTION 'J_1I7_USEREXIT_DEPOT_BEF_SAVE' TABLES rg23d = tj_1irg23d EXCEPTIONS OTHERS = 1.

J_1I6_DETERMINE_EXC_YEAR CALL FUNCTION 'J_1I6_DETERMINE_EXC_YEAR' EXPORTING i_bukrs = t_header-bukrs i_budat = t_header-exdat " Note 1357678 IMPORTING excise_year = t_header-exyear EXCEPTIONS miss_company = 1 OTHERS = 2.

CONVERSION_EXIT_CUNIT_INPUT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT' EXPORTING INPUT = tj_1irg23d-meins LANGUAGE = SY-LANGU IMPORTING OUTPUT = tj_1irg23d-meins EXCEPTIONS UNIT_NOT_FOUND = 1 OTHERS = 2.

CONVERSION_EXIT_CUNIT_INPUT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT' EXPORTING INPUT = tj_1iexcdtl-mengr_uom LANGUAGE = SY-LANGU IMPORTING OUTPUT = tj_1iexcdtl-mengr_uom EXCEPTIONS UNIT_NOT_FOUND = 1 OTHERS = 2.

CONVERSION_EXIT_CUNIT_INPUT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT' EXPORTING INPUT = tj_1iexcdtl-meins LANGUAGE = SY-LANGU IMPORTING OUTPUT = tj_1iexcdtl-meins EXCEPTIONS UNIT_NOT_FOUND = 1 OTHERS = 2.

NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = '01' object = 'J_1IINTNUM' quantity = '1' toyear = t_header-exyear IMPORTING number = t_header-docno EXCEPTIONS interval_not_found = 1 number_range_not_intern = 2 object_not_found = 3 quantity_is_0 = 4 quantity_is_not_1 = 5 interval_overflow = 6 OTHERS = 7.

CONVERSION_EXIT_CUNIT_OUTPUT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING INPUT = t_excinv-mengr_uom LANGUAGE = SY-LANGU IMPORTING * LONG_TEXT = OUTPUT = t_excinv-mengr_uom * SHORT_TEXT = EXCEPTIONS UNIT_NOT_FOUND = 1 OTHERS = 2.

NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = '01' object = 'J_1IRG23D' subobject = j_1iexchdr-exgrp quantity = '1' toyear = t_header-exyear IMPORTING number = tj_1irg23d-folio EXCEPTIONS interval_not_found = 1 interval_overflow = 6 OTHERS = 7.

J_1I6_UNIT_CONVERSION CALL FUNCTION 'J_1I6_UNIT_CONVERSION' EXPORTING matnr_imp = t_item-matnr unit_new_imp = t_local_exc-meins unit_old_imp = t_item-meins value_old_imp = t_item-menge IMPORTING value_new_exp = converted_qty EXCEPTIONS overflow = 1 OTHERS = 2.

J_1I6_UNIT_CONVERSION CALL FUNCTION 'J_1I6_UNIT_CONVERSION' EXPORTING matnr_imp = t_item-matnr unit_new_imp = t_local_exc-meins unit_old_imp = t_item-meins value_old_imp = tj_1iexcdtl-menge IMPORTING value_new_exp = converted_qty EXCEPTIONS overflow = 1 OTHERS = 2.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING text_question = cancel_text IMPORTING ANSWER = v_answer EXCEPTIONS TEXT_NOT_FOUND = 1 OTHERS = 2.

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

MJ1IGF01 - Include MZRAJF01
MJ1IGATOP - Include MJ1IGATOP
MJ1IGAO01 - Include MJ1IGAO01
MJ1IGAI01 - Include MJ1IGAI01
MJ1IGAF01 - Include MJ1IGAF01
MJ1IFTOP - Global Data declaration for SAPMJ1If

MDS_PCL_MAP_ME_TRKORR_SCR0100

MGCU0I98_D198_PROCESS_OK_CODE

MF60B_CHANGE_KONT_KENNZEICHF01

MFITPTOP

MF64OO10_0250_INIT

MEREPMI_MSD_TBCTRL_DATA

MGCU0F02_D143_OK_CODE

MF60CI_OK_CODE_OBJ_BROWSER