SAP Reports / Programs | Basic Data | SAP Healthcare - Industry-Specific Components for Hospitals | Basic Data(IS-H-BD) SAP IS

RNCEDIWORK2 SAP ABAP Report - EDI Worklist







RNCEDIWORK2 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for EDI Worklist The EDI Worklist lets you check and process EDI messages in SAP Patient Management...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.

If you would like to execute this report or see the full code listing simply enter RNCEDIWORK2 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

NEDIWORK - IS-H EDI Worklist
NEDIW - EDI Worklist


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 RNCEDIWORK2. "Basic submit
SUBMIT RNCEDIWORK2 AND RETURN. "Return to original report after report execution complete
SUBMIT RNCEDIWORK2 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: P_DBQNT = Max. Number of Messages
Selection Text: P_EXPAND = Expand Message Details
Selection Text: P_INBOU = Inbound Messages
Selection Text: P_MSGDSP = Display Message Content
Selection Text: P_NC301S = Active
Selection Text: P_NC301T = Archived
Selection Text: P_OUADMT = Admitting
Selection Text: P_OUCURR = Current or Last
Selection Text: P_OUDISC = Discharging
Selection Text: P_OUNONE = None
Selection Text: P_OUTBOU = Outbound Messages
Selection Text: P_WORK = Only to Be Processed
Selection Text: SELF301M = Seq. File No. at DCP
Selection Text: SE_ADDAT = Admission/Visit Date
Selection Text: SE_DIDAT = Discharge Date
Selection Text: SE_NRSOU = Nrs./Treatment Org. Unit
Selection Text: SE_PNAME = Last Name
Selection Text: SE_SPEOU = Department
Selection Text: P_EINRI = D .
Selection Text: P_EPROC = D .
Selection Text: SE_SESTA = D .
Selection Text: SE_SEDAT = D .
Selection Text: SE_PATNR = D .
Selection Text: SE_NOINF = D .
Selection Text: SE_LF301 = D .
Selection Text: SE_KOSTR = D .
Selection Text: SE_FALNR = D .
Selection Text: SE_EXTNR = D .
Selection Text: SE_EXTKY = D .
Selection Text: SE_ERDAT = D .
Selection Text: SE_EANR = D .
Selection Text: SE_DS301 = D .
Selection Text: SE_DCST = D .
Selection Text: SE_APST = D .
Selection Text: SE_AMBTY = D .
Selection Text: SELF301D = D .
Selection Text: SEDAS301 = D .
Selection Text: P_SELKZ = D .





Selection Text: P_LAYOUT = D .
Title: EDI Worklist
Text Symbol: U42 = Expand Message Details
Text Symbol: U41 = Display Message Content
Text Symbol: U34 = None
Text Symbol: U33 = Discharging
Text Symbol: U32 = Admitting
Text Symbol: U31 = Current or Last
Text Symbol: U04 = List Specifications
Text Symbol: M02 = Message
Text Symbol: M01 = Patient
Text Symbol: L19 = Reimport
Text Symbol: L18 = Messages Partially Processed: to Process
Text Symbol: L17 = Illegal Value
Text Symbol: L16 = Error
Text Symbol: L15 = Warning
Text Symbol: L14 = Information
Text Symbol: L13 = Message Ready to Send, Withheld
Text Symbol: L10 = Internal Error During Message Receipt
Text Symbol: L09 = External Error in Inbound Message
Text Symbol: L08 = Errored Message Rejected
Text Symbol: L07 = Message Processed Successfully
Text Symbol: L05 = Message Sent or Received
Text Symbol: L04 = Message Errored, Cannot Be Sent
Text Symbol: L03 = Message Correct, Ready to Send
Text Symbol: L02 = Outbound Message
Text Symbol: L01 = Inbound Message
Text Symbol: 110 = Input Help: Organizational Unit
Text Symbol: 100 = Displayed Organizational Units:
Text Symbol: 003 = Errors
Text Symbol: 002 = Messages
Text Symbol: 001 = Only Supported for Procedure P301
Text Symbol: M03 = I/O ;; inbound/outbound, 4 characters max.
Text Symbol: U03 = Assigned Organizational Units (Selection and Display)
Text Symbol: U02 = Messages
Text Symbol: U01 = Case and Patient Specifications
Text Symbol: U00 = EDI Procedure
Text Symbol: M30 = SP/TPP
Text Symbol: M28 = Error Message Status





Text Symbol: M26 = Direction
Text Symbol: M24 = Message Status
Text Symbol: M22 = Not Processed
Text Symbol: M21 = Processed
Text Symbol: M20 = Processing Status
Text Symbol: M17 = Expand
Text Symbol: M16 = 6th Key
Text Symbol: M15 = 5th Key
Text Symbol: M14 = 4th Key
Text Symbol: M13 = 3rd Key
Text Symbol: M12 = 2nd Key
Text Symbol: M11 = 1st Key
Text Symbol: M08 = I/O Date
Text Symbol: M07 = Ins. Provider
Text Symbol: M06 = Nrs./Trt OU
Text Symbol: M05 = Dept.OU
Text Symbol: M04 = Status


INCLUDES used within this REPORT RNCEDIWORK2

INCLUDE MNCEDIG0.
INCLUDE MNC301D1.
INCLUDE MNCDATA0.
INCLUDE RNLALV00.
INCLUDE MNCEDIEV.
INCLUDE MNC301_VERSION_INDEPENDENT.
INCLUDE RNCIEDIP.
INCLUDE RNCIEDII.
INCLUDE RNCIEDIU.


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_COUNTRY_VERSION_GET CALL FUNCTION 'ISH_COUNTRY_VERSION_GET' IMPORTING ss_cvers = g_cvers EXCEPTIONS OTHERS = 1.

ISH_AUTH_CHECK_REPORT_EINRI CALL FUNCTION 'ISH_AUTH_CHECK_REPORT_EINRI' EXPORTING repid = reportid einri = p_einri * NO_MESSAGE = ' ' IMPORTING rc = auth_rc EXCEPTIONS OTHERS = 1.

ISH_TN00E_READ CALL FUNCTION 'ISH_TN00E_READ' EXPORTING ss_einri = p_einri IMPORTING ss_tn00e = wtn00e.

ISH_EDI_READ_TNC301G0 CALL FUNCTION 'ISH_EDI_READ_TNC301G0' EXPORTING i_ediproc = p_eproc IMPORTING e_tnc301g0 = wtnc301g0.

ISH_CASE_VALUE_REQUEST CALL FUNCTION 'ISH_CASE_VALUE_REQUEST' EXPORTING ss_einri = p_einri ss_vcode = 'UPD' IMPORTING ss_falnr = se_falnr-low.

ISH_CASE_VALUE_REQUEST



CALL FUNCTION 'ISH_CASE_VALUE_REQUEST' EXPORTING ss_einri = p_einri ss_vcode = 'UPD' IMPORTING ss_falnr = se_falnr-high.

ISH_SHOW_LIST_PATIENT CALL FUNCTION 'ISH_SHOW_LIST_PATIENT' EXPORTING anfo = on vcode = 'DIS' npat_einri = p_einri IMPORTING npat_patnr = help_patnr EXCEPTIONS geschlecht_falsch = 01 no_authority = 02 npat_not_found = 03 selection_false = 04.

ISH_SHOW_LIST_PATIENT CALL FUNCTION 'ISH_SHOW_LIST_PATIENT' EXPORTING anfo = on vcode = 'DIS' npat_einri = p_einri IMPORTING npat_patnr = help_patnr EXCEPTIONS geschlecht_falsch = 01 no_authority = 02 npat_not_found = 03 selection_false = 04.

ISH_GRAPHIC_ORGID_SELECT CALL FUNCTION 'ISH_GRAPHIC_ORGID_SELECT' EXPORTING ambes = off pfzuw = off fazuw = on date = sy-datum einri = p_einri no_bauid = on freig = on graph_title = 'Eingabehilfe: Organisationseinheit'(110) vcode = 'UPD' IMPORTING selected_orgid = se_speou-low.

ISH_GRAPHIC_ORGID_SELECT CALL FUNCTION 'ISH_GRAPHIC_ORGID_SELECT' EXPORTING ambes = off pfzuw = off fazuw = on date = sy-datum einri = p_einri no_bauid = on freig = on graph_title = 'Eingabehilfe: Organisationseinheit'(110) vcode = 'UPD' IMPORTING selected_orgid = se_speou-high.

ISH_GRAPHIC_ORGID_SELECT CALL FUNCTION 'ISH_GRAPHIC_ORGID_SELECT' EXPORTING ambes = on pfzuw = on fazuw = off date = sy-datum einri = p_einri no_bauid = on freig = on graph_title = 'Eingabehilfe: Organisationseinheit'(110) vcode = 'UPD' IMPORTING selected_orgid = se_nrsou-low.

ISH_GRAPHIC_ORGID_SELECT CALL FUNCTION 'ISH_GRAPHIC_ORGID_SELECT' EXPORTING ambes = on pfzuw = on fazuw = off date = sy-datum einri = p_einri no_bauid = on freig = on graph_title = 'Eingabehilfe: Organisationseinheit'(110) vcode = 'UPD' IMPORTING selected_orgid = se_nrsou-high.

ISH_F4_HELP_MSGTYPE CALL FUNCTION 'ISH_F4_HELP_MSGTYPE' EXPORTING get_dynp_ediproc = on dyname = reportid dynumb = '1000' fieldname = 'P_EPROC' IMPORTING ntkrz = se_ds301-low EXCEPTIONS OTHERS = 0.

ISH_F4_HELP_MSGTYPE CALL FUNCTION 'ISH_F4_HELP_MSGTYPE' EXPORTING get_dynp_ediproc = on dyname = reportid dynumb = '1000' fieldname = 'P_EPROC' IMPORTING ntkrz = se_ds301-high EXCEPTIONS OTHERS = 0.

ISH_SHOW_GPART CALL FUNCTION 'ISH_SHOW_GPART' EXPORTING aufruf = 'Y' rolle = '2' vcode = 'UPD' IMPORTING ngpa_gpart = se_kostr-low EXCEPTIONS OTHERS = 0.

ISH_SHOW_GPART CALL FUNCTION 'ISH_SHOW_GPART' EXPORTING aufruf = 'Y' rolle = '2' vcode = 'UPD' IMPORTING ngpa_gpart = se_kostr-high EXCEPTIONS OTHERS = 0.

REUSE_ALV_HIERSEQ_LIST_DISPLAY CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY' EXPORTING i_callback_program = reportid i_callback_user_command = 'WL_USER_COMMAND' i_callback_pf_status_set = 'SET_PF_STATUS' i_tabname_header = g_tabname_header i_tabname_item = g_tabname_item i_structure_name_header = gc_outtab_header_name i_structure_name_item = gc_outtab_item_name is_keyinfo = gs_keyinfo is_layout = gs_layout it_fieldcat = gt_fieldcat[] is_variant = gs_variant it_events = gt_events[] "for top_of_page it_sort = gt_zsum[] i_save = 'A' * I_SCREEN_START_COLUMN = 0 "Use coordinates for * I_SCREEN_START_LINE = 0 "display as dialog box * I_SCREEN_END_COLUMN = 0 * I_SCREEN_END_LINE = 0 IMPORTING e_exit_caused_by_caller = g_exit_caused_by_caller es_exit_caused_by_user = gs_exit_caused_by_user TABLES t_outtab_header = gt_outtab_header t_outtab_item = gt_outtab_item EXCEPTIONS program_error = 1 OTHERS = 2.

ISH_COUNTRY_VERSION_GET CALL FUNCTION 'ISH_COUNTRY_VERSION_GET' IMPORTING ss_cvers = g_cvers EXCEPTIONS OTHERS = 1.

ISH_CALL_LIST_HEAD CALL FUNCTION 'ISH_CALL_LIST_HEAD' EXPORTING einri = p_einri line_size = 132 repid = reportid title_lin1 = headerline1 title_lin2 = headerline2 uline = ' '.

REUSE_ALV_EVENTS_GET CALL FUNCTION 'REUSE_ALV_EVENTS_GET' EXPORTING i_list_type = 0 IMPORTING et_events = e03_lt_events.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_program_name = reportid i_internal_tabname = gc_outtab_header_name i_client_never_display = on i_inclname = reportid CHANGING ct_fieldcat = lt_fieldcat.

REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_program_name = reportid i_internal_tabname = gc_outtab_item_name i_client_never_display = on i_inclname = reportid CHANGING ct_fieldcat = lt_fieldcat.

ISH_NBEWTAB_REFRESH CALL FUNCTION 'ISH_NBEWTAB_REFRESH'.

ISH_COUNTRY_VERSION_GET CALL FUNCTION 'ISH_COUNTRY_VERSION_GET' IMPORTING ss_cvers = g_cvers EXCEPTIONS OTHERS = 1.

ISH_SAP_BP_CHECK_ACTIVE CALL FUNCTION 'ISH_SAP_BP_CHECK_ACTIVE' IMPORTING E_STATUS = l_sap_bp_active EXCEPTIONS OTHERS = 0.

ISH_READ_NPAT_MULTI ** CALL FUNCTION 'ISH_READ_NPAT_MULTI' ** EXPORTING ** it_npat_pk = multi_patnr_key ** I_READ_DB = on ** I_BUFFER_REQ = on ** I_PSEUDO_OVERRIDE = off ** IMPORTING ** ET_NPAT = lt_npat_patnr.

ISH_MAP_TITLE_BP2ISH CALL FUNCTION 'ISH_MAP_TITLE_BP2ISH' EXPORTING i_bp_title_key = -title_aca1 IMPORTING * E_ISH_TITLE_KEY = e_ish_title_txt = l_ttout .

ISH_MAP_PREFIX_BP2ISH CALL FUNCTION 'ISH_MAP_PREFIX_BP2ISH' EXPORTING i_bp_prefix_key = -prefix1 IMPORTING * E_ISH_PREFIX_KEY = e_ish_prefix_txt = l_ttout .

ISH_NPAT_CONCATENATE CALL FUNCTION 'ISH_NPAT_CONCATENATE' EXPORTING ss_patnr = wnpat-patnr ss_npat = wnpat IMPORTING ss_pname = ipatname-pnstr.

ISH_TRANS_STAND CALL FUNCTION 'ISH_TRANS_STAND' EXPORTING string_norm = c_pname+off(plen) IMPORTING STRING_STAND = stand.

ISH_TRANS_STAND CALL FUNCTION 'ISH_TRANS_STAND' EXPORTING string_norm = c_pname+off(plen) IMPORTING STRING_STAND = stand.

ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = line-name info = line-info IMPORTING result = line-result.

ISH_EDI_CASE_OVERVIEW CALL FUNCTION 'ISH_EDI_CASE_OVERVIEW' EXPORTING einri = gr_outtab_header-einri ediproc = gr_outtab_header-ediproc falnr = gr_outtab_header-falnr popup = on.

ISH_DALE_MESSAGE_DISPLAY CALL FUNCTION 'ISH_DALE_MESSAGE_DISPLAY' EXPORTING i_lf301 = gr_outtab_header-lf301 i_with_stylesheet = on EXCEPTIONS OTHERS = 0.

ISH_AT_EDI_KOM CALL FUNCTION 'ISH_AT_EDI_KOM' EXPORTING i_einri = gr_outtab_header-einri i_ediproc = gr_outtab_header-ediproc i_falnr = gr_outtab_header-falnr EXCEPTIONS CASE_NOT_FOUND = 1 OTHERS = 2 .

ISH_COUNTRY_VERSION_GET call function 'ISH_COUNTRY_VERSION_GET' importing ss_cvers = l_cvers.

ISH_EDI_CONVERT_NTYP_E2I CALL FUNCTION 'ISH_EDI_CONVERT_NTYP_E2I' EXPORTING standard = gr_outtab_header-stand version = gr_outtab_header-stver ntownercode = gvar_edi_ntownercde ntyp_extern = gr_outtab_header-ds301 IMPORTING ntyp_intern = ntnr EXCEPTIONS parameter_error = 1 unknown_type = 2 OTHERS = 3.

ISH_EDI_NC301I_NEW_ENTRY CALL FUNCTION 'ISH_EDI_NC301I_NEW_ENTRY' EXPORTING ntnr = ntnr highest_lf301f = highest_lf301f i_nc301s = hnc301s TABLES e_nc301i = e_nc301i EXCEPTIONS OTHERS = 0.

ISH_NBEWTAB_GET_LFDNR CALL FUNCTION 'ISH_NBEWTAB_GET_LFDNR' EXPORTING ss_einri = -einri ss_falnr = -falnr ss_lfdnr = -visitnr IMPORTING ss_nbew = work_nbew EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_NBEWTAB_GET_ADMISSION CALL FUNCTION 'ISH_NBEWTAB_GET_ADMISSION' EXPORTING ss_einri = -einri ss_falnr = -falnr IMPORTING ss_nbew = work_nbew EXCEPTIONS not_found = 1.

ISH_NBEWTAB_GET_FIRST_VISIT CALL FUNCTION 'ISH_NBEWTAB_GET_FIRST_VISIT' EXPORTING ss_einri = -einri ss_falnr = -falnr IMPORTING ss_nbew = work_nbew EXCEPTIONS not_found = 0.

ISH_NBEWTAB_GET_DISCHARGE CALL FUNCTION 'ISH_NBEWTAB_GET_DISCHARGE' EXPORTING ss_einri = -einri ss_falnr = -falnr IMPORTING ss_nbew = work_nbew EXCEPTIONS not_found = 1.

ISH_NBEWTAB_GET_LAST_VISIT CALL FUNCTION 'ISH_NBEWTAB_GET_LAST_VISIT' EXPORTING ss_einri = -einri ss_falnr = -falnr IMPORTING ss_nbew = work_nbew EXCEPTIONS not_found = 0.

ISH_CASE_SELECTION_READ CALL FUNCTION 'ISH_CASE_SELECTION_READ' EXPORTING ss_einri = l_p_einri ss_selkz = l_p_selkz TABLES ss_faelle = se_falnr " limited to selected cases ss_falnr = case_selection_tab "result EXCEPTIONS OTHERS = 2.

ENQUEUE_ENFAK CALL FUNCTION 'ENQUEUE_ENFAK' EXPORTING einri = einri selkz = selkz EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

DEQUEUE_ENFAK CALL FUNCTION 'DEQUEUE_ENFAK' EXPORTING einri = einri selkz = selkz.

ISH_MESSAGE_LONGTEXT_DISPLAY CALL FUNCTION 'ISH_MESSAGE_LONGTEXT_DISPLAY' EXPORTING msgid = gr_outtab_item-arbgb msgno = tata msgv1 = gr_outtab_item-msgv1 msgv2 = gr_outtab_item-msgv2 msgv3 = gr_outtab_item-msgv3 msgv4 = gr_outtab_item-msgv4.

ISH_MESSAGE_LONGTEXT_DISPLAY CALL FUNCTION 'ISH_MESSAGE_LONGTEXT_DISPLAY' EXPORTING msgid = msgid msgno = msgnr msgv1 = gr_outtab_item-msgv1 msgv2 = gr_outtab_item-msgv2 msgv3 = gr_outtab_item-msgv3 msgv4 = gr_outtab_item-msgv4 EXCEPTIONS OTHERS = 1.

ISH_EDI_CONVERT_APSTATE_E2I CALL FUNCTION 'ISH_EDI_CONVERT_APSTATE_E2I' EXPORTING i_ediproc = gr_outtab_header-ediproc i_apstate = gr_outtab_header-apstate IMPORTING e_apstati = tmp_status EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_EDI_HANDLE_WAITING_MSGS CALL FUNCTION 'ISH_EDI_HANDLE_WAITING_MSGS' EXPORTING ediproc = gr_outtab_header-ediproc institution = gr_outtab_header-einri casenumber = gr_outtab_header-falnr received_status = tmp_status IMPORTING rc = lrc count_unlocked = dbcnt1 count_orders_created = dbcnt2 count_status_reset = dbcnt3 count_deleted = dbcnt4 EXCEPTIONS OTHERS = 1.

ISH_LOGUPDATE_TN00L call function 'ISH_LOGUPDATE_TN00L' exporting einri = gr_outtab_header-einri identifier = 'RNCEDIWORK2' "sy-repid identif2 = info1 * longinfo = 'manuelle Sperrfristaufhebung' exceptions others = 0.

ISH_SAP_BP_CHECK_ACTIVE CALL FUNCTION 'ISH_SAP_BP_CHECK_ACTIVE' IMPORTING E_STATUS = l_sap_bp_active EXCEPTIONS * NOT_ACTIVE = 1 OTHERS = 0.

ISH_NBEWTAB_GET_CURRENT CALL FUNCTION 'ISH_NBEWTAB_GET_CURRENT' EXPORTING ss_einri = einri ss_falnr = falnr * SS_READ_STORN = ' ' IMPORTING ss_orgfa = orgfa ss_orgpf = orgpf EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_NBEWTAB_GET_LAST_VISIT CALL FUNCTION 'ISH_NBEWTAB_GET_LAST_VISIT' EXPORTING ss_einri = einri ss_falnr = falnr * ss_read_storn = ' ' IMPORTING ss_nbew = wnbew EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_NBEWTAB_GET_ADMISSION CALL FUNCTION 'ISH_NBEWTAB_GET_ADMISSION' EXPORTING ss_einri = einri ss_falnr = falnr * SS_READ_STORN = ' ' IMPORTING ss_nbew = wnbew EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_NBEWTAB_GET_FIRST_VISIT CALL FUNCTION 'ISH_NBEWTAB_GET_FIRST_VISIT' EXPORTING ss_einri = einri ss_falnr = falnr * ss_read_storn = ' ' IMPORTING ss_nbew = wnbew EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_NBEWTAB_GET_DISCHARGE CALL FUNCTION 'ISH_NBEWTAB_GET_DISCHARGE' EXPORTING ss_einri = einri ss_falnr = falnr * SS_READ_STORN = ' ' IMPORTING ss_nbew = wnbew EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_NBEWTAB_GET_DISCHARGE * call function 'ISH_NBEWTAB_GET_DISCHARGE' * exporting * ss_einri = einri * ss_falnr = falnr * ss_read_storn = on * importing * ss_nbew = wnbew * exceptions * not_found = 1 * others = 2.

ISH_READ_NFAL CALL FUNCTION 'ISH_READ_NFAL' EXPORTING ss_einri = einri ss_falnr = falnr IMPORTING ss_nfal = infal EXCEPTIONS not_found = 1 no_authority = 2 OTHERS = 3.

ISH_NBEWTAB_GET_LAST_VISIT CALL FUNCTION 'ISH_NBEWTAB_GET_LAST_VISIT' EXPORTING ss_einri = einri ss_falnr = falnr * ss_read_storn = ' ' IMPORTING ss_nbew = wnbew EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_NBEWTAB_GET_LAST_VISIT * call function 'ISH_NBEWTAB_GET_LAST_VISIT' * exporting * ss_einri = einri * ss_falnr = falnr * ss_read_storn = on * importing * ss_nbew = wnbew * exceptions * not_found = 1 * others = 2.

ISH_SAP_OM_CHECK_ACTIVE CALL FUNCTION 'ISH_SAP_OM_CHECK_ACTIVE' IMPORTING e_status = l_status EXCEPTIONS not_active = 1 OTHERS = 2.

ISH_OM_OU_GET CALL FUNCTION 'ISH_OM_OU_GET' EXPORTING i_orgid = w_specou-ouid i_req_infty = ls_reqinfty IMPORTING e_infty_ou = lt_infty EXCEPTIONS nothing_found = 0 internal_error = 0 OTHERS = 0.

ISH_OM_OU_GET CALL FUNCTION 'ISH_OM_OU_GET' EXPORTING i_orgid = w_nursou-ouid i_req_infty = ls_reqinfty IMPORTING e_infty_ou = lt_infty EXCEPTIONS nothing_found = 0 internal_error = 0 OTHERS = 0.

REUSE_ALV_VARIANT_F4 CALL FUNCTION 'REUSE_ALV_VARIANT_F4' EXPORTING is_variant = hlpvar i_save = 'A' IMPORTING e_exit = user_cancel es_variant = gs_variant EXCEPTIONS not_found = 1 program_error = 2 OTHERS = 3.

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.

ISH_SAP_OM_CHECK_ACTIVE CALL FUNCTION 'ISH_SAP_OM_CHECK_ACTIVE' EXCEPTIONS not_active = 1.

ISH_OM_OU_GET CALL FUNCTION 'ISH_OM_OU_GET' EXPORTING i_instn = p_einri i_orgid = wou-low i_req_infty = ls_reqinfty IMPORTING e_infty_ou = lt_infty EXCEPTIONS nothing_found = 1 internal_error = 2 OTHERS = 3.

ISH_SAP_OM_CHECK_ACTIVE CALL FUNCTION 'ISH_SAP_OM_CHECK_ACTIVE' EXCEPTIONS not_active = 1.

ISH_OM_OU_GET CALL FUNCTION 'ISH_OM_OU_GET' EXPORTING i_instn = p_einri i_orgid = wou-low i_req_infty = ls_reqinfty IMPORTING e_infty_ou = lt_infty EXCEPTIONS nothing_found = 1 internal_error = 2 OTHERS = 3.

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = msgv1 IMPORTING OUTPUT = belnr.

CONVERSION_EXIT_ALPHA_INPUT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = msgv3 IMPORTING OUTPUT = bukrs.

ISH_RNCEDIWORK2_CALL_TCODE CALL FUNCTION 'ISH_RNCEDIWORK2_CALL_TCODE' EXPORTING i_tcode = i_tcode i_einri = i_einri i_patnr = i_patnr i_falnr = i_falnr i_visitnr = i_visitnr i_kostr = i_kostr I_BELNR = i_belnr I_GJAHR = i_gjahr I_BUKRS = i_bukrs i_skip = i_skip IMPORTING E_FLAG = e_flag.

ISH_RNCEDIWORK2_CALL_TCODE CALL FUNCTION 'ISH_RNCEDIWORK2_CALL_TCODE' STARTING NEW TASK 'task' DESTINATION 'NONE' EXPORTING i_tcode = i_tcode i_einri = i_einri i_patnr = i_patnr i_falnr = i_falnr i_visitnr = i_visitnr i_kostr = i_kostr I_BELNR = i_belnr I_GJAHR = i_gjahr I_BUKRS = i_bukrs i_skip = i_skip.

ISH_EDI_INSERT_NC301I CALL FUNCTION 'ISH_EDI_INSERT_NC301I' EXPORTING is_nc301i = tmp_nc301i EXCEPTIONS OTHERS = 0.

ISH_EDI_UPDATE_NC301S CALL FUNCTION 'ISH_EDI_UPDATE_NC301S' EXPORTING is_nc301s = wa_nc301s * IMPORTING * RC = EXCEPTIONS OTHERS = 0.

ISH_LOGUPDATE_TN00L CALL FUNCTION 'ISH_LOGUPDATE_TN00L' EXPORTING einri = wa_inc301s-einri identifier = 'RNCEDIWORK2' "sy-repid identif2 = info1 * longinfo = 'manuelle Nachrichtenstatusänderung' EXCEPTIONS OTHERS = 0.

ISH_EDI_UNLOCK_MESSAGE CALL FUNCTION 'ISH_EDI_UNLOCK_MESSAGE' EXPORTING ediproc = wa_inc301s-ediproc institution = wa_inc301s-einri holddt = sy-datum * I_LF301 = i_nc301s = hnc301s IMPORTING rc = lrc dbcnt = count EXCEPTIONS OTHERS = 1.

ISH_LOGUPDATE_TN00L call function 'ISH_LOGUPDATE_TN00L' exporting einri = gt_outtab_header-einri identifier = 'RNCEDIWORK2' "sy-repid identif2 = info1 * longinfo = 'manuelle Sperrfristaufhebung' exceptions others = 0.

ISH_EDI_ORDER_RECREATE CALL FUNCTION 'ISH_EDI_ORDER_RECREATE' EXPORTING i_einri = gr_outtab_header-einri i_ediproc = gr_outtab_header-ediproc i_eventsprocessing = on TABLES i_nc301s = inc301s EXCEPTIONS parameter_error = 1 no_msg_found = 2 function_not_permitted = 3 OTHERS = 4.

ISH_EDI_UPDATE_NC301S CALL FUNCTION 'ISH_EDI_UPDATE_NC301S' * EXPORTING * IS_NC301S = * I_FIELDNAME = ' ' * I_FIELDNAME2 = ' ' IMPORTING rc = l_rc * dbcnt = l_dbcnt TABLES i_nc301s = lt_nc301s_upd[] .

ISH_AT_UPDATE_SEND_EDI_KOM CALL FUNCTION 'ISH_AT_UPDATE_SEND_EDI_KOM' EXPORTING i_sesta = l_sesta_new * I_REFRESH = 'X' it_rnrangelf301 = lrt_rnrangelf301[] EXCEPTIONS error_input = 1 error_db = 2 others = 3 .

ISH_NBEWTAB_READ_MULTIPLE CALL FUNCTION 'ISH_NBEWTAB_READ_MULTIPLE' EXPORTING ss_falnr = falnr_tab.

ISH_SAP_OM_CHECK_ACTIVE CALL FUNCTION 'ISH_SAP_OM_CHECK_ACTIVE' IMPORTING e_status = l_status EXCEPTIONS not_active = 1 OTHERS = 2.

ISH_OM_OU_GET CALL FUNCTION 'ISH_OM_OU_GET' EXPORTING i_orgid = w_specou-ouid i_req_infty = ls_reqinfty IMPORTING e_infty_ou = lt_infty EXCEPTIONS nothing_found = 0 internal_error = 0 OTHERS = 0.

ISH_OM_OU_GET CALL FUNCTION 'ISH_OM_OU_GET' EXPORTING i_orgid = w_nursou-ouid i_req_infty = ls_reqinfty IMPORTING e_infty_ou = lt_infty EXCEPTIONS nothing_found = 0 internal_error = 0 OTHERS = 0.

ISH_NBEWTAB_GET_LFDNR CALL FUNCTION 'ISH_NBEWTAB_GET_LFDNR' EXPORTING ss_einri = einri ss_falnr = falnr ss_lfdnr = visitnr IMPORTING ss_nbew = ls_nbew EXCEPTIONS not_found = 1 OTHERS = 2.

ISH_NBEWTAB_GET_ADMISSION CALL FUNCTION 'ISH_NBEWTAB_GET_ADMISSION' EXPORTING ss_einri = einri ss_falnr = falnr * SS_READ_STORN = ' ' IMPORTING ss_nbew = ls_nbew EXCEPTIONS OTHERS = 1.

ISH_QUARTER_GET CALL FUNCTION 'ISH_QUARTER_GET' EXPORTING ss_date = l_q_begin IMPORTING ss_begin = l_q_begin ss_end = l_q_end EXCEPTIONS OTHERS = 1.

ISH_NBEWTAB_READ CALL FUNCTION 'ISH_NBEWTAB_READ' EXPORTING ss_einri = einri ss_falnr = falnr * SS_READ_DB = ' ' * SS_READ_STORN = ' ' TABLES ss_nbewtab = lt_nbew EXCEPTIONS OTHERS = 1.



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