RNABDT02_FORMS SAP ABAP INCLUDE - RNABDT02FORMS
RNABDT02_FORMS 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 RNABDT02_FORMS 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 RNABDT02_FORMS. "Basic submit
SUBMIT RNABDT02_FORMS AND RETURN. "Return to original report after report execution complete
SUBMIT RNABDT02_FORMS 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 RNABDT02_FORMS
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_VERBUCHER_NFAL CALL FUNCTION 'ISH_VERBUCHER_NFAL' "HW1456711 IN UPDATE TASK EXPORTING o_tnfal =
tcode = g_tcode tnfal = s_new_nfal upd_icdtxt_nfal = off up_date = sy-datum up_time = sy-uzeit vcode_nfal = update.
ISH_FALL_BDT CALL FUNCTION 'ISH_FALL_BDT' EXPORTING * ABRECHNUNGSQUARTAL = * DATASET = ' ' * DOWNLOAD = 'X' einrichtung = p_einri fallnummer = p_nfal-falnr i_nfal = p_nfal i_npat = p_npat message_collect = on message_show = off * PFAD = version = p_bdt_version ktid_nr = p_ktid_nr kvnr_erm = p_kvnr_erm ws_communication = on i_caller = 'KV_BILLING' IMPORTING * FALL_BDT_LENGTH = e_kv_case_data = t_kv_data TABLES diagnosen_i = pt_ndia leistung_i = pt_nlei scheine_i = pt_nksk versicherung_f = pt_ncir e_return = t_return EXCEPTIONS no_bewegungen_found = 1 no_diagnosen_i = 2 no_einrichtung_found = 3 no_exportingparameter_found = 4 no_fallnummer_found = 5 no_fall_parameter_found = 6 no_leistung_i = 7 no_ncir_found = 8 no_pfad_found = 9 no_scheine_i = 10 no_scheinuntergruppe_found = 11 no_tn16m_found = 12 no_vsbdt_found = 13 write_error = 14 no_convert = 15 missing_case_data = 16 OTHERS = 99.
ENQUEUE_ENFAL CALL FUNCTION 'ENQUEUE_ENFAL' EXPORTING * MODE_NFAL = 'E' * MANDT = SY-MANDT einri = p_nfal-einri falnr = p_nfal-falnr * X_EINRI = ' ' * X_FALNR = ' ' * _SCOPE = '2' * _WAIT = ' ' * _COLLECT = ' ' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
ISH_MESSAGE_TEXT_BUILD CALL FUNCTION 'ISH_MESSAGE_TEXT_BUILD' EXPORTING msgid = p_msgid msgnr = p_msgno msgv1 = p_msgv1 msgv2 = p_msgv2 msgv3 = p_msgv3 msgv4 = p_msgv4 IMPORTING message_text_output = l_text EXCEPTIONS OTHERS = 1.
MESSAGE_TEXTS_READ CALL FUNCTION 'MESSAGE_TEXTS_READ' EXPORTING msg_log_imp = ls_msg_log IMPORTING msg_text_exp = ls_msg_text.
REUSE_ALV_HIERSEQ_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY' EXPORTING i_callback_program = callback_prog i_callback_user_command = 'USER_COMMAND' i_callback_pf_status_set = 'SET_PFSTATUS' i_save = 'A' i_tabname_header = 'ITAB_HEAD' i_tabname_item = 'INFAM' is_keyinfo = gs_keyinfo is_layout = gs_layout it_events = gt_events[] it_fieldcat = xfield it_sort = gs_sort is_variant = gs_variant TABLES t_outtab_header = itab_head t_outtab_item = infam.
ISH_NPAT_CONCATENATE CALL FUNCTION 'ISH_NPAT_CONCATENATE' EXPORTING ss_patnr = npat-patnr ss_npat = npat ss_npat_complete = on IMPORTING ss_pname = itab_head-namstr EXCEPTIONS OTHERS = 0.
ISH_GET_AUFDT_ENTDT CALL FUNCTION 'ISH_GET_AUFDT_ENTDT' EXPORTING ss_einri = itab_head-einri ss_falnr = itab_head-falnr IMPORTING ss_rnf06 = itab_head-rnf06 ss_rnf08 = itab_head-rnf08 EXCEPTIONS not_found = 1 no_authority = 2 OTHERS = 3.
ISH_READ_NFAL CALL FUNCTION 'ISH_READ_NFAL' EXPORTING ss_einri = itab_head-einri ss_falnr = itab_head-falnr ss_read_db = ' ' IMPORTING ss_nfal = nfal EXCEPTIONS not_found = 03 no_authority = 04.
ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_einri = itab_head-einri ss_patnr = curr_patnr IMPORTING ss_npat = npat EXCEPTIONS not_found = 0 no_authority = 0.
ISH_READ_NFAL CALL FUNCTION 'ISH_READ_NFAL' EXPORTING ss_einri = infam-einri ss_falnr = infam-falnr ss_read_db = ' ' IMPORTING ss_nfal = nfal EXCEPTIONS not_found = 03 no_authority = 04.
ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_einri = infam-einri ss_patnr = curr_patnr I_PSEUDO_OVERRIDE = on IMPORTING ss_npat = npat EXCEPTIONS not_found = 03 no_authority = 04.
ISH_CALL_LIST_HEAD CALL FUNCTION 'ISH_CALL_LIST_HEAD' EXPORTING einri = se_einri line_size = rnstat-line_size repid = rnstat-repid title_lin1 = rnstat-title_lin1 title_lin2 = rnstat-title_lin2 uline = off EXCEPTIONS invalid_einri = 0 OTHERS = 0.
REUSE_ALV_LIST_LAYOUT_INFO_GET CALL FUNCTION 'REUSE_ALV_LIST_LAYOUT_INFO_GET' IMPORTING es_layout = gs_layout et_fieldcat = xfield[] * ET_SORT = * ET_FILTER = * ES_LIST_SCROLL = * ES_VARIANT = EXCEPTIONS no_infos = 0 program_error = 0 OTHERS = 0.
REUSE_ALV_HS_LIST_WIDTH_GET CALL FUNCTION 'REUSE_ALV_HS_LIST_WIDTH_GET' EXPORTING i_tabname_header = 'ITAB_HEAD' i_tabname_item = 'INFAM' it_fieldcat = xfield[] is_layout = gs_layout IMPORTING e_width = $width EXCEPTIONS OTHERS = 0.
ISH_ALV_FOOTER CALL FUNCTION 'ISH_ALV_FOOTER' EXPORTING i_width = $width it_lines = it_lines.
ISH_TC_SWITCH_OFF_BY_FUNCTION call function 'ISH_TC_SWITCH_OFF_BY_FUNCTION' exporting i_fcode = ucomm.
ISH_TC_CHECK_AND_REQUEST call function 'ISH_TC_CHECK_AND_REQUEST' exporting i_einri = im-einri i_falnr = im-falnr exceptions no_treatment_contract = 1 others = 0.
CALL FUNCTION 'ISH_KV_SHOW_PAT_RECEIPT' EXPORTING i_sysid = sy-sysid i_mandt = sy-mandt i_kvnummer = kvnr_erm i_falnr = im-falnr IMPORTING et_error = lt_error es_return = ls_return EXCEPTIONS pdf_display_error = 1 OTHERS = 2.
ISH_BAPIRET2_DISPLAY CALL FUNCTION 'ISH_BAPIRET2_DISPLAY' * EXPORTING * SEND_IF_ONE = ' ' * OBJECT = ' ' * SHOW_LINNO = 'X' * AMODAL_WINDOW = ' ' TABLES ss_bapiret2 = lt_error .
POPUP_TO_CONFIRM_LOSS_OF_DATA CALL FUNCTION 'POPUP_TO_CONFIRM_LOSS_OF_DATA' EXPORTING textline1 = 'Programm abbrechen?'(p03) titel = tr_text IMPORTING answer = $antw.
ISH_TCODE_CALL CALL FUNCTION 'ISH_TCODE_CALL' EXPORTING i_einri = im-einri i_tcode = l_tcode i_skip = l_skip EXCEPTIONS OTHERS = 4.
HELPSCREEN_NA_CREATE CALL FUNCTION 'HELPSCREEN_NA_CREATE' EXPORTING meldung = meldung meld_id = infam-arbgb meld_nr = meld_nr msgv1 = infam-msgv1 msgv2 = infam-msgv2 msgv3 = infam-msgv3 msgv4 = infam-msgv4 titel = titel.
ISH_READ_NFAL CALL FUNCTION 'ISH_READ_NFAL' EXPORTING ss_einri = einri ss_falnr = falnr IMPORTING ss_nfal = nfal EXCEPTIONS not_found = 1 no_authority = 2 OTHERS = 3.
ISH_SHOW_LIST_FALL CALL FUNCTION 'ISH_SHOW_LIST_FALL' EXPORTING exit_on_weiter = on nfal_einri = im-einri nfal_falnr = im-falnr nfal_patnr = patnr * NPATSTRING = NPAT only_falnr = on popup = on.
ISH_VERBUCHER_NFAL CALL FUNCTION 'ISH_VERBUCHER_NFAL' "HW1456711 IN UPDATE TASK EXPORTING o_tnfal = ls_upd_nfal tcode = g_tcode tnfal = ls_nfal upd_icdtxt_nfal = off up_date = sy-datum up_time = sy-uzeit vcode_nfal = update.
ISH_BAPIRET2_DISPLAY CALL FUNCTION 'ISH_BAPIRET2_DISPLAY' TABLES ss_bapiret2 = lt_error.
ISH_WS_BDT_GET_MESSAGES CALL FUNCTION 'ISH_WS_BDT_GET_MESSAGES' EXPORTING * I_SYSID = SY-SYSID * I_CLIENT = SY-MANDT i_kvnum = i_kvnum i_quarter = i_quarter * I_TESTRUN = 'X' IMPORTING et_error = et_error es_return = es_return et_pdf_docs = et_pdf_tab .
ISH_BAPI_MSGTY_MAX_SEVERITY CALL FUNCTION 'ISH_BAPI_MSGTY_MAX_SEVERITY' IMPORTING ss_msgty = l_msgty TABLES ss_message = lt_error.
ISH_BAPI_ADD_RETURN_PARAM CALL FUNCTION 'ISH_BAPI_ADD_RETURN_PARAM' CHANGING c_return_tab = et_message.
ISH_DYNP_VALUES_READ CALL FUNCTION 'ISH_DYNP_VALUES_READ' EXPORTING dyname = l_repid dynumb = l_dynnr translate_to_upper = on TABLES dynpfields = idynpfields EXCEPTIONS invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 undefind_error = 7 OTHERS = 8.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = dynp_einri IMPORTING output = dynp_einri.
ENQUEUE_ENTS00 CALL FUNCTION 'ENQUEUE_ENTS00' EXPORTING mode_tns00 = 'E' mandt = sy-mandt progname = tmp_kvnr_erm * X_PROGNAME = ' ' _scope = '3' * _WAIT = ' ' * _COLLECT = ' ' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
DEQUEUE_ENTS00 CALL FUNCTION 'DEQUEUE_ENTS00' EXPORTING mode_tns00 = 'E' mandt = sy-mandt progname = tmp_kvnr_erm * X_PROGNAME = ' ' _scope = '3' * _SYNCHRON = ' ' * _COLLECT = ' ' .
ISH_POOL_REFRESH_FALNR CALL FUNCTION 'ISH_POOL_REFRESH_FALNR' EXPORTING ss_falnr = p_falnr ss_einri = p_einri.
ISH_POOL_REFRESH_PATNR CALL FUNCTION 'ISH_POOL_REFRESH_PATNR' EXPORTING ss_patnr = p_patnr.
ISH_PATIENT_POOL_GET call function 'ISH_PATIENT_POOL_GET' exporting ss_patnr = p_patnr ss_einri = p_einri importing ss_npat_daba = ls_npat.
ISH_ADDRESS_READ CALL FUNCTION 'ISH_ADDRESS_READ' EXPORTING ss_adrnr = ls_npat-adrnr ss_adrob = ls_npat-adrob ss_read_db = on.
ISH_KV_SINGLE_CASE_CHECK CALL FUNCTION 'ISH_KV_SINGLE_CASE_CHECK' EXPORTING i_einri = p_einri i_orgid = l_orgid i_falnr = p_falnr i_commit = on i_show_result_list = off I_CALLBACK_PROG = 'RNABDT02' IMPORTING et_nfam = it_ret_messages e_retmaxtype = l_returntype es_return = ls_return.
ISH_CASESERVICE_POOL_GET CALL FUNCTION 'ISH_CASESERVICE_POOL_GET' EXPORTING ss_einri = ps_nfal-einri ss_falnr = ps_nfal-falnr TABLES SS_VNLEI_CURR = lt_actnlei SS_VNLLZ_CURR = lt_actnllz.
ISH_CASESERVICE_ADJUSTMENTS CALL FUNCTION 'ISH_CASESERVICE_ADJUSTMENTS' EXPORTING ss_einri = p_einri ss_falnr = p_falnr ss_adj_rules = on ss_dialog = off ss_check_rules = on ss_rlshow = off ss_event = l_callup_point * SS_CMVMT = ss_actnpat = ps_npat ss_testrun = l_testrun * IMPORTING * SS_RETMAXTYPE = TABLES ss_actnlei = lt_actnlei * SS_ACTNNLZ = ss_actnllz = lt_actnllz * SS_ACTNLICZ = * SS_ACTNBEW = ss_onlei = lt_onlei * SS_ONNLZ = ss_return = lt_return CHANGING ss_actnfal = ls_actnfal ss_act_complete = l_complete.
ISH_CASESERVICE_POOL_SET CALL FUNCTION 'ISH_CASESERVICE_POOL_SET' EXPORTING ss_einri = ps_nfal-einri ss_falnr = ps_nfal-falnr * SS_SAVED = ' ' * SS_SYNCH_NLICZ = ON TABLES SS_VNLEI_CURR = lt_actnlei * SS_VNNLZ_CURR = SS_VNLLZ_CURR = lt_actnllz * SS_VNLICZ_CURR = EXCEPTIONS POOL_GET_MISSING = 1 OTHERS = 2.
ISH_CASEIV_ASSGN_SERV_POOL_GET CALL FUNCTION 'ISH_CASEIV_ASSGN_SERV_POOL_GET' EXPORTING i_einri = p_einri i_falnr = p_falnr TABLES et_vnlkz_curr = lt_vnlkz_curr * ET_NLKZ_DABA = .
CONVERT_DATE_TO_EXTERNAL CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL' EXPORTING date_internal = ls_rnbdtlei-ibgdt IMPORTING date_external = l_begdt EXCEPTIONS OTHERS = 0.
ISH_CREATE_SELECTION CALL FUNCTION 'ISH_CREATE_SELECTION' EXPORTING i_institution = p_einri it_nfal = lt_nfal i_selkz = p_selna i_overwrite_existing = on IMPORTING e_selkz = l_db_selkz EXCEPTIONS foreign_lock = 1 system_failure = 2 existing_selection = 3 OTHERS = 4.
ISH_MOVEMENTTAB_POOL_GET CALL FUNCTION 'ISH_MOVEMENTTAB_POOL_GET' EXPORTING ss_falnr = im-falnr ss_einri = im-einri TABLES * SS_NBEWTAB_DABA = * SS_NBEWTAB_LAST = ss_nbewtab_curr = lt_nbew .
ISH_SET_KV_MESS CALL FUNCTION 'ISH_SET_KV_MESS' EXPORTING msg_tab = lt_messages.
ISH_NV2000_CALL CALL FUNCTION 'ISH_NV2000_CALL' EXPORTING i_einri = im-einri i_patnr = l_patnr i_falnr = im-falnr i_lfdnr = ls_nbew-lfdnr i_fcode = 'NKVWS' i_vcode = l_vcode * I_PATRL = OFF * I_FALAR_INSERT = '1' * I_ENQUEUE_PATNR = 'X' * I_ENQUEUE_FALNR = 'X' * I_ENQUEUE_PAPID = 'X' i_skip_entry = 'X' i_skip_caselist = 'X' i_wplaceid = 'SAP_ACM_WS' * I_POP_WPLACEID = ' ' * IS_PROPOSAL = * I_TCODE_OLD = ' ' * I_LEAVE = ' ' EXCEPTIONS no_authority = 1 enqueue_missing = 2 admission_not_saved = 3 error = 4 OTHERS = 5 .
ISH_BAPIRET2_DISPLAY CALL FUNCTION 'ISH_BAPIRET2_DISPLAY' * EXPORTING * SEND_IF_ONE = ' ' * OBJECT = ' ' * SHOW_LINNO = 'X' * AMODAL_WINDOW = ' ' TABLES ss_bapiret2 = lt_error .
ENQUEUE_ENFAK CALL FUNCTION 'ENQUEUE_ENFAK' EXPORTING * MODE_NFAK = 'E' * MANDT = SY-MANDT einri = p_institution selkz = p_case_sel_name * X_EINRI = ' ' * X_SELKZ = ' ' * _SCOPE = '2' * _WAIT = ' ' * _COLLECT = ' ' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
DEQUEUE_ENFAK CALL FUNCTION 'DEQUEUE_ENFAK' EXPORTING einri = p_institution selkz = p_case_sel_name.
ISH_KV_ERMNR_GET CALL FUNCTION 'ISH_KV_ERMNR_GET' EXPORTING i_einri = p_einri i_orgid =
-orgid IMPORTING E_KV_ERMNR = l_arztn * E_INSTN = * E_TN23V = EXCEPTIONS NO_TN23V_FOUND = 1 NO_KV_ERMNR_FOUND = 2 TN23V_INCOMPLETE = 3 OTHERS = 4.
ISH_CHECK_COLLECTIVE_ORDER * CALL FUNCTION 'ISH_CHECK_COLLECTIVE_ORDER' * EXPORTING * i_einri = se_einri * i_falnr = ls_updated_cases-falnr * i_bill_date = sy-datum * i_rc = 0 * CHANGING * cs_nfal = ls_nfal. "HW1456711
ISH_WS_BDT_GET_MESSAGES CALL FUNCTION 'ISH_WS_BDT_GET_MESSAGES' EXPORTING * I_SYSID = SY-SYSID * I_CLIENT = SY-MANDT i_kvnum = p_kvnr_erm i_quarter = p_quarter i_testrun = p_test IMPORTING et_error = lt_error es_return = ls_return.
REUSE_ALV_VARIANT_DEFAULT_GET CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET' EXPORTING i_save = 'A' CHANGING cs_variant = gs_variant EXCEPTIONS wrong_input = 1 not_found = 2 program_error = 3 OTHERS = 4.
REUSE_ALV_VARIANT_F4 CALL FUNCTION 'REUSE_ALV_VARIANT_F4' EXPORTING is_variant = hlpvar i_save = 'A' IMPORTING e_exit = gs_exit es_variant = gs_variant EXCEPTIONS not_found = 1 program_error = 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 RNABDT02_FORMS or its description.