/ISHFR/RNWFRGHS_LOAD SAP ABAP Report - IS-H FR: Import GHS Service Master Data
/ISHFR/RNWFRGHS_LOAD is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This report is used to import the GHS service master data to the following tables:
If you would like to execute this report or see the full code listing simply enter /ISHFR/RNWFRGHS_LOAD into the relevant SAP transactions such as SE38 or SE80
Transaction Code(s):
Below is a list of transaction codes which are relevant to this SAP report
/ISHFR/NGHS_LOAD - IS-H FR: Import DRG Services
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 /ISHFR/RNWFRGHS_LOAD. "Basic submit
SUBMIT /ISHFR/RNWFRGHS_LOAD AND RETURN. "Return to original report after report execution complete
SUBMIT /ISHFR/RNWFRGHS_LOAD VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Selection Text: PA_APPL = Import from Appl. Server
Selection Text: PA_GHS = File Name
Selection Text: PA_LOCL = Import from Local Disk Drive
Selection Text: PA_MLEI = Sample Service
Selection Text: PA_TARIF = SC Sample Service
Selection Text: SO_EXLEI = Service Filter
Selection Text: P_STICH = D .
Title: IS-H FR: Import GHS Service Master Data
Text Symbol: BL1 = Files
Text Symbol: BL2 = Execution Parameters
Text Symbol: BL3 = Fixed Data for Service Master
Text Symbol: BL4 = Data Origin
Text Symbol: BL5 = Selection Criteria
Text Symbol: M01 = Here,
Text Symbol: M02 = enter
Text Symbol: P09 = Service Catalog
Text Symbol: S01 = Institution
Text Symbol: S04 = Import from Application Server
Text Symbol: S05 = Import from Local Disk Drive
INCLUDES used within this REPORT /ISHFR/RNWFRGHS_LOAD
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 = se_einri talst = pa_mlei tarif = pa_tarif IMPORTING e_ntpk = l_ntpk EXCEPTIONS not_found = 1 OTHERS = 2.
ISH_HELP_REQUEST CALL FUNCTION 'ISH_HELP_REQUEST' EXPORTING ss_object = '/ISHFR/ISH_EINRI_LOAD' ss_popup = on EXCEPTIONS OTHERS = 1.
ISH_HELP_REQUEST CALL FUNCTION 'ISH_HELP_REQUEST' EXPORTING ss_object = '/ISHFR/ISH_APPL_SERVER' ss_popup = on EXCEPTIONS OTHERS = 1.
ISH_HELP_REQUEST CALL FUNCTION 'ISH_HELP_REQUEST' EXPORTING ss_object = '/ISHFR/ISH_LOCAL_DRIVE' ss_popup = on EXCEPTIONS OTHERS = 1.
ISH_HELP_REQUEST CALL FUNCTION 'ISH_HELP_REQUEST' EXPORTING ss_object = '/ISHFR/ISH_FIXED_DATE' ss_popup = on EXCEPTIONS OTHERS = 1.
ISH_FILE_VALIDATE_NAME CALL FUNCTION 'ISH_FILE_VALIDATE_NAME' CHANGING c_filename = pa_ghs.
ISH_COUNTRY_VERSION_GET CALL FUNCTION 'ISH_COUNTRY_VERSION_GET' IMPORTING ss_cvers = l_version EXCEPTIONS OTHERS = 1.
/ISHFR/_READ_NTPKFR CALL FUNCTION '/ISHFR/_READ_NTPKFR' EXPORTING i_einri = se_einri i_tarif = pa_tarif i_talst = pa_mlei i_vdate = sy-datum IMPORTING es_ntpkfr = g_ntpk_fr EXCEPTIONS not_found = 1 OTHERS = 2.
WS_FILENAME_GET CALL FUNCTION 'WS_FILENAME_GET' EXPORTING * def_filename = * def_path = co_path * mask = '*.TXT, *.TXT.'
ISH_GET_LOCAL_CURRENCY CALL FUNCTION 'ISH_GET_LOCAL_CURRENCY' EXPORTING einri = g_einri IMPORTING hwaers = g_currency.
/ISHFR/_READ_NTPKFR CALL FUNCTION '/ISHFR/_READ_NTPKFR' EXPORTING i_einri = g_einri i_tarif = g_tarif i_talst = g_talst i_vdate = sy-datum IMPORTING es_ntpkfr = gs_ntpkfr_muster EXCEPTIONS not_found = 1 OTHERS = 2.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = gs_101-ghs_nummer IMPORTING output = l_tmp_ghs_nummer.
ISH_HLTHSRVCAT_ADDITEM CALL FUNCTION 'ISH_HLTHSRVCAT_ADDITEM' EXPORTING ss_einri = g_einri ss_tarif = gs_ntpk-tarif ss_testrun = l_testrun TABLES ss_ntpk = lt_rntpkx_insert ss_ntpt = lt_rntptx_insert ss_ntsp = lt_rntspx_insert ss_ntpkfr = lt_rntpkfrx_insert ss_ntpkfr_gh = lt_rntpkfr_ghx_insert ss_return = lt_return.
ISH_HLTHSRVCAT_CHANGEITEM * CALL FUNCTION 'ISH_HLTHSRVCAT_CHANGEITEM' * EXPORTING * ss_einri = g_einri * ss_tarif = gs_ntpk-tarif * ss_testrun = l_testrun * TABLES * ss_ntpk = lt_rntpkx_update * ss_ntpt = lt_rntptx_update * ss_ntsp = lt_rntspx_update * ss_ntpkfr = lt_rntpkfrx_update * ss_ntpkfr_gh = lt_rntpkfr_ghx_update * ss_return = lt_return.
ISH_HLTHSRVCAT_CHANGEITEM CALL FUNCTION 'ISH_HLTHSRVCAT_CHANGEITEM' EXPORTING ss_einri = g_einri ss_tarif = gs_ntpk-tarif ss_testrun = l_testrun ss_endservice = on "ISHFR-440 TABLES ss_ntpk = lt_rntpkx_update_1 ss_ntpt = lt_rntpt "ISHFR-366 ss_ntsp = lt_rntspx ss_ntpkfr = lt_rntpkfrx ss_ntpkfr_gh = lt_rntpkfr_ghx ss_return = lt_return.
ISH_HLTHSRVCAT_CHANGEITEM CALL FUNCTION 'ISH_HLTHSRVCAT_CHANGEITEM' EXPORTING ss_einri = g_einri ss_tarif = gs_ntpk-tarif ss_testrun = l_testrun ss_endservice = on "ISHFR-440 TABLES ss_ntpk = lt_rntpkx_update_1 ss_ntpt = lt_rntptx_update_1 ss_ntsp = lt_rntspx_update_1 ss_ntpkfr = lt_rntpkfrx_update_1 ss_ntpkfr_gh = lt_rntpkfr_ghx_update_1 ss_return = lt_return.
SAVE_TEXT CALL FUNCTION 'SAVE_TEXT' EXPORTING client = sy-mandt header = gs_textheader-textheader insert = ' ' savemode_direct = 'X' IMPORTING newheader = gs_textheader-textheader TABLES lines = lt_textsave EXCEPTIONS id = 1 language = 2 name = 3 object = 4 OTHERS = 5.
SAVE_TEXT CALL FUNCTION 'SAVE_TEXT' EXPORTING client = sy-mandt header = gs_textheader-textheader insert = 'X' savemode_direct = 'X' IMPORTING newheader = gs_textheader-textheader TABLES lines = lt_textsave EXCEPTIONS id = 1 language = 2 name = 3 object = 4 OTHERS = 5.
CALL FUNCTION 'ISH_DYNP_VALUES_READ' EXPORTING dyname = p_prog dynumb = p_dynpnr translate_to_upper = on TABLES dynpfields = lt_dynpfields.
CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = p_fieldval IMPORTING output = p_fieldval EXCEPTIONS OTHERS = 1.
ISH_SHOW_SERVICES_NEW call function 'ISH_SHOW_SERVICES_NEW' exporting einrichtung = g_einri tarif = g_tarif talst = g_talst sel_erfsp = 'X' multi_select = ' ' use_groups = ' ' zotyp = '' change_tarif = '' vcode = 'INS' read_vle = ' ' importing e_ntpk = ntpk exceptions wrong_einri = 1 nothing_found = 2 nothing_selected = 3 missing_zotyp = 4 others = 5.
ENQUEUE_ENNTPK call function 'ENQUEUE_ENNTPK' exporting einri = p_einri tarif = p_tarif talst = p_talst exceptions foreign_lock = 1 system_failure = 2.
ISH_BAPI_FILL_RETURN_PARAM CALL FUNCTION 'ISH_BAPI_FILL_RETURN_PARAM' EXPORTING msgty = 'E' msgid = 'N2' msgno = '623' msgv1 = p_talst msgv2 = l_uname IMPORTING return = ps_return.
ISH_BAPI_FILL_RETURN_PARAM CALL FUNCTION 'ISH_BAPI_FILL_RETURN_PARAM' EXPORTING msgty = 'A' msgid = 'N2' msgno = '049' IMPORTING return = ps_return.
DEQUEUE_ENNTPK call function 'DEQUEUE_ENNTPK' exporting einri = p_einri tarif = p_tarif talst = p_talst.
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 /ISHFR/RNWFRGHS_LOAD or its description.
/ISHFR/RNWFRGHS_LOAD - IS-H FR: Import GHS Service Master Data /ISHFR/RNWFRGHS_LOAD - IS-H FR: Import GHS Service Master Data /ISHFR/RNWFRGHM_LOAD - IS-H FR: Import GHM Service Master Data /ISHFR/RNWFRGHM_LOAD - IS-H FR: Import GHM Service Master Data /ISHFR/RNWFRCOSTCOVERAGE - IS-H FR: Insurance Verification Requests /ISHFR/RNWFRCOSTCOVERAGE - IS-H FR: Insurance Verification Requests