MN1PMF01 SAP ABAP INCLUDE - Include MN1PMF01
MN1PMF01 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 MN1PMF01 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 MN1PMF01. "Basic submit
SUBMIT MN1PMF01 AND RETURN. "Return to original report after report execution complete
SUBMIT MN1PMF01 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 MN1PMF01
INCLUDES used within this REPORT MN1PMF01
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:
ISHMED_SET_LSTSTAT CALL FUNCTION 'ISHMED_SET_LSTSTAT' EXPORTING i_einri = l_einri i_loekz = off i_okcode = ok-code i_read_tab = l_read-tab i_setvars = set_vars i_vcode = 'UPD' i_marks = mark_line i_stat_all = dn1pm-stat_all IMPORTING e_marks = mark_line e_stat_all = dn1pm-stat_all TABLES t_lssta = the_lssta EXCEPTIONS not_found = 01.
ISH_SHOW_LIST_FALL CALL FUNCTION 'ISH_SHOW_LIST_FALL' EXPORTING call_from_dark = ' ' col = 5 exit_on_weiter = ' ' fcode = 'SO' list_layout = '0' nfal_einri = einri nfal_falnr = falnr nfal_fziff = ' ' nfal_patnr = patnr only_falnr = ' ' popup = 'X' repid = ' ' row = 6 tcode = ' ' vcode = 'DIS' zuordnung = 'A' IMPORTING list_okcode = g_list_okcode * NBEW_BEWTY = * NBEW_LFDNR = nfal_falnr = nfal-falnr nfal_fziff = nfal-fziff * NO_LIST = * SELECT_NFAL = * STORNO_SELECTED = * VCODE_NEU = * WEITER = EXCEPTIONS pat_not_found = 01 repid_missing = 02.
DYNP_VALUES_UPDATE CALL FUNCTION 'DYNP_VALUES_UPDATE' EXPORTING dyname = repid dynumb = dynnr TABLES dynpfields = dynpfields.
ISHMED_PATREG_ACTIVE_CHECK CALL FUNCTION 'ISHMED_PATREG_ACTIVE_CHECK' EXPORTING i_einri = dn1pm-einri i_date = sy-datum * I_TCODE = ' ' IMPORTING e_flg_active = l_flg_practive.
ISH_ARCHIVE_CASE_COUNT CALL FUNCTION 'ISH_ARCHIVE_CASE_COUNT' EXPORTING ss_patnr = npat-patnr IMPORTING ss_counter = arc_count EXCEPTIONS OTHERS = 1.
ISHMED_GET_VMA_TEXT CALL FUNCTION 'ISHMED_GET_VMA_TEXT' " ID 2260 EXPORTING i_einri = indoc-einri i_gpart = indoc-mitarb IMPORTING e_vmatext = vma_text EXCEPTIONS vma_not_found = 1 OTHERS = 2.
ISHMED_GET_VMA_TEXT CALL FUNCTION 'ISHMED_GET_VMA_TEXT' EXPORTING i_einri = the_einri i_gpart = oanfo-gpart IMPORTING e_vmatext = vma_text EXCEPTIONS vma_not_found = 1 OTHERS = 2.
ISHMED_GET_VMA_TEXT CALL FUNCTION 'ISHMED_GET_VMA_TEXT' EXPORTING i_einri = oleis-einri i_gpart = oleis-gpart IMPORTING e_vmatext = vma_text EXCEPTIONS vma_not_found = 1 OTHERS = 2.
ISHMED_GET_VMA_TEXT CALL FUNCTION 'ISHMED_GET_VMA_TEXT' " ID 2260 EXPORTING i_einri = the_einri i_gpart = oleim-gpart IMPORTING e_vmatext = vma_text EXCEPTIONS vma_not_found = 1 OTHERS = 2.
READ_TEXT CALL FUNCTION 'READ_TEXT' EXPORTING id = textid language = sy-langu name = tname object = txobj * ARCHIVE_HANDLE = 0 TABLES lines = textlines EXCEPTIONS id = 1 language = 2 name = 3 not_found = 4 object = 5 reference_check = 6 wrong_access_to_archive = 7.
ISHMED_CALL_ANFO_NEU CALL FUNCTION 'ISHMED_CALL_ANFO_NEU' EXPORTING i_n1anf = in1anf i_rolle = 'A' i_tcode = 'N1BB' TABLES t_nlei = a_nlei t_nlem = a_nlem EXCEPTIONS parm_invalid = 1 not_found = 2 OTHERS = 3.
ISH_N2_MEDICAL_DOCUMENT CALL FUNCTION 'ISH_N2_MEDICAL_DOCUMENT' "record auf document ändern EXPORTING "parameter noch unklar * ss_einri = dn1pm-einri"anderl 1996-08-05 "LE, ID 8116 ss_einri = t_ndoc-einri "LE, ID 8116 ss_tcode = 'N203' * ss_mode = 'NOPU' TABLES ss_ndoc = t_ndoc EXCEPTIONS no_document = 1 no_insert = 2.
ISHMED_F4_ALLG CALL FUNCTION 'ISHMED_F4_ALLG' EXPORTING i_height = 6 i_len_code = 3 i_len_text = 50 i_title = 'Status-Historie-Anforderung'(x34) i_vcode = 'DIS' i_sort = ' ' i_headline = headline TABLES t_f4tab = help_tab.
ISHMED_SAPSCRIPT CALL FUNCTION 'ISHMED_SAPSCRIPT' EXPORTING * SS_KTEXT_I = KTEXT ss_ltext_i = ltxkz ss_textid = textid ss_textname = textname ss_textobject = txobj ss_vcode = 'DIS' * IMPORTING * SS_KTEXT_E = KTEXT * SS_LTEXT_E = LTXKZ TABLES ss_icdtxt = icdtxt.
ISHMED_F4_ALLG CALL FUNCTION 'ISHMED_F4_ALLG' EXPORTING i_height = 6 i_len_code = 3 i_len_text = 50 i_title = 'Status-Historie-Leistung'(x35) i_vcode = 'DIS' i_sort = ' ' i_headline = headline TABLES t_f4tab = help_tab.
ISHMED_CALL_MATERIAL CALL FUNCTION 'ISHMED_CALL_MATERIAL' EXPORTING i_nlei = nlei * i_sperren = off i_tcode = 'N1C4' * i_title = '4' TABLES t_lssta = a_lssta EXCEPTIONS lock_error = 01 read_error = 02.
ISHMED_CALL_MITARBEITER CALL FUNCTION 'ISHMED_CALL_MITARBEITER' EXPORTING i_nlei = nlei * i_sperren = off i_tcode = 'N1A6' * i_title = '3' TABLES t_lssta = a_lssta EXCEPTIONS lock_error = 01 read_error = 02.
ISHMED_F4_ALLG CALL FUNCTION 'ISHMED_F4_ALLG' EXPORTING i_height = 6 i_len_code = 3 i_len_text = 50 i_title = 'Status-Historie-Dokument'(x37) i_vcode = 'DIS' i_sort = ' ' i_headline = headline TABLES t_f4tab = help_tab.
CALL FUNCTION 'ISH_SHOW_LIST_FALL' EXPORTING call_from_dark = ' ' col = 5 exit_on_weiter = ' ' fcode = 'SO' list_layout = '0' nfal_einri = i_einri * nfal_falnr = i_falnr * nfal_fziff = ' ' nfal_patnr = npat-patnr only_falnr = ' ' popup = 'X' repid = ' ' row = 6 tcode = ' ' vcode = 'DIS' zuordnung = 'A' IMPORTING * LIST_OKCODE = * NBEW_BEWTY = nbew_lfdnr = i_lfdnr nfal_falnr = i_falnr * nfal_fziff = nfal-fziff * NO_LIST = * SELECT_NFAL = * STORNO_SELECTED = * VCODE_NEU = * WEITER = EXCEPTIONS pat_not_found = 01 repid_missing = 02.
ISHMED_DIAGNOSEN CALL FUNCTION 'ISHMED_DIAGNOSEN' EXPORTING ss_nbew = xnbew ss_nfal = nfal * ss_tcode = 'N222' ss_tcode = i_tcode EXCEPTIONS ss_enq_error = 1.
ISHMED_FALL_LIST *call function 'ISHMED_FALL_LIST' * exporting * i_einri = dn1pm-einri * i_patnr = npat-patnr * i_lock_tab = off * i_mode = 'A' * i_vcode = 'DIS' * importing * e_nbew = xnbew * tables * t_norg = xnorg * exceptions * other_error * read_error.
ISH_SHOW_LIST_FALL CALL FUNCTION 'ISH_SHOW_LIST_FALL' EXPORTING call_from_dark = ' ' * col = 5 exit_on_weiter = 'X' * fcode = 'SO' list_layout = '0' nfal_einri = dn1pm-einri * nfal_falnr = nfal-falnr * nfal_fziff = ' ' nfal_patnr = npat-patnr * npatstring = ' ' * only_falnr = ' ' * popup = 'X' * repid = ' ' * row = 6 * tcode = ' ' * vcode = 'DIS' * zuordnung = 'A' * importing * LIST_OKCODE = * NBEW_BEWTY = * NBEW_LFDNR = * nfal_falnr = nfal-falnr * nfal_fziff = nfal-fziff * NO_LIST = * SELECT_NFAL = * STORNO_SELECTED = * VCODE_NEU = * WEITER = EXCEPTIONS pat_not_found = 01 repid_missing = 02.
ISHMED_CHECK_NORG CALL FUNCTION 'ISHMED_CHECK_NORG' EXPORTING ss_einri = dn1pm-einri ss_freig = on ss_einri_chk = l_einri_chk * ss_n1erbrkz = erbrkz ss_fazuw = fazuw * SS_PFZUW = PFZUW ss_orgid = oe EXCEPTIONS not_found = 01 not_valid = 02.
ISHMED_PATIENT CALL FUNCTION 'ISHMED_PATIENT' EXPORTING ss_einri = dn1pm-einri ss_npat = npat ss_tcode = l_tcode ss_fcode = 'N1PM'.
ISH_GRAPHIC_ORGID_SELECT CALL FUNCTION 'ISH_GRAPHIC_ORGID_SELECT' EXPORTING ambes = ambes_kz anfkz = n1anfkz date = datum einri = einri erbkz = n1erbrkz fazuw = fazuw_kz freig = on graph_title = title no_bauid = off pfzuw = pfzuw_kz sperr = off * START_ORGID = start_oe vcode = vcode IMPORTING * PLACED_ABOVE_ORGFA = PLACED_ABOVE_ORGFA * PLACED_ABOVE_ORGPF = PLACED_ABOVE_ORGPF nothing_selected = nothing_sel selected_orgid = wert.
ISHMED_FIND_OE_HIERARCHIE CALL FUNCTION 'ISHMED_FIND_OE_HIERARCHIE' EXPORTING i_einri = dn1pm-einri i_orgid = r_orgfa-low i_orgid_all = 'X' "Müllner, ID 4118 TABLES t_find_norg = fa_norg EXCEPTIONS no_hierarchie = 01 oe_not_found = 02.
ISHMED_FALL_LIST * call function 'ISHMED_FALL_LIST' * exporting * i_einri = innfal-einri * i_falnr = innfal-falnr * i_lock_tab = off * i_mode = 'O' * i_vcode = 'UPD' * importing * e_nbew = xnbew * tables * t_norg = xnorg * exceptions * other_error * read_error.
ISHMED_FALL_LIST CALL FUNCTION 'ISHMED_FALL_LIST' EXPORTING i_einri = i_einri i_falnr = i_falnr i_lock_tab = off i_mode = 'O' i_vcode = 'UPD' IMPORTING e_nbew = xnbew TABLES t_norg = xnorg EXCEPTIONS other_error read_error.
ISHMED_FALL_LIST CALL FUNCTION 'ISHMED_FALL_LIST' EXPORTING i_einri = i_einri i_patnr = npat-patnr i_lock_tab = off i_mode = 'A' i_vcode = 'UPD' IMPORTING e_nbew = xnbew TABLES t_norg = xnorg EXCEPTIONS other_error = 1 read_error = 2.
ISHMED_PLS_LEISTUNGSERFASSUNG CALL FUNCTION 'ISHMED_PLS_LEISTUNGSERFASSUNG' EXPORTING ss_calld = off ss_gpart = vma ss_nbew_lfdnr = xnbew-lfdnr ss_nfal = nfal ss_tcode = sy-tcode ss_vcode = 'PFL' TABLES ss_nlei = xnlei EXCEPTIONS nbew_orgpf_not_valid = 01 nbew_not_found = 02 OTHERS = 03.
ISHMED_FALL_LIST CALL FUNCTION 'ISHMED_FALL_LIST' EXPORTING i_einri = dn1pm-einri i_falnr = i_falnr i_lock_tab = off i_mode = 'O' i_vcode = 'UPD' IMPORTING e_nbew = xnbew e_nfal = xnfal EXCEPTIONS other_error read_error.
ISHMED_FALL_LIST CALL FUNCTION 'ISHMED_FALL_LIST' EXPORTING i_einri = dn1pm-einri i_patnr = npat-patnr i_lock_tab = off i_mode = 'A' i_vcode = 'UPD' IMPORTING e_nbew = xnbew e_nfal = xnfal EXCEPTIONS other_error read_error.
ISH_FORM_TH_USER_INFO CALL FUNCTION 'ISH_FORM_TH_USER_INFO' IMPORTING terminal = g_terminal.
ISH_FORM_SELECT CALL FUNCTION 'ISH_FORM_SELECT' * Langsteiner, ID 6964 - Beginn STARTING NEW TASK 'PRINT' PERFORMING end_form_select ON END OF TASK * Langsteiner, ID 6964 - Ende EXPORTING ss_applk = 'N' ss_einri = dn1pm-einri ss_event = 'PATHIS' ss_st_print = st_print ss_terminal = g_terminal "LE, ID 6964 14.11.01
ISH_SHOW_LIST_FALL CALL FUNCTION 'ISH_SHOW_LIST_FALL' EXPORTING call_from_dark = ' ' col = 5 exit_on_weiter = ' ' fcode = 'SO' list_layout = '0' nfal_einri = einri nfal_falnr = falnr nfal_fziff = ' ' nfal_patnr = the_patnr only_falnr = ' ' popup = 'X' repid = ' ' row = 6 tcode = ' ' vcode = 'DIS' zuordnung = 'A' IMPORTING nfal_falnr = falnr EXCEPTIONS pat_not_found = 01 repid_missing = 02.
ISH_FORM_PROTOCOL_LIST CALL FUNCTION 'ISH_FORM_PROTOCOL_LIST' EXPORTING einri = infal-einri patnr = infal-patnr falnr = infal-falnr.
DEQUEUE_ENFAL * call function 'DEQUEUE_ENFAL' * EXPORTING * einri = einri * falnr = falnr * _scope = 3.
ISHMED_DEQUEUE_ENFAL CALL FUNCTION 'ISHMED_DEQUEUE_ENFAL' EXPORTING einri = einri falnr = falnr i_caller = 'MN1PMF01' _scope = '3'.
ENQUEUE_ENFAL * call function 'ENQUEUE_ENFAL' * EXPORTING * einri = einri * falnr = falnr * _scope = 3 * EXCEPTIONS * foreign_lock = 4 * system_failure = 12.
ISHMED_ENQUEUE_ENFAL CALL FUNCTION 'ISHMED_ENQUEUE_ENFAL' EXPORTING einri = einri falnr = falnr i_caller = 'MN1PMF01' _scope = '3' EXCEPTIONS foreign_lock = 4 system_failure = 12.
ISHMED_GENERATE_ANFO CALL FUNCTION 'ISHMED_GENERATE_ANFO' EXPORTING i_einri = the_einri i_anpoe = norg-orgid i_datum = sy-datum i_lock_tab = 'X' TABLES t_nfal = a_nfal EXCEPTIONS read_error = 1 save_error = 2 no_input = 3.
ISHMED_SHOW_NORG CALL FUNCTION 'ISHMED_SHOW_NORG' EXPORTING ss_popup = oe_popup ss_leitst = leitst ss_einri = dn1pm-einri ss_einri_chk = 'J' ss_freig = on ss_gdatum = sy-datum ss_n1erbrkz = erbrkz ss_fazuw = fazuw ss_pfzuw = pfzuw ss_read_oe = read_oe ss_title = title IMPORTING e_norg = norg TABLES t_norg = a_norg t_ntpk = a_ntpk EXCEPTIONS not_found = 01.
ISH_N2_MEDICAL_DOCUMENT CALL FUNCTION 'ISH_N2_MEDICAL_DOCUMENT' "record auf document ändern EXPORTING "parameter noch unklar ss_einri = dn1pm-einri "anderl 1996-08-05 ss_tcode = 'N202' * ss_mode = 'NOPU' TABLES ss_ndoc = t_ndoc EXCEPTIONS no_document = 1 no_insert = 2.
ISH_N2_MEDICAL_DOCUMENT CALL FUNCTION 'ISH_N2_MEDICAL_DOCUMENT' "record auf document ändern EXPORTING "parameter noch unklar ss_einri = dn1pm-einri "anderl 1996-08-05 ss_tcode = 'N201' * ss_mode = 'NOPU' TABLES ss_ndoc = t_ndoc EXCEPTIONS no_document = 1 no_insert = 2.
ISH_HELP_REQUEST CALL FUNCTION 'ISH_HELP_REQUEST' EXPORTING ss_object = a_object ss_title = title.
RP_LAST_DAY_OF_MONTHS CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS' EXPORTING day_in = i_datbi IMPORTING last_day_of_month = h_lastd.
RP_LAST_DAY_OF_MONTHS CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS' EXPORTING day_in = h_datvo IMPORTING last_day_of_month = h_lastd.
RP_LAST_DAY_OF_MONTHS CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS' EXPORTING day_in = h_datum IMPORTING last_day_of_month = h_lastd.
RP_LAST_DAY_OF_MONTHS CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS' EXPORTING day_in = h_datvo IMPORTING last_day_of_month = h_lastd.
RP_LAST_DAY_OF_MONTHS CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS' EXPORTING day_in = h_datum IMPORTING last_day_of_month = h_lastd.
RP_LAST_DAY_OF_MONTHS CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS' EXPORTING day_in = i_datvo IMPORTING last_day_of_month = h_lastd.
RP_LAST_DAY_OF_MONTHS CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS' EXPORTING day_in = h_datbi IMPORTING last_day_of_month = h_lastd.
RP_LAST_DAY_OF_MONTHS CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS' EXPORTING day_in = h_datum IMPORTING last_day_of_month = h_lastd.
RP_LAST_DAY_OF_MONTHS CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS' EXPORTING day_in = h_datbi IMPORTING last_day_of_month = h_lastd.
RP_LAST_DAY_OF_MONTHS CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS' EXPORTING day_in = h_datum IMPORTING last_day_of_month = h_lastd.
ISH_USER_EXIT_GET CALL FUNCTION 'ISH_USER_EXIT_GET' EXPORTING ss_event = 'N1DR' IMPORTING ss_fbname = uex_n1dr EXCEPTIONS no_user_exit = 01.
ISH_FIND_FORMS CALL FUNCTION 'ISH_FIND_FORMS' EXPORTING einri = the_einri orgid = n1anf-orgid st_print = st_print IMPORTING abnormal_end = abbruch TABLES conditions = condition_tab events = event_tab forms = print_tab EXCEPTIONS OTHERS = 4.
ISHMED_PRINT_ANFO_EXPORT CALL FUNCTION 'ISHMED_PRINT_ANFO_EXPORT' EXPORTING einri = the_einri anfid = n1anf-anfid IMPORTING abbruch = abbruch EXCEPTIONS OTHERS = 1.
ISHMED_PATH_HEADERLINE CALL FUNCTION 'ISHMED_PATH_HEADERLINE' EXPORTING i_objid = i_objid.
ISHMED_SEARCH_ORGFA CALL FUNCTION 'ISHMED_SEARCH_ORGFA' EXPORTING i_einri = $nfal-einri i_falnr = $nfal-falnr i_orgpf = i_orgpf IMPORTING e_nbew = *nbew e_orgfa = a_orgfa EXCEPTIONS no_valid_nfal = 1 no_valid_nbew = 2 OTHERS = 3.
ISH_MEDICAL_RECORD CALL FUNCTION 'ISH_MEDICAL_RECORD' EXPORTING * value(ss_dokar) like rnpd1-dokar default space * value(ss_doknr) like rnpd1-doknr default space * value(ss_doktl) like rnpd1-doktl default space ss_einri = dn1pm-einri * ss_fallart = '1' * ss_falnr = * ss_orgfa = * value(ss_orgform) like ndoc-orgform default space * value(ss_orghi) like rnpd1-orghi default space * value(ss_orgpf) like rnpd1-orgpf default space ss_patnr = npat-patnr tcode = 'ND01'.
BORROW_INSERT CALL FUNCTION 'BORROW_INSERT' EXPORTING ss_dialog = on ss_entleiher = space ss_entleihertyp = '02' " Organisationseinheit ss_entleihzweck = '01' " Patientenbehandlung ss_mod = '1' ss_orgkr = dn1pm-einri ss_save_immediatly = true *" importing *" SS_ERRORS_EXIST TABLES ss_document_tab = t_ndae.
BORROW_RESET CALL FUNCTION 'BORROW_RESET' EXPORTING ss_save_immediatly = true * importing * ss_errors_exist = error_protocol * ss_update_ndae = update_ndae TABLES ss_document_tab = t_ndae EXCEPTIONS OTHERS = 01.
ISHMED_FIND_OE_HIERARCHIE CALL FUNCTION 'ISHMED_FIND_OE_HIERARCHIE' EXPORTING i_einri = a_einri i_orgid = a_orgfa i_orgid_all = 'X' "Müllner, ID 4118 TABLES t_find_norg = a_norg EXCEPTIONS no_hierarchie = 01 oe_not_found = 02.
ISHMED_IS_FALL_CLOSED CALL FUNCTION 'ISHMED_IS_FALL_CLOSED' EXPORTING i_einri = dn1pm-einri i_falnr = xtab_nfal-falnr i_datum = sy-datum i_caller = 'SAPMN1PM' " MED-9713 IMPORTING e_closed = flag EXCEPTIONS not_found = 1 OTHERS = 2.
ISHMED_IS_CASE_ACCOUNTED CALL FUNCTION 'ISHMED_IS_CASE_ACCOUNTED' EXPORTING i_einri = dn1pm-einri i_falnr = xtab_nfal-falnr * I_ABR_STRING = '2' i_vcode = vcode " Nr 3220 i_prgname = 'SAPMN1PM' " Nr 3220 IMPORTING e_err_level = flag EXCEPTIONS not_found = 1 OTHERS = 2.
ISHMED_PATIENT_OFFENE_PUNKTE CALL FUNCTION 'ISHMED_PATIENT_OFFENE_PUNKTE' EXPORTING i_einri = dn1pm-einri i_patnr = the_patnr i_falnr = x_falnr EXCEPTIONS cancel = 1 patnr_not_valid = 2 falnr_not_valid = 3 fall_pat_error = 4 OTHERS = 5.
COMPLEX_SELECTIONS_DIALOG CALL FUNCTION 'COMPLEX_SELECTIONS_DIALOG' EXPORTING * TITLE = ' ' text = $text * SIGNED = 'X' * LOWER_CASE = ' ' * NO_INTERVAL_CHECK = ' ' * JUST_DISPLAY = ' ' TABLES range = $r_einri * range = rs_einri EXCEPTIONS no_range_tab = 1 cancelled = 2 internal_error = 3 OTHERS = 4.
ISHMED_GET_OWN_ORGID CALL FUNCTION 'ISHMED_GET_OWN_ORGID' EXPORTING i_einri = l_einri i_datum = sy-datum i_titel = 'Suche der Pfleg.OE'(x55)
ISH_N2_DISPLAY_LAB_DATA CALL FUNCTION 'ISH_N2_DISPLAY_LAB_DATA' EXPORTING ss_einri = l_einri ss_patnr = npat-patnr ss_falnr = l_falnr ss_oe = own_orgid EXCEPTIONS err_nodata = 1 err_system_failed = 2 OTHERS = 3.
ISHMED_DOKEMPF CALL FUNCTION 'ISHMED_DOKEMPF' EXPORTING i_ndoc = i_ndoc i_mark = ' ' EXCEPTIONS no_ndoc = 1 foreign_lock = 2 OTHERS = 3.
ISHMED_DOK_FREIG_DRU CALL FUNCTION 'ISHMED_DOK_FREIG_DRU' EXPORTING i_ndoc = l_ndoc i_release = ' ' i_print_popup = 'X' EXCEPTIONS no_ndoc = 1 error = 2 OTHERS = 3.
ISHMED_PATREG_PATHIST_START CALL FUNCTION 'ISHMED_PATREG_PATHIST_START' EXPORTING i_einri = l_einri i_patid = space i_patnr = npat-patnr * I_FALNR = i_flg_eqanr = dn1pm-unfnr_m i_begdt = g_datvo i_enddt = g_datbi i_orgfa = dn1pm-orgfa i_flg_hiera = dn1pm-hiera i_flg_anf = dn1pm-xanfo i_flg_dia = dn1pm-xdiag i_flg_pkt = dn1pm-xpflk i_flg_doc = dn1pm-xdocu i_flg_akt = dn1pm-xakte i_flg_pfl = dn1pm-xpfll * I_FLG_TMN = 'X' ...noch nicht realisiert
ISHMED_PATREG_ACTIVE_CHECK CALL FUNCTION 'ISHMED_PATREG_ACTIVE_CHECK' EXPORTING i_einri = dn1pm-einri i_date = sy-datum * I_TCODE = ' ' IMPORTING e_flg_active = l_flg_practive.
ISHMED_PATREG_ORGPAR_READ CALL FUNCTION 'ISHMED_PATREG_ORGPAR_READ' EXPORTING i_caller = l_caller i_einri = dn1pm-einri i_orgid = dn1pm-orgfa i_parid = co_oepar_local_skip IMPORTING e_value = l_orgpar_value.
ISHMED_CALL_ANFO_NEU CALL FUNCTION 'ISHMED_CALL_ANFO_NEU' EXPORTING i_n1anf = n1anf i_rolle = 'A' i_sperren = 'X' i_tcode = 'N1BA' i_skip_first = ' ' * TABLES * t_nlei = a_nlei * t_nlem = a_nlem EXCEPTIONS parm_invalid = 1 not_found = 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 MN1PMF01 or its description.