MJ1ISF02 SAP ABAP INCLUDE - Include MJ1ISF02
MJ1ISF02 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 MJ1ISF02 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 MJ1ISF02. "Basic submit
SUBMIT MJ1ISF02 AND RETURN. "Return to original report after report execution complete
SUBMIT MJ1ISF02 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 MJ1ISF02
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-010 * 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.
REUSE_ALV_POPUP_TO_SELECT CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT' " Note 1171020 EXPORTING " Note 1171020 i_title = text-029 "Select document " Note 1171020 i_selection = c_mark " Note 1171020 i_zebra = c_mark " Note 1171020 i_screen_start_column = 30 " Note 1171020 i_screen_start_line = 5 " Note 1171020 i_screen_end_column = 70 " Note 1171020 i_screen_end_line = 20 " Note 1171020 i_scroll_to_sel_line = c_mark " Note 1171020 i_tabname = c_it_mseg " Note 1171020 it_fieldcat = it_fieldcat " Note 1171020 i_callback_program = sy-repid " Note 1171020 IMPORTING " Note 1171020 es_selfield = is_selfield " Note 1171020 TABLES " Note 1171020 t_outtab = it_mseg " Note 1171020 EXCEPTIONS " Note 1171020 program_error = 1 " Note 1171020 OTHERS = 2. " Note 1171020
J_1I6_MESSAGE CALL FUNCTION 'J_1I6_MESSAGE' " Note 1171020 EXPORTING " Note 1171020 arbgb = '8I' " Note 1171020 msgnr = '595' " Note 1171020 def_msgty = 'W' " Note 1171020 EXCEPTIONS " Note 1171020 OTHERS = 1. " Note 1171020
J_1I6_MESSAGE * CALL FUNCTION 'J_1I6_MESSAGE' * EXPORTING * arbgb = '8I' * msgnr = '595' * def_msgty = 'W' ** msgtx1 = msg_text ** MSGTX2 = ** MSGTX3 = ** MSGTX4 = * EXCEPTIONS * OTHERS = 1.
J_1I6_UNIT_CONVERSION * CALL FUNCTION 'J_1I6_UNIT_CONVERSION' * EXPORTING * matnr_imp = mseg-matnr * unit_new_imp = mseg-meins * unit_old_imp = j_1iexcdtl-meins * value_old_imp = j_1iexcdtl-credit_qty * IMPORTING * value_new_exp = j_1iexcdtl-credit_qty * EXCEPTIONS * overflow = 1 * OTHERS = 2.
J_1I6_DETERMINE_EXCISE_RATE * CALL FUNCTION 'J_1I6_DETERMINE_EXCISE_RATE' * EXPORTING * bukrs = mseg-bukrs * werks = mseg-werks * matnr = mseg-matnr * vendor = sheader-lifnr * kalsm = t005-kalsm * mwskz = t001-mwskv * tax_date = sy-datlo * menge = mseg-menge * kawrt = excitm-exbas * unit = 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_1I_DETERMINE_CONDITION_DEF CALL FUNCTION 'J_1I_DETERMINE_CONDITION_DEF' EXPORTING ar_ap = 'AR' kalsm = t005-kalsm taxproc = t005-kalsm bukrs = mseg-bukrs IMPORTING cond_flag = l_update_cond.
J_1I6_DETERMINE_EXCISE_RATE CALL FUNCTION 'J_1I6_DETERMINE_EXCISE_RATE' EXPORTING bukrs = mseg-bukrs werks = mseg-werks matnr = mseg-matnr vendor = sheader-lifnr kalsm = t005-kalsm mwskz = t001-mwskv tax_date = sy-datlo menge = mseg-menge kawrt = excitm-exbas unit = mseg-meins IMPORTING exc_amount = excitm-bed exc_perc = excitm-bedrat ECS_AMOUNT = excitm-ecs "Note 1175362 ECS_PERC = excitm-ecsrat "Note 1175362 *2006 new taxes begin exaddtax1_amount = excitm-tax1amt exaddtax1_perc = excitm-tax1rat exaddtax2_amount = excitm-tax2amt exaddtax2_perc = excitm-tax2rat exaddtax3_amount = excitm-tax3amt exaddtax3_perc = excitm-tax3rat *2006 new taxes end add_amount = excitm-aed add_perc = excitm-aedrat sed_amount = excitm-sed sed_perc = excitm-sedrat *NCCD chnages starts nccd_amount = excitm-nccd nccd_perc = excitm-nccdrat *NCCD changes ends 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_1I4A_DETERMINE_NEW_RATE CALL FUNCTION 'J_1I4A_DETERMINE_NEW_RATE' EXPORTING usage = 'A' application = 'TX' calc_date = sy-datlo procedure = t005-kalsm bukrs = mseg-bukrs werks = mseg-werks matnr = mseg-matnr vendor = sheader-lifnr menge = mseg-menge kawrt = excitm-exbas unit = mseg-meins IMPORTING exc_amount = excitm-bed exc_perc = excitm-bedrat *2006 new taxes begin exaddtax1_amount = excitm-tax1amt exaddtax1_perc = excitm-tax1rat exaddtax2_amount = excitm-tax2amt exaddtax2_perc = excitm-tax2rat exaddtax3_amount = excitm-tax3amt exaddtax3_perc = excitm-tax3rat *2006 new taxes end add_amount = excitm-aed add_perc = excitm-aedrat sed_amount = excitm-sed sed_perc = excitm-sedrat *NCCD chnages starts nccd_amount = excitm-nccd nccd_perc = excitm-nccdrat *NCCD changes ends *ECS chnages starts ecs_amount = excitm-ecs ecs_perc = excitm-ecsrat *ECS changes ends cess_amount = excitm-cess cess_perc = excitm-cesrat.
J_1I4_GET_ECESS CALL FUNCTION 'J_1I4_GET_ECESS' EXPORTING E_BED_AMOUNT = EXCITM-BED E_AED_AMOUNT = EXCITM-AED E_SED_AMOUNT = EXCITM-SED E_NCCD_AMOUNT = EXCITM-NCCD CESS = excitm-cess e_ecs = excitm-ecs "Note 1175362 e_ecs_rate = excitm-ecsrat "Note 1175362 IMPORTING X_ECS = EXCITM-ECS X_ECS_RATE = EXCITM-ECSRAT EXCEPTIONS others = 1.
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.
J_1I_DETERMINE_CONDITION_DEF CALL FUNCTION 'J_1I_DETERMINE_CONDITION_DEF' EXPORTING ar_ap = 'AR' kalsm = t005-kalsm taxproc = t005-kalsm bukrs = mseg-bukrs IMPORTING cond_flag = l_update_cond.
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 ecs_amount = excitm-ecs "Note 1175362 ecs_perc = excitm-ecsrat "Note 1175362 *2006 new changes begin exaddtax1_amount = excitm-tax1amt exaddtax1_perc = excitm-tax1rat exaddtax2_amount = excitm-tax2amt exaddtax2_perc = excitm-tax2rat exaddtax3_amount = excitm-tax3amt exaddtax3_perc = excitm-tax3rat *2006 new changes end add_amount = excitm-aed add_perc = excitm-aedrat sed_amount = excitm-sed sed_perc = excitm-sedrat *NCCD chnages starts nccd_amount = excitm-nccd nccd_perc = excitm-nccdrat *NCCD changes ends 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_1I4A_DETERMINE_NEW_RATE CALL FUNCTION 'J_1I4A_DETERMINE_NEW_RATE' EXPORTING usage = 'A' application = 'TX' calc_date = sy-datlo procedure = t005-kalsm bukrs = j1is200-bukrs werks = j1is200-werks matnr = excitm-matnr vendor = buss_partnr "sheader-kunnr menge = excitm-fkimg kawrt = excitm-exbas unit = excitm-meins IMPORTING exc_amount = excitm-bed exc_perc = excitm-bedrat ecs_amount = excitm-ecs "Note 1175362 ecs_perc = excitm-ecsrat "Note 1175362 *2006 new changes begin exaddtax1_amount = excitm-tax1amt exaddtax1_perc = excitm-tax1rat exaddtax2_amount = excitm-tax2amt exaddtax2_perc = excitm-tax2rat exaddtax3_amount = excitm-tax3amt exaddtax3_perc = excitm-tax3rat *2006 new changes end add_amount = excitm-aed add_perc = excitm-aedrat sed_amount = excitm-sed sed_perc = excitm-sedrat *NCCD chnages starts nccd_amount = excitm-nccd nccd_perc = excitm-nccdrat *NCCD changes ends cess_amount = excitm-cess cess_perc = excitm-cesrat.
J_1I4_GET_ECESS CALL FUNCTION 'J_1I4_GET_ECESS' EXPORTING E_BED_AMOUNT = EXCITM-BED E_AED_AMOUNT = EXCITM-AED E_SED_AMOUNT = EXCITM-SED E_NCCD_AMOUNT = EXCITM-NCCD CESS = excitm-cess e_ecs = excitm-ecs "Note 1175362 e_ecs_rate = excitm-ecsrat "Note 1175362 IMPORTING X_ECS = EXCITM-ECS X_ECS_RATE = EXCITM-ECSRAT EXCEPTIONS others = 1.
J_1I6_ROUND_TO_NEAREST_AMT call function 'J_1I6_ROUND_TO_NEAREST_AMT' EXPORTING i_amount = total-bed IMPORTING e_amount = total-bed EXCEPTIONS OTHERS = 1.
call function 'J_1I6_ROUND_TO_NEAREST_AMT' EXPORTING i_amount = total-tax1amt IMPORTING e_amount = total-tax1amt EXCEPTIONS OTHERS = 1.
J_1I6_ROUND_TO_NEAREST_AMT call function 'J_1I6_ROUND_TO_NEAREST_AMT' EXPORTING i_amount = total-tax2amt IMPORTING e_amount = total-tax2amt EXCEPTIONS OTHERS = 1.
J_1I6_ROUND_TO_NEAREST_AMT call function 'J_1I6_ROUND_TO_NEAREST_AMT' EXPORTING i_amount = total-tax3amt IMPORTING e_amount = total-tax3amt EXCEPTIONS OTHERS = 1.
J_1I6_ROUND_TO_NEAREST_AMT call function 'J_1I6_ROUND_TO_NEAREST_AMT' EXPORTING i_amount = total-aed IMPORTING e_amount = total-aed EXCEPTIONS OTHERS = 1.
J_1I6_ROUND_TO_NEAREST_AMT call function 'J_1I6_ROUND_TO_NEAREST_AMT' EXPORTING i_amount = total-sed IMPORTING e_amount = total-sed EXCEPTIONS OTHERS = 1.
J_1I6_ROUND_TO_NEAREST_AMT call function 'J_1I6_ROUND_TO_NEAREST_AMT' EXPORTING i_amount = total-ecs IMPORTING e_amount = total-ecs EXCEPTIONS OTHERS = 1.
J_1I6_ROUND_TO_NEAREST_AMT call function 'J_1I6_ROUND_TO_NEAREST_AMT' EXPORTING i_amount = total-nccd IMPORTING e_amount = total-nccd EXCEPTIONS OTHERS = 1.
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 i_budat = J1IS200-PDATE IMPORTING excise_year = idata-exyear EXCEPTIONS miss_company = 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 IMPORTING 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_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 = y_excitm-bedrat ** add_amount = excitm-aed * add_perc = y_excitm-aedrat ** sed_amount = excitm-sed * sed_perc = y_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_1I_DETERMINE_CONDITION_DEF CALL FUNCTION 'J_1I_DETERMINE_CONDITION_DEF' EXPORTING ar_ap = 'AR' kalsm = t005-kalsm taxproc = t005-kalsm bukrs = mseg-bukrs IMPORTING cond_flag = l_update_cond.
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 mwskz = j_1iexcdef-j_1itxcode menge = excitm-fkimg kawrt = excitm-exbas unit = excitm-meins IMPORTING * exc_amount = excitm-bed exc_perc = y_excitm_bedrat *2006 new taxes begin * EXADDTAX1_PERC = y_excitm_tax1rat EXADDTAX2_PERC = y_excitm_tax2rat EXADDTAX3_PERC = y_excitm_tax3rat *2006 new taxes end * add_amount = excitm-aed add_perc = y_excitm_aedrat * sed_amount = excitm-sed sed_perc = y_excitm_sedrat * NCCD changes starts nccd_perc = y_excitm-nccdrat * NCCD changes ends
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_1I4A_DETERMINE_NEW_RATE CALL FUNCTION 'J_1I4A_DETERMINE_NEW_RATE' EXPORTING usage = 'A' application = 'TX' calc_date = sy-datlo procedure = t005-kalsm bukrs = j1is200-bukrs werks = j1is200-werks matnr = excitm-matnr vendor = buss_partnr menge = excitm-fkimg kawrt = excitm-exbas unit = excitm-meins IMPORTING * exc_amount = excitm-bed exc_perc = y_excitm_bedrat *2006 new taxes begin * EXADDTAX1_PERC = y_excitm_tax1rat EXADDTAX2_PERC = y_excitm_tax2rat EXADDTAX3_PERC = y_excitm_tax3rat *2006 new taxes end * add_amount = excitm-aed add_perc = y_excitm_aedrat * sed_amount = excitm-sed sed_perc = y_excitm_sedrat * NCCD changes starts nccd_perc = y_excitm-nccdrat.
J_1I6_DETERMINE_EXCISE_RATE * CALL FUNCTION 'J_1I6_DETERMINE_EXCISE_RATE' * EXPORTING * bukrs = mseg-bukrs * werks = mseg-werks * matnr = mseg-matnr * vendor = sheader-lifnr * kalsm = t005-kalsm * mwskz = t001-mwskv * tax_date = sy-datlo * menge = mseg-menge * kawrt = excitm-exbas * unit = mseg-meins * IMPORTING ** exc_amount = excitm-bed * exc_perc = y_excitm-bedrat ** add_amount = excitm-aed * add_perc = y_excitm-aedrat ** sed_amount = excitm-sed * sed_perc = y_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_1I_DETERMINE_CONDITION_DEF CALL FUNCTION 'J_1I_DETERMINE_CONDITION_DEF' EXPORTING ar_ap = 'AR' kalsm = t005-kalsm taxproc = t005-kalsm bukrs = mseg-bukrs IMPORTING cond_flag = l_update_cond.
J_1I6_DETERMINE_EXCISE_RATE CALL FUNCTION 'J_1I6_DETERMINE_EXCISE_RATE' EXPORTING bukrs = mseg-bukrs werks = mseg-werks matnr = mseg-matnr vendor = sheader-lifnr kalsm = t005-kalsm mwskz = t001-mwskv tax_date = sy-datlo menge = mseg-menge kawrt = excitm-exbas unit = mseg-meins IMPORTING * exc_amount = excitm-bed exc_perc = y_excitm_bedrat *2006 new taxes begin EXADDTAX1_PERC = y_excitm_tax1rat EXADDTAX2_PERC = y_excitm_tax2rat EXADDTAX3_PERC = y_excitm_tax3rat *2006 new taxes end
* add_amount = excitm-aed add_perc = y_excitm_aedrat * sed_amount = excitm-sed sed_perc = y_excitm_sedrat * NCCD changes starts nccd_perc = y_excitm-nccdrat * NCCD changes ends
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_1I4A_DETERMINE_NEW_RATE CALL FUNCTION 'J_1I4A_DETERMINE_NEW_RATE' EXPORTING usage = 'A' application = 'TX' calc_date = sy-datlo procedure = t005-kalsm bukrs = mseg-bukrs werks = mseg-werks matnr = mseg-matnr vendor = sheader-lifnr menge = mseg-menge kawrt = excitm-exbas unit = mseg-meins IMPORTING * exc_amount = excitm-bed exc_perc = y_excitm_bedrat *2006 new taxes begin EXADDTAX1_PERC = y_excitm_tax1rat EXADDTAX2_PERC = y_excitm_tax2rat EXADDTAX3_PERC = y_excitm_tax3rat *2006 new taxes end * add_amount = excitm-aed add_perc = y_excitm_aedrat * sed_amount = excitm-sed sed_perc = y_excitm_sedrat * NCCD changes starts nccd_perc = y_excitm-nccdrat.
J_1I6_UNIT_CONVERSION CALL FUNCTION 'J_1I6_UNIT_CONVERSION' EXPORTING matnr_imp = excitm-matnr unit_new_imp = excinv-meins unit_old_imp = excitm-meins value_old_imp = excitm-fkimg-orig IMPORTING value_new_exp = excitm-fkimg EXCEPTIONS overflow = 1 OTHERS = 2.
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 = j_1iexchdr-bukrs trntyp = 'OTHR' docno = j_1iexchdr-docno docyr = j_1iexchdr-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.
J_1I7_USEREXIT_J1IS_BASE_VALUE CALL FUNCTION 'J_1I7_USEREXIT_J1IS_BASE_VALUE' EXPORTING ls_exchdr = es_usex_hdr TABLES lt_excdtl = et_usex_dtl.
J1I4_REDUCE_CAPITAL_DUTY CALL FUNCTION 'J1I4_REDUCE_CAPITAL_DUTY' EXPORTING issdat = j1is200-pdate * QUARTER = 3 bukrs = j1is200-bukrs kbetr = rate CHANGING excinv = excinv EXCEPTIONS miss_company = 1 receipt_year_gt_than_issue = 2 OTHERS = 3.
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 MJ1ISF02 or its description.