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

MJ1ISNF02 SAP ABAP INCLUDE - Include MJ1ISF02







MJ1ISNF02 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 MJ1ISNF02 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 MJ1ISNF02. "Basic submit
SUBMIT MJ1ISNF02 AND RETURN. "Return to original report after report execution complete
SUBMIT MJ1ISNF02 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 MJ1ISF02


INCLUDES used within this REPORT MJ1ISNF02

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_LOSS_OF_DATA CALL FUNCTION 'POPUP_TO_CONFIRM_LOSS_OF_DATA' EXPORTING TEXTLINE1 = TEXT-012 * TEXTLINE2 = ' ' TITEL = TEXT-008 start_column = 25 start_row = 6 IMPORTING answer = get_answer EXCEPTIONS OTHERS = 1.

DEQUEUE_EJ_1IEXHDR CALL FUNCTION 'DEQUEUE_EJ_1IEXHDR' EXPORTING * MODE_J_1IEXCHDR = 'E' mandt = sy-mandt trntyp = 'OTHR' docyr = idata-docyr docno = idata-docno EXCEPTIONS OTHERS = 1.

DEQUEUE_EJ_1IEXDTL CALL FUNCTION 'DEQUEUE_EJ_1IEXDTL' EXPORTING * MODE_J_1IEXCDTL = 'E' mandt = sy-mandt trntyp = 'OTHR' docyr = idata-docyr docno = idata-docno * ZEILE = J_1IEXCDTL-ZEILE EXCEPTIONS OTHERS = 1.

J_1I6_MESSAGE call function 'J_1I6_MESSAGE' exporting arbgb = '8I' msgnr = '595' def_msgty = 'W'
exceptions others = 1.

J_1I6_UNIT_CONVERSION CALL FUNCTION 'J_1I6_UNIT_CONVERSION' EXPORTING matnr_imp = WA1_mseg-matnr unit_new_imp = mseg-meins unit_old_imp = WA_excdtl-meins value_old_imp = WA_excdtl-credit_qty IMPORTING value_new_exp = WA_excdtl-credit_qty EXCEPTIONS overflow = 1 OTHERS = 2.

J_1I6_DETERMINE_EXCISE_RATE CALL FUNCTION 'J_1I6_DETERMINE_EXCISE_RATE' EXPORTING bukrs = WA1_mseg-bukrs werks = WA1_mseg-werks matnr = WA1_mseg-matnr vendor = sheader-lifnr kalsm = WA_t005-kalsm mwskz = WA_t001-mwskv tax_date = sy-datum menge = WA1_mseg-menge kawrt = excitm-exbas unit = WA1_mseg-meins IMPORTING exc_amount = excitm-bed exc_perc = excitm-bedrat add_amount = excitm-aed add_perc = excitm-aedrat sed_amount = excitm-sed sed_perc = excitm-sedrat EXCEPTIONS chapter_id_missing = 1 company_data_not_setup = 2 tax_proc_invalid = 3 excind_missing = 4 vendor_missing = 5 taxcode_invalid = 6 excise_rate_missing = 7 OTHERS = 8.

J_1I6_DETERMINE_EXCISE_RATE CALL FUNCTION 'J_1I6_DETERMINE_EXCISE_RATE' EXPORTING bukrs = j1is200-bukrs werks = j1is200-werks matnr = excitm-matnr vendor = buss_partnr "sheader-kunnr mwskz = j_1iexcdef-j_1itxcode menge = excitm-fkimg kawrt = excitm-exbas unit = excitm-meins IMPORTING exc_amount = excitm-bed exc_perc = excitm-bedrat add_amount = excitm-aed add_perc = excitm-aedrat sed_amount = excitm-sed sed_perc = excitm-sedrat EXCEPTIONS chapter_id_missing = 1 company_data_not_setup = 2 tax_proc_invalid = 3 excind_missing = 4 vendor_missing = 5 taxcode_invalid = 6 excise_rate_missing = 7 OTHERS = 8.

NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = '01' object = 'J_1IINTNUM' quantity = '1' * SUBOBJECT = ' ' toyear = idata-exyear * IGNORE_BUFFER = ' ' IMPORTING number = idata-docno * quantity = returncode = rc 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.

J_1I6_DETERMINE_EXC_YEAR CALL FUNCTION 'J_1I6_DETERMINE_EXC_YEAR' EXPORTING i_bukrs = y_bukrs IMPORTING excise_year = idata-exyear EXCEPTIONS miss_company = 1 OTHERS = 2.

J_1I6_DETERMINE_ACCOUNT * CALL FUNCTION 'J_1I6_DETERMINE_ACCOUNT' * EXPORTING * bukrs = y_bukrs * werks = y_werks * excgrp = sheader-exgrp * trntyp = 'OTHR' * strtyp = sheader-strtyp * indicator = 'B' * TABLES * excacc = accbal * EXCEPTIONS * OTHERS = 1.

J_1I6_CALCULATE_ACCOUNT_BAL * CALL FUNCTION 'J_1I6_CALCULATE_ACCOUNT_BAL' * EXPORTING * bukrs = y_bukrs * werks = y_werks * excgrp = sheader-exgrp * TABLES * accbal = accbal * EXCEPTIONS * excise_acc_notfound = 1 * OTHERS = 2.

ENQUEUE_EJ_1IEXHDR CALL FUNCTION 'ENQUEUE_EJ_1IEXHDR' EXPORTING * mode_j_1iexchdr = 'E' mandt = sy-mandt trntyp = 'OTHR' docyr = idata-docyr docno = idata-docno * X_TRNTYP = ' ' * X_DOCYR = ' ' * X_DOCNO = ' ' * _SCOPE = '2' * _WAIT = ' ' * _COLLECT = ' ' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

ENQUEUE_EJ_1IEXDTL CALL FUNCTION 'ENQUEUE_EJ_1IEXDTL' EXPORTING * MODE_J_1IEXCDTL = 'E' mandt = sy-mandt trntyp = 'OTHR' docyr = idata-docyr docno = idata-docno * ZEILE = * X_TRNTYP = ' ' * X_DOCYR = ' ' * X_DOCNO = ' ' * X_ZEILE = ' ' * _SCOPE = '2' * _WAIT = ' ' * _COLLECT = ' ' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

J_1I7_USEREXIT_EXCISE_BEF_SAVE CALL FUNCTION 'J_1I7_USEREXIT_EXCISE_BEF_SAVE' EXPORTING exchdr = z_1iexchdr TABLES excdtl = z_1iexcdtl EXCEPTIONS OTHERS = 1.

POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'N' TEXTLINE1 = TEXT-001 textline2 = 'the excise invoice ? ' TITEL = TEXT-002 * START_COLUMN = 25 * START_ROW = 6 IMPORTING answer = answer EXCEPTIONS OTHERS = 1.

J_1I6_UNIT_CONVERSION CALL FUNCTION 'J_1I6_UNIT_CONVERSION' EXPORTING matnr_imp = excitm-matnr unit_new_imp = excitm-meins unit_old_imp = excitm-meins-orig value_old_imp = excitm-fkimg-orig IMPORTING value_new_exp = excitm-fkimg EXCEPTIONS overflow = 1 OTHERS = 2.

J_1I6_DISPLAY_PART1_PART2 CALL FUNCTION 'J_1I6_DISPLAY_PART1_PART2' EXPORTING bukrs = wa_exchdr-bukrs trntyp = 'OTHR' docno = wa_exchdr-docno docyr = wa_exchdr-docyr * EXNUM = * EXDAT = * LIFNR = EXCEPTIONS OTHERS = 1.

J_1I6_CALCULATE_ACCOUNT_BAL CALL FUNCTION 'J_1I6_CALCULATE_ACCOUNT_BAL' EXPORTING BUKRS = J1IS200-BUKRS WERKS = J1IS200-WERKS EXCGRP = SHEADER-EXGRP TABLES ACCBAL = P_EXCACC EXCEPTIONS EXCISE_ACC_NOTFOUND = 1 OTHERS = 2.

J_1I6_DETERMINE_ACCOUNT





call function 'J_1I6_DETERMINE_ACCOUNT' exporting BUKRS = J1IS200-BUKRS WERKS = J1IS200-WERKS EXCGRP = J1IS200-EXCGRP TRNTYP = P_TRNTYP * STRTYP = p_strtyp indicator = 'B' tables EXCACC = P_EXCACC 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 MJ1ISNF02 or its description.