MN1L3F01 SAP ABAP INCLUDE - IS-H*MED: F4-Eingabehilfe für org. Einheiten nach verschiedenen Kriter
MN1L3F01 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 MN1L3F01 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 MN1L3F01. "Basic submit
SUBMIT MN1L3F01 AND RETURN. "Return to original report after report execution complete
SUBMIT MN1L3F01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
INCLUDES used within this REPORT MN1L3F01
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:
ISH_READ_NTPK CALL FUNCTION 'ISH_READ_NTPK' EXPORTING einri = einri tarif = tarif talst = talst IMPORTING e_ntpk = ntpk EXCEPTIONS not_found = 1.
ISH_READ_NTPT CALL FUNCTION 'ISH_READ_NTPT' EXPORTING einri = einri tarif = tarif talst = talst IMPORTING e_ntpt = ntpt EXCEPTIONS not_found = 1.
ISHMED_SHOW_XLEI CALL FUNCTION 'ISHMED_SHOW_XLEI' EXPORTING ss_einri = the_einri ss_gdatum = the_datum * SS_N1ERBRI = ON * SS_N1MEDLEI = ON * SS_N1PFLLEI = ON ss_talst = main_nlei-leist ss_tarif = gtarif ss_titel = text-h01 ss_vcode = 'DIS' * SS_ZEITR = OFF ss_zotyp = the_zotyp * IMPORTING * E_NTPK = *NTPK * E_NTPT = *NTPT TABLES t_ntpk = i_ntpk " wird hier nicht verwendet EXCEPTIONS not_found = 01.
ISHMED_QUIT_SERVICE * CALL FUNCTION 'ISHMED_QUIT_SERVICE' * EXPORTING * I_ACTION = 'E' * I_EINRI = ITABLE_VERM-EINRI ** I_GDATUM = SY-DATUM ** I_ORGID = ' ' * I_SAVE_TAB = ON * I_TARIF = GTARIF ** I_TITLE = ' ' * I_ZOTYP = ZOTYP * I_CLOSE_BEW = OFF * I_STAT_ANFO = OFF * IMPORTING * E_FCODE = X_FCODE * TABLES * T_NLEI = A_NLEI * EXCEPTIONS * FALL_LOCKED = 1 * OTHER_ERROR = 2 * READ_ERROR = 3 * SAVE_ERROR = 4 * SYS_ERROR = 5 * OTHERS = 6.
ISHMED_VORLAGE_ORGIDS CALL FUNCTION 'ISHMED_VORLAGE_ORGIDS' EXPORTING ss_einri = nnlei-einri ss_nlei = org_nlei * ss_umfeld = 'SAPMN1LA' "REM ID 20443 ss_umfeld = 'SAPMN1L3' "ID 20443 IMPORTING e_anfoe = help_anfoe e_anpoe = help_anpoe e_erboe = help_erboe EXCEPTIONS popup_canceled = 1 no_data_found = 2 OTHERS = 3.
ISHMED_SLEI_SETFLAG CALL FUNCTION 'ISHMED_SLEI_SETFLAG' EXPORTING i_prgname = 'SAPMN1L3' TABLES t_nlei = nnlei * t_nlem = nnlem t_nllz = nnllz EXCEPTIONS OTHERS = 1.
ISH_VERBUCHER_NLEI CALL FUNCTION 'ISH_VERBUCHER_NLEI' * IN UPDATE TASK EXPORTING tcode = sy-tcode TABLES xnlei = nnlei ynlei = onlei.
ISHMED_UPDATE_NLLZ CALL FUNCTION 'ISHMED_UPDATE_NLLZ' * IN UPDATE TASK EXPORTING tcode = sy-tcode TABLES nnllz = nnllz.
ISHMED_QUIT_SERVICE CALL FUNCTION 'ISHMED_QUIT_SERVICE' EXPORTING i_action = 'E' i_einri = itable_verm-einri * I_GDATUM = SY-DATUM * I_ORGID = ' ' i_save_tab = on i_tarif = gtarif * I_TITLE = ' ' i_zotyp = zotyp i_close_bew = on " Nr 7117: Bewegung abschließen i_stat_anfo = off i_lock_tab = sperren * Fichte, Nr 4943: Im Erbringen/Freigeben wird bei * Leistungen die N1TPM-MTRAD = 'X' gesetzt haben * das Material-Programm aufgerufen, was somit zu * einer Rekursion führen würde => Den weiteren * Aufruf im Erbringen/Freigeben verhindern i_call_mat = off IMPORTING e_fcode = x_fcode TABLES t_nlei = a_nlei EXCEPTIONS fall_locked = 1 other_error = 2 read_error = 3 save_error = 4 sys_error = 5 OTHERS = 6.
ISH_STORNO_SERVICES CALL FUNCTION 'ISH_STORNO_SERVICES' IMPORTING anz_no_storn = no_storno * ANZ_STORN = TABLES ss_nlei = storn_nlei EXCEPTIONS no_services = 01.
ISH_MODIFY_SCREEN CALL FUNCTION 'ISH_MODIFY_SCREEN' EXPORTING dynnr = dynnr einri = nfal-einri fcode = 'AS ' pname = repid vcode = vcode.
ISH_SHOW_SERVICES * call function 'ISH_SHOW_SERVICES' "REM MED-41179 * exporting * extp_nam = 'SAPMN1L3' * input_tarid = off * einri = the_einri * tarif = gtarif * vcode = vcode * set_zotyp = the_zotyp * with_date = 'X' * set_tgrkz = 'X' * select_groups = 'X' " Auch Gruppen dürfen selekt. werden
ISH_SHOW_SERVICES_NEW CALL FUNCTION 'ISH_SHOW_SERVICES_NEW' "MED-41179 EXPORTING einrichtung = the_einri tarif = gtarif begdt = main_nlei-ibgdt "MED-47501 sel_leist = 'X' sel_group = 'X' multi_select = ' ' use_groups = 'X' zotyp = the_zotyp depth = '0' change_tarif = 'X' change_zeitr = 'X' change_zeitp = 'X' change_entga = 'X' change_tagru = 'X' change_zotyp = 'X' change_usegr = 'X' win_title = text-s10 vcode = vcode read_vle = ' ' select_all = 'X' search_for = 'NTPK_M' IMPORTING e_ntpk = *ntpk e_ntpt = *ntpt EXCEPTIONS wrong_einri = 1 nothing_found = 2 nothing_selected = 3 missing_zotyp = 4 OTHERS = 5.
ISH_CHECK_NUMBER_RANGE CALL FUNCTION 'ISH_CHECK_NUMBER_RANGE' EXPORTING einri = ' ' modus = modus_normal number = new_number object = object subobject = subobject IMPORTING nr_range_nr = nr_range_nr nr_range_type = nr_range_type EXCEPTIONS interval_not_found = 1 no_alpha = 2 no_external = 3 no_internal = 4 number_range_not_extern = 5 number_range_not_intern = 6 range_error_alpha = 7 range_error_extern = 8.
ISH_CHECK_NUMBER_RANGE_EXTERN CALL FUNCTION 'ISH_CHECK_NUMBER_RANGE_EXTERN' EXPORTING einri = ' ' modus = modus_normal number = new_number object = object subobject = subobject EXCEPTIONS range_error_extern = 8. "Nummer in Nr.kreisinterval
NUMBER_GET_NEXT CALL FUNCTION 'NUMBER_GET_NEXT' EXPORTING nr_range_nr = nr_range_nr object = object quantity = quantity_in toyear = toyear_0000 IMPORTING number = number quantity = quantity returncode = rcode_nr 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 buffer_overflow = 7 OTHERS = 8.
DEQUEUE_ENLLZ ** call function 'DEQUEUE_ENLLZ' den FuB gibts nicht??!!! ** exporting ** einri = the_einri ** lnrls1 = main_nlei-lnrls ** lnrls2 = itable-lnrls.
DEQUEUE_ENLEI * call function 'DEQUEUE_ENLEI' * exporting * einri = the_einri * falnr = main_nlei-falnr * orgid = main_nlei-orgid * leist = itable-matnr * lnrls = itable-lnrls.
ENQUEUE_ENLLZ
* CALL FUNCTION 'ENQUEUE_ENLLZ' * EXPORTING * EINRI = THE_EINRI * LNRLS1 = MAIN_NLEI-LNRLS * LNRLS2 = ITABLE-LNRLS.
ENQUEUE_ENLEI * CALL FUNCTION 'ENQUEUE_ENLEI' * EXPORTING * EINRI = THE_EINRI * FALNR = MAIN_NLEI-FALNR * ORGID = MAIN_NLEI-ORGID * LEIST = ITABLE-MATNR * LNRLS1 = ITABLE-LNRLS.
ISHMED_UPDATE_NLEM CALL FUNCTION 'ISHMED_UPDATE_NLEM' * IN UPDATE TASK EXPORTING tcode = sy-tcode TABLES nnlem = nnlem onlem = onlem.
ISHMED_UPDATE_N1LSSTZ CALL FUNCTION 'ISHMED_UPDATE_N1LSSTZ' * IN UPDATE TASK EXPORTING tcode = sy-tcode TABLES nn1lsstz = nn1lsstz on1lsstz = on1lsstz.
ISHMED_SLEI_SETFLAG CALL FUNCTION 'ISHMED_SLEI_SETFLAG' EXPORTING i_prgname = 'SAPMN1L3' TABLES t_nlei = nnlei * t_nlem = nnlem * t_nllz = nnllz EXCEPTIONS OTHERS = 1.
ISH_VERBUCHER_NLEI CALL FUNCTION 'ISH_VERBUCHER_NLEI' * IN UPDATE TASK EXPORTING tcode = sy-tcode TABLES xnlei = nnlei ynlei = onlei.
ISH_FIND_NBEW_NUMBER2 CALL FUNCTION 'ISH_FIND_NBEW_NUMBER2' EXPORTING bwedt = help_nlei-ibgdt bwezt = help_nlei-ibzt bwidt = help_nlei-ibgdt bwizt = help_nlei-ibzt falar = nfal-falar IMPORTING anfoe = help_nlei-anfoe anpoe = help_nlei-anpoe erboe = help_nlei-erboe lfdnr = help_nlei-lfdbew TABLES nbew_tabp = nbewtab EXCEPTIONS missing_data = 01 no_nbew_found = 02 wrong_intervall = 03.
ISHMED_LIST_NBEW_TO_FALL CALL FUNCTION 'ISHMED_LIST_NBEW_TO_FALL' EXPORTING * SS_BWART = 'SO' ss_nfal = nfal ss_npat = npat IMPORTING ss_nbew = nbew TABLES ss_nbewtab = nbewtab EXCEPTIONS popup_canceled_by_user = 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 MN1L3F01 or its description.
MN1L3F01 - IS-H*MED: F4-Eingabehilfe für org. Einheiten nach verschiedenen Kriter MN1L2TOP - IS-H*MED: F4-Eingabehilfe für org. Einheiten nach verschiedenen Kriter MN1L2O01 - IS-H*MED: F4-Eingabehilfe für org. Einheiten nach verschiedenen Kriter MN1L2M01 - IS-H*MED: Include for Med. Standard Modules (N1L2) MN1L2I01 - IS-H*MED: F4-Eingabehilfe für org. Einheiten nach verschiedenen Kriter MN1L2F01 - IS-H*MED: F4-Eingabehilfe für org. Einheiten nach verschiedenen Kriter