RASORT40 SAP ABAP INCLUDE - documentation and ABAP source code
RASORT40 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 RASORT40 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 RASORT40. "Basic submit
SUBMIT RASORT40 AND RETURN. "Return to original report after report execution complete
SUBMIT RASORT40 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 RASORT40
INCLUDE RSWUINCL.
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:
DDIF_FIELDINFO_GET CALL FUNCTION 'DDIF_FIELDINFO_GET' EXPORTING tabname = ddic_tabname lfieldname = ddic_fieldname IMPORTING dfies_wa = wa_dfies EXCEPTIONS OTHERS = 0.
T093B_READ * call function 'T093B_READ' * exporting * f_t093b = t093b * importing * f_t093b = t093b * exceptions * not_found = 1 * others = 2.
T093B_READ_VIRTUAL CALL FUNCTION 'T093B_READ_VIRTUAL' * IMPORTING * E_VIRTUAL = CHANGING f_t093b = t093b EXCEPTIONS not_found = 1 OTHERS = 2.
AREP_FBEZ_ERMITTELN CALL FUNCTION 'AREP_FBEZ_ERMITTELN' EXPORTING i_feld = feld i_content = fbe_content i_anlav = anlav i_bereich1 = bereich1 i_berdat = berdatum IMPORTING e_bez = fbe_bez.
xxl_full_api * call function 'xxl_full_api' mit Fehlerbehandlung * *---------------------------------------------------------------------* * --> XXL_D * *---------------------------------------------------------------------* FORM call_xxl TABLES xxl_d.
XXL_FULL_API CALL FUNCTION 'XXL_FULL_API' EXPORTING data_ending_at = -1 data_starting_at = 1 filename = 'XXL_1ST ' header_1 = xxl_header1 header_2 = xxl_header2 no_dialog = ' ' no_start = ' ' n_att_cols = xxl_n_att_cols n_hrz_keys = xxl_n_hrz_keys n_vrt_keys = xxl_n_vrt_keys sema_type = ' ' so_title = ' ' TABLES data = xxl_d hkey = xxl_h online_text = xxl_o print_text = xxl_p sema = xxl_s vkey = xxl_v EXCEPTIONS cancelled_by_user = 01 data_too_big = 02 dim_mismatch_data = 03 dim_mismatch_sema = 04 dim_mismatch_vkey = 05 error_in_hkey = 06 error_in_sema = 07 file_open_error = 08 file_write_error = 09 inv_data_range = 10 inv_winsys = 11 inv_xxl = 12.
T093C_READ_MULTIPLE CALL FUNCTION 'T093C_READ_MULTIPLE' TABLES t_t093c = x093c EXCEPTIONS no_bukrs_defined = 1 OTHERS = 2.
T093B_READ_MULTIPLE CALL FUNCTION 'T093B_READ_MULTIPLE' EXPORTING i_bukrs = x093c-bukrs TABLES t_t093b = x093b * T_T093T = EXCEPTIONS t093b_not_found = 1 OTHERS = 2.
AM_ASSET_DELETE_FROM_AI CALL FUNCTION 'AM_ASSET_DELETE_FROM_AI' EXPORTING i_bukrs = anlav-bukrs i_anln1 = anlav-anln1 i_anln2 = anlav-anln2 i_ai_id = pa_ai_id do_commit = 'X'.
AM_ASSET_SEARCH_IN_AI CALL FUNCTION 'AM_ASSET_SEARCH_IN_AI' EXPORTING i_bukrs = anlav-bukrs i_anln1 = anlav-anln1 i_anln2 = anlav-anln2 EXCEPTIONS OTHERS = 8.
AM_ASSET_INSERT_INTO_AI CALL FUNCTION 'AM_ASSET_INSERT_INTO_AI' EXPORTING i_bukrs = anlav-bukrs i_anln1 = anlav-anln1 i_anln2 = anlav-anln2 do_commit = 'X' EXCEPTIONS asset_not_inserted = 1 OTHERS = 2.
AM_WORKFLOW_ITEM_GET CALL FUNCTION 'AM_WORKFLOW_ITEM_GET' IMPORTING e_witem = ls_witem e_avbez = wi_text.
AM_AI_POPUP_GET_CREATE_VAL * CALL FUNCTION 'AM_AI_POPUP_GET_CREATE_VAL' * IMPORTING * E_ORGTASK = DEF_TASK * E_WI_TEXT = WI_TEXT * E_TYP = WI_TYP * ABBRUCH_KZ = RETURNCODE.
SWZ_AI_CREATE CALL FUNCTION 'SWZ_AI_CREATE' EXPORTING application = appl * CALLBACK_FB = ' ' * COMPLETION_EVENT = ' ' creator = creator def_task = def_task * DESIRED_END_ACTION = 'SWW_DI_CREATE' * DESIRED_END_DATE = '00000000' * DESIRED_END_TIME = '000000' * DESIRED_START_DATE = '00000000' * DESIRED_START_TIME = '000000' * LANGUAGE = SY-LANGU * LATEST_END_ACTION = 'SWW_DI_CREATE' * LATEST_END_DATE = '00000000' * LATEST_END_ESCALATION = '0' * LATEST_END_TIME = '000000' * LATEST_START_ACTION = 'SWW_DI_CREATE' * LATEST_START_DATE = '00000000' * LATEST_START_TIME = '000000' priority = prio released = rele * STATUS = 'READY' text = wi_text object_type = c_obj_type application_exec_function = ld_applfb create_event = flg_wfaktiv IMPORTING wi_id = wi_id TABLES agents = agents * the following is no longer available with Rel. 4.7
AM_AI_SELECT CALL FUNCTION 'AM_AI_SELECT' * EXPORTING * I_AI_ID = ' ' IMPORTING e_ai_id = selected_ai e_return = ld_return EXCEPTIONS OTHERS = 1.
SWZ_AI_ELEMENT_APPEND CALL FUNCTION 'SWZ_AI_ELEMENT_APPEND' EXPORTING object = insert_asset wi_id = selected_ai EXCEPTIONS execution_failed = 01 read_failed = 02.
AM_ASSETS_GET_FROM_AI CALL FUNCTION 'AM_ASSETS_GET_FROM_AI' EXPORTING wi_id = u_ai TABLES t_assets = xassets EXCEPTIONS wi_id_not_found = 01 false_objects_in_ai = 02.
POPUP_TO_GET_AI_VALUES CALL FUNCTION 'POPUP_TO_GET_AI_VALUES' EXPORTING i_erlkz = flg_erl i_waers = t093b-waers i_sgtxt = l_sgtxt "<0575417 IMPORTING e_budat = l_budat e_bldat = l_bldat e_bwasl = l_bwasl e_erbdm = l_erbdm e_bzdat = l_bzdat e_sgtxt = l_sgtxt "<0575417 abbruch_kz = returncode e_verkz = l_verkz e_vbund = l_vbund e_posting_areas = ls_ldgrp. "S2I
CALL FUNCTION 'POPUP_TO_GET_AI_MASS_VALUES' EXPORTING i_substid = l_subst_old IMPORTING e_substid = l_substid abbruch_kz = returncode TABLES sel_bukrs = bukrs.
POPUP_TO_GET_AI_VALUES_TRANSF CALL FUNCTION 'POPUP_TO_GET_AI_VALUES_TRANSF' EXPORTING i_waers = t093b-waers IMPORTING abbruch_kz = returncode CHANGING f_trpara = l_trpara.
POPUP_TO_GET_AI_VALUES_IMPAIR CALL FUNCTION 'POPUP_TO_GET_AI_VALUES_IMPAIR' EXPORTING i_waers = t093b-waers IMPORTING abbruch_kz = returncode CHANGING f_imppara = l_imppara.
RS_REFRESH_FROM_DYNAMICAL_SEL CALL FUNCTION 'RS_REFRESH_FROM_DYNAMICAL_SEL' EXPORTING curr_report = hlp_repid mode_write_or_move = hlp_flg IMPORTING p_trange = hlp_range EXCEPTIONS not_found = 01.
SWZ_AI_SHOW CALL FUNCTION 'SWZ_AI_SHOW' EXPORTING wi_id = ai TABLES object_list = ol EXCEPTIONS execution_failed = 01.
RSTI_REPORT_FIELDS_FIND CALL FUNCTION 'RSTI_REPORT_FIELDS_FIND' EXPORTING e_repid = report e_type = 'R' TABLES it_sel = it_selr it_fields = it_fieldr.
RSTI_REPORT_FIELDS_FIND CALL FUNCTION 'RSTI_REPORT_FIELDS_FIND' EXPORTING e_repid = report e_type = 'S' " Sender TABLES it_fields = it_fields it_sel = it_sel.
RSTI_SELECTION_EXPORT CALL FUNCTION 'RSTI_SELECTION_EXPORT' TABLES it_sel = it_sel it_fields = it_fields.
RSTI_COMMUNICATION_HANDLER CALL FUNCTION 'RSTI_COMMUNICATION_HANDLER' EXPORTING * E_SONAM = SREPORT e_fcode = fcode e_rexec = 'X' e_fccls = fccls e_rec = u_rec IMPORTING i_exit = l_exit EXCEPTIONS appl_stack_not_initialized = 01 no_lines = 02 no_line_picked = 03.
RSTI_NAVIGATE CALL FUNCTION 'RSTI_NAVIGATE' * EXPORTING * E_LEVEL = IMPORTING i_exit = l_exit.
RSTI_REPORT_ADD CALL FUNCTION 'RSTI_REPORT_ADD' EXPORTING e_fccls = '9' e_report = report e_recsen = 'S'.
AIC0_MEASURE_SPLIT CALL FUNCTION 'AIC0_MEASURE_SPLIT' EXPORTING i_measure = l_measure IMPORTING e_obart = l_obart e_aufnr = l_aufnr_low e_ps_posid = l_ps_posid_low.
AIC0_MEASURE_SPLIT CALL FUNCTION 'AIC0_MEASURE_SPLIT' EXPORTING i_measure = l_measure IMPORTING e_aufnr = l_aufnr_high e_ps_posid = l_ps_posid_high.
OBJECT_IDENTIFICATION_GET CALL FUNCTION 'OBJECT_IDENTIFICATION_GET' EXPORTING objnr = objnr-low IMPORTING e_ionra = hlp_ionra.
AM_WF_STATUS_PRUEFEN CALL FUNCTION 'AM_WF_STATUS_PRUEFEN' * EXPORTING * I_TASK_OTYPE = 'TS' * I_TASK_OBJID = '0008010' IMPORTING e_wfactive = flg_wfaktiv EXCEPTIONS OTHERS = 0.
AUTHORITY_CHECK_TCODE CALL FUNCTION 'AUTHORITY_CHECK_TCODE' EXPORTING tcode = i_fcode EXCEPTIONS ok = 0 not_ok = 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 RASORT40 or its description.