SAP Reports / Programs | Basis Components | Basis Components | Replacing standard texts with industry specific texts(BC-DOC-RIT) SAP BC

RSBRAF01 SAP ABAP INCLUDE - Industry Short Text Localizing: Subroutines







RSBRAF01 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 RSBRAF01 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 RSBRAF01. "Basic submit
SUBMIT RSBRAF01 AND RETURN. "Return to original report after report execution complete
SUBMIT RSBRAF01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Industry Short Text Localizing: Subroutines


INCLUDES used within this REPORT RSBRAF01

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:

DB_EXISTS_TABLE CALL FUNCTION 'DB_EXISTS_TABLE' EXPORTING tabname = tab-tabname IMPORTING subrc = returncode.

INDUSTRY_SOURCE_TEXT_SCAN CALL FUNCTION 'INDUSTRY_SOURCE_TEXT_SCAN' EXPORTING text = fieldtext devclass_object = tadir-devclass exit_on_first_found_flag = no_devclass_flag IMPORTING devclass_lowest = devclass_lowest returncode = function_returncode TABLES exchanges_tab = exchanges_tab exchanges_list_tab = words_list.

INDUSTRY_SOURCE_TEXT_SEARCH CALL FUNCTION 'INDUSTRY_SOURCE_TEXT_SEARCH' EXPORTING language = language industry = industry devclass_object = tadir-devclass text = fieldtext wordscount_max = lc_two exit_on_first_found_flag = no_devclass_flag IMPORTING returncode = multiple_search_returncode text_rest = text_rest TABLES multiple_exchanges_tab = multiple_exchanges_tab exchanges_list_tab = words_list.

INDUSTRY_SOURCE_TEXT_SEARCH * CALL FUNCTION 'INDUSTRY_SOURCE_TEXT_SEARCH' * EXPORTING * LANGUAGE = LANGUAGE * INDUSTRY = INDUSTRY * DEVCLASS_OBJECT = TADIR-DEVCLASS * TEXT = FIELDTEXT * WORDSCOUNT_MAX = TSKTW_WORDSCOUNT_MAX * EXIT_ON_FIRST_FOUND_FLAG = NO_DEVCLASS_FLAG * IMPORTING * RETURNCODE = MULTIPLE_SEARCH_RETURNCODE * TEXT_REST = TEXT_REST * TABLES * MULTIPLE_EXCHANGES_TAB = MULTIPLE_EXCHANGES_TAB * EXCHANGES_LIST_TAB = WORDS_LIST.

INDUSTRY_SOURCE_TEXT_SEARCH CALL FUNCTION 'INDUSTRY_SOURCE_TEXT_SEARCH' EXPORTING language = language industry = industry devclass_object = tadir-devclass text = fieldtext wordscount_max = tsktw_wordscount_max IMPORTING returncode = multiple_search_returncode text_rest = text_rest TABLES multiple_exchanges_tab = multiple_exchanges_tab exchanges_list_tab = words_list.

INDUSTRY_SOURCE_TEXT_SCAN CALL FUNCTION 'INDUSTRY_SOURCE_TEXT_SCAN' EXPORTING text = text_rest devclass_object = tadir-devclass IMPORTING devclass_lowest = devclass_lowest returncode = function_returncode TABLES exchanges_tab = exchanges_tab exchanges_list_tab = words_list.

INDUSTRY_SHORT_TEXT_SPLIT CALL FUNCTION 'INDUSTRY_SHORT_TEXT_SPLIT' EXPORTING short_text = fieldtext IMPORTING words_counter = words_counter TABLES words_list_tab = words_list_tab.

DEQUEUE_ESBRATEXT CALL FUNCTION 'DEQUEUE_ESBRATEXT' EXPORTING sprsl = language branche = industry tabname = tablename.

NAMETAB_GET * CALL FUNCTION 'NAMETAB_GET' * EXPORTING * langu = language * tabname = tablename * TABLES * nametab = idfies * EXCEPTIONS * internal_error = 01 * no_texts_found = 02 * table_has_no_fields = 03 * table_not_activ = 04.

DDIF_NAMETAB_GET CALL FUNCTION 'DDIF_NAMETAB_GET' EXPORTING tabname = tablename TABLES dfies_tab = lt_dfies EXCEPTIONS not_found = 1 OTHERS = 2.

NAMETAB_GET * CALL FUNCTION 'NAMETAB_GET' * EXPORTING * langu = language * tabname = tablename * TABLES * nametab = idfies * EXCEPTIONS * internal_error = 01 * no_texts_found = 02 * table_has_no_fields = 03 * table_not_activ = 04.

INDUSTRY_EXCHANGES_TAB_FILL CALL FUNCTION 'INDUSTRY_EXCHANGES_TAB_FILL' EXPORTING language = language industry = industry no_identical_entries = 'X' TABLES exchanges_tab = exchanges_tab multiple_exchanges_tab = multiple_exchanges_tab.

ENQUEUE_ESBRATEXT CALL FUNCTION 'ENQUEUE_ESBRATEXT' EXPORTING sprsl = language branche = industry tabname = tablename _scope = '2' _wait = 'X' EXCEPTIONS foreign_lock = 01 system_failure = 02.



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