SAP Reports / Programs | Patient Management | SAP Healthcare - Industry-Specific Components for Hospitals | Patient Management(IS-H-PM) SAP IS

MNPA2F10 SAP ABAP INCLUDE - documentation and ABAP source code







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

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_AT_SCO_CHECK_CHANGES CALL FUNCTION 'ISH_AT_SCO_CHECK_CHANGES' EXCEPTIONS changes = 1 no_changes = 2 others = 3.

ISH_FIND_EXCL_SCREENS CALL FUNCTION 'ISH_FIND_EXCL_SCREENS' EXPORTING act_tcode = tcode einri = rnpa1-einri extp_nam = repid all_screens = all_screens TABLES excl_screens = excl_screens.

ISH_NBEW_CHECK_STORNO CALL FUNCTION 'ISH_NBEW_CHECK_STORNO' EXPORTING ss_einri = rnpa1-einri ss_falnr = nfal-falnr ss_lfdnr = nbew-lfdnr TABLES ss_nbewtab = nbewtab EXCEPTIONS OTHERS = 1.

ISH_NFAL_CHECK_STORNO CALL FUNCTION 'ISH_NFAL_CHECK_STORNO' EXPORTING ss_einri = rnpa1-einri ss_falnr = nfal-falnr TABLES ss_nbewtab = $nbewtab EXCEPTIONS OTHERS = 1.

ISH_TEST_DIGIT_GET_FOR_MESSAGE * CALL FUNCTION 'ISH_TEST_DIGIT_GET_FOR_MESSAGE' * EXPORTING * ss_einri = rnpa1-einri * ss_number = nfal-falnr * ss_which = 'F' * IMPORTING * ss_pziff = message_pziff * EXCEPTIONS * OTHERS = 0.

MESSAGES_ACTIVE * CALL FUNCTION 'MESSAGES_ACTIVE' * EXCEPTIONS * OTHERS = 1.

MESSAGES_INITIALIZE * CALL FUNCTION 'MESSAGES_INITIALIZE' * EXCEPTIONS * OTHERS = 0.

ISH_TEST_DIGIT_GET_FOR_MESSAGE * CALL FUNCTION 'ISH_TEST_DIGIT_GET_FOR_MESSAGE' * EXPORTING * ss_einri = rnpa1-einri * ss_number = dummy_ngeb-faln1 * ss_which = 'F' * IMPORTING * ss_pziff = message_pziff2 * EXCEPTIONS * OTHERS = 0.

ISH_TEST_DIGIT_GET_FOR_MESSAGE * CALL FUNCTION 'ISH_TEST_DIGIT_GET_FOR_MESSAGE' * EXPORTING * ss_einri = rnpa1-einri * ss_number = inffz-faln2 * ss_which = 'F' * IMPORTING * ss_pziff = message_pziff2 * EXCEPTIONS * OTHERS = 0.

ISH_CHECK_STORNO_COT * CALL FUNCTION 'ISH_CHECK_STORNO_COT' * EXPORTING * ss_einri = rnpa1-einri * ss_falnr = nbew-falnr * ss_lfdnr = nbew-lfdnr * ss_fall_bew = 'F' * IMPORTING * ss_found_cot = flag_nbkz * EXCEPTIONS * OTHERS = 0.

ISH_CHECK_DIAGNOSEN_FALL ** call function 'ISH_CHECK_DIAGNOSEN_FALL' ** exporting ** ss_einri = rnpa1-einri ** ss_falnr = nbew-falnr ** ss_lfdbew = nbew-lfdnr ** importing ** ss_storno_ok = flag_ndia ** tables ** idia_storno = dummy_ndia.

ISH_CHECK_KLASSIFIKATION_FALL ** call function 'ISH_CHECK_KLASSIFIKATION_FALL' ** exporting ** ss_einri = rnpa1-einri ** ss_falnr = nfal-falnr ** importing ** ss_storno_ok = flag_nfkl.

ISH_INS_POLICIES_EXIST_CHECK * CALL FUNCTION 'ISH_INS_POLICIES_EXIST_CHECK' * EXPORTING * vv_einri = rnpa1-einri * vv_falnr = nfal-falnr * vv_patnr = npat-patnr * IMPORTING * vv_exist = flag_nvvf * EXCEPTIONS * OTHERS = 0.

ISH_CHECK_STORNO_SERVICES * CALL FUNCTION 'ISH_CHECK_STORNO_SERVICES' * EXPORTING * fall = on * i_rnexl = rnexl * vvf = off * vvp = off * IMPORTING * storno = flag_nlei * TABLES * e_nksp = dummy_nksp * e_nlei = dummy_nlei * e_nvvf = dummy_nvvf.

ISH_PATIENT_RECORD_CHECK_STORN * CALL FUNCTION 'ISH_PATIENT_RECORD_CHECK_STORN' * EXPORTING * ss_einri = rnpa1-einri * ss_patnr = npat-patnr * ss_falnr = nfal-falnr * ss_lfdbew = nbew-lfdnr * IMPORTING * ss_storno_ok = flag_nkav.

ISH_NPAT_CHECK_STORNO CALL FUNCTION 'ISH_NPAT_CHECK_STORNO' EXPORTING ss_patnr = npat-patnr TABLES ss_cases = infal EXCEPTIONS storno_not_allowed_case = 4 storno_not_allowed = 12.

ISH_FORM_PROTOCOL_SAVE CALL FUNCTION 'ISH_FORM_PROTOCOL_SAVE' EXPORTING einri = rnpa1-einri patnr = npat-patnr falnr = nfal-falnr TABLES forms = print_tab.

ISH_CHANGE_CASE_TYPE_OUT_IN CALL FUNCTION 'ISH_CHANGE_CASE_TYPE_OUT_IN' EXPORTING einrichtung = rnpa1-einri fall = nfal change = on messages_collect = on messages_show = on EXCEPTIONS no_change = 1 OTHERS = 2.

ISH_PROCEDURE_DRG_SIGN_SET





call function 'ISH_PROCEDURE_DRG_SIGN_SET' exporting ss_einri = rnpa1-einri ss_falnr = nfal-falnr ss_drg_mode = off importing * PROCEDURE_CHANGED = ss_retmaxtype = l_retmaxtype tables ss_return = l_return.

ISH_PROCEDURE_CHECK_CATALOG call function 'ISH_PROCEDURE_CHECK_CATALOG' exporting ss_einri = rnpa1-einri ss_falnr = nfal-falnr IMPORTING * PROCEDURE_CHANGED = SS_RETMAXTYPE = l_retmaxtype TABLES SS_RETURN = l_return.

MESSAGES_SHOW CALL FUNCTION 'MESSAGES_SHOW' EXPORTING show_linno = off EXCEPTIONS OTHERS = 1.

MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE'.

MESSAGES_SHOW CALL FUNCTION 'MESSAGES_SHOW' EXPORTING show_linno = off EXCEPTIONS OTHERS = 1.

MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE'.

ISH_NBEWTAB_GET_ADMISSION CALL FUNCTION 'ISH_NBEWTAB_GET_ADMISSION' EXPORTING ss_einri = rnpa1-einri ss_falnr = nfal-falnr ss_read_db = on ss_read_storn = off IMPORTING ss_nbew = nbew EXCEPTIONS OTHERS = 1.

ISH_INFORMATION_WITH_PFKEY CALL FUNCTION 'ISH_INFORMATION_WITH_PFKEY' EXPORTING ss_arbgb = 'N1' ss_ext_prg = 'SAPMNPA2' ss_msgnr = msgnr IMPORTING ss_okcode = message_okcode.

MESSAGES_SHOW CALL FUNCTION 'MESSAGES_SHOW' EXPORTING object = object show_linno = off EXCEPTIONS inconsistent_range = 01 no_messages = 02.

ISH_PAT_SCREEN CALL FUNCTION 'ISH_PAT_SCREEN' EXPORTING ss_list_ok_code = list_okcode ss_ok_code = ok-code ss_tcode = tcode ss_vcode_npat = vcode IMPORTING ss_einri = rnpa1-einri ss_falnr = rnpa1-falnr ss_fziff = rnpa1-fziff ss_gbdab = rnpa1-gbdab ss_gbdav = rnpa1-gbdav ss_gbnam = rnpa1-gbnam ss_gschle = rnpa1-gschle ss_leave_screen = leave_screen ss_list_okcode = list_okcode ss_pat_canc_inst = pat_canc_inst ss_nname = rnpa1-nname ss_okcode = ok-code ss_patnr = npat-patnr ss_pziff = npat-pziff ss_vcode_new = vcode_new ss_vcode_npae = vcode_npae ss_search = search_patient ss_vname = rnpa1-vname ss_rvnum = rnpa1-rvnum ss_passnr = rnpa1-passnr ss_extnr = rnpa1-extnr.

ISH_CONVERT_SEX_INPUT CALL FUNCTION 'ISH_CONVERT_SEX_INPUT' EXPORTING ss_gschle = rnpa1-gschle IMPORTING ss_gschl = rnpa1-gschl EXCEPTIONS OTHERS = 0.

ISH_CASE_SCREEN CALL FUNCTION 'ISH_CASE_SCREEN' EXPORTING ss_ok_code = ok-code ss_list_ok_code = list_okcode ss_tcode = tcode ss_vcode_nfal = vcode ss_save_lfdnr = save_nbew_lfdnr IMPORTING ss_einri = rnpa1-einri ss_falnr = nfal-falnr ss_fziff = nfal-fziff ss_lfdnr = save_nbew_lfdnr ss_list_okcode = list_okcode ss_okcode = ok-code ss_patnr = npat-patnr ss_pziff = npat-pziff ss_vcode_new = vcode_new ss_leave_screen = leave_screen.

ISH_INFORMATION_WITH_PFKEY CALL FUNCTION 'ISH_INFORMATION_WITH_PFKEY' EXPORTING ss_ext_prg = repid ss_msgnr = msgno ss_msgv1 = sy-msgv1 ss_msgv2 = sy-msgv2 IMPORTING ss_okcode = message_okcode.

ISH_FPZ_CHECK_DATE CALL FUNCTION 'ISH_FPZ_CHECK_DATE' EXPORTING ss_npat = npat ss_nfal = nfal ss_nbew = nbew IMPORTING ss_upd_infpz = upd_nfpz TABLES ss_infpz = infpz ss_nbewtab = nbewtab ss_nbewtab_old = merk_nbewtab EXCEPTIONS OTHERS = 0.



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