SAP Reports / Programs | Logistics - General | Logistics Information System (LIS) | Reporting(LO-LIS-REP) SAP LO
RMCS0HSL SAP ABAP INCLUDE - LIS Standard Analyses: Routines for Hierarchy Selection
RMCS0HSL 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 RMCS0HSL 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 RMCS0HSL. "Basic submit
SUBMIT RMCS0HSL AND RETURN. "Return to original report after report execution complete
SUBMIT RMCS0HSL VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: LIS Standard Analyses: Routines for Hierarchy Selection
INCLUDES used within this REPORT RMCS0HSL
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:
POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING DEFAULTOPTION = 'Y' DIAGNOSETEXT1 = HLP_TEXT2 DIAGNOSETEXT2 = HLP_TEXT3 DIAGNOSETEXT3 = HLP_TEXT4 TEXTLINE1 = HLP_TEXT5 TEXTLINE2 = HLP_TEXT6 TITEL = HLP_TEXT1 * START_COLUMN = 25 * START_ROW = 6 CANCEL_DISPLAY = ' ' IMPORTING ANSWER = HLP_ANTWORT EXCEPTIONS OTHERS = 0.
RS_TREE_GET_MARKED_NODES CALL FUNCTION 'RS_TREE_GET_MARKED_NODES' * exporting * with_subtree = TRUE TABLES MARKTAB = H_MARK_NODETAB EXCEPTIONS OTHERS = 1.
MC_POPUP_TO_MARK_FIELDS CALL FUNCTION 'MC_POPUP_TO_MARK_FIELDS' EXPORTING * I_FIELDS_MARKED = ' ' I_FIELD_NUMBER_MAX = 1 I_FIELD_NUMBER_MIN = 1 * I_MARK_BY_TABLE = ' ' I_OBJECT_NAME_PLURAL = HLP_TEXT1 I_OBJECT_NAME_SINGULAR = HLP_TEXT2 * I_POPUP_LENGTH = I_POPUP_TITLE = HLP_TEXT3 * I_TEXTLINE = ' ' I_TEXT_LENGTH = H_MAX_STRLEN * I_ICONTEXT = * I_ICONINFO = IMPORTING E_MARKED = HELP_FLG_MARK TABLES T_FIELDS = HSEL_HIERARCHIE_TAB T_MARKED_FIELDS = HELP_MARK_HIERARCHIE EXCEPTIONS UNVALID_TEXT_LENGTH = 1 OTHERS = 2.
RSTH_HIERARCHY_INIT CALL FUNCTION 'RSTH_HIERARCHY_INIT' EXPORTING FBNAM = H_AKT_HIERARCHIE-FBNAM I_RSTHVKEY = HL_RSTHVKEY * i_sel = hier_zusatzinfo OP_MODE = '0' REQUESTER = CON_REQUESTER_SA * SELLEVEL = ' ' SELMODE = '0' "liefert gesamte Hier.
DD_DTEL_GET CALL FUNCTION 'DD_DTEL_GET' EXPORTING LANGU = SY-LANGU ROLL_NAME = HL_RSTTYP_TAB-ROLNM WITHTEXT = TRUE IMPORTING DD01L_WA = HL_DD01L_WA DD04L_WA_A = HL_DD04L_WA_A TABLES DD04T_TAB_A = HL_DD04T_TAB_A EXCEPTIONS ILLEGAL_VALUE = 01.
DDIF_DOMA_GET CALL FUNCTION 'DDIF_DOMA_GET' EXPORTING NAME = HL_RSTTYP_TAB-TDOMNM IMPORTING GOTSTATE = HL_GOTSTATE DD01V_WA = HL_DD01V_WA EXCEPTIONS ILLEGAL_INPUT = 1 OTHERS = 2.
RS_TREE_SET_CURRENT_TREE CALL FUNCTION 'RS_TREE_SET_CURRENT_TREE' TABLES * NODELIST = NODEINFO = HSEL_NODETAB EXCEPTIONS OTHERS = 1.
RS_TREE_LIST_DISPLAY CALL FUNCTION 'RS_TREE_LIST_DISPLAY' EXPORTING CALLBACK_PROGRAM = LIS_PROGNAME CALLBACK_USER_COMMAND = 'HSEL_USER_COMMAND' callback_text_display = 'HSEL_TEXT_DISPLAY' * CALLBACK_MOREINFO_DISPLAY = ' ' * CALLBACK_COLOR_DISPLAY = ' ' CALLBACK_TOP_OF_PAGE = 'HSEL_TOP_OF_PAGE' STATUS = 'IMPLICIT' CHECK_DUPLICATE_NAME = '1' COLOR_OF_NODE = '1' * COLOR_OF_MARK = '3' COLOR_OF_LINK = '1' * COLOR_OF_MATCH = '5' LOWER_CASE_SENSITIVE = TRUE * MODIFICATION_LOG = ' ' NODE_LENGTH = 20 TEXT_LENGTH = 50 * TEXT_LENGTH1 = 0 * TEXT_LENGTH2 = 0 RETURN_MARKED_SUBTREE = TRUE SCREEN_START_COLUMN = 10 " %%% Dyn. erzeugen !!
RS_TREE_SET_CURRENT_TREE CALL FUNCTION 'RS_TREE_SET_CURRENT_TREE' TABLES * NODELIST = NODEINFO = HSEL_NODETAB EXCEPTIONS OTHERS = 1.
RS_TREE_SET_LOCK CALL FUNCTION 'RS_TREE_SET_LOCK' EXPORTING NODE_ID = NODE-ID WITH_SUBTREE = TRUE EXCEPTIONS NODE_NOT_FOUND = 1 OTHERS = 2.
RS_TREE_RESET_LOCK CALL FUNCTION 'RS_TREE_RESET_LOCK' EXPORTING NODE_ID = NODE-ID WITH_SUBTREE = TRUE EXCEPTIONS NODE_NOT_FOUND = 1 OTHERS = 2.
POPUP_TO_CONFIRM_WITH_MESSAGE * CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' * EXPORTING * DEFAULTOPTION = 'Y' * DIAGNOSETEXT1 = HLP_TEXT2 * DIAGNOSETEXT2 = HLP_TEXT3 ** DIAGNOSETEXT3 = 'diag 3 ' * TEXTLINE1 = HLP_TEXT4 ** textline2 = ' ' * TITEL = HLP_TEXT1 ** START_COLUMN = 25 ** START_ROW = 6 * CANCEL_DISPLAY = ' ' * IMPORTING * ANSWER = HLP_ANTWORT * EXCEPTIONS * OTHERS = 0.
POPUP_TO_CONFIRM_WITH_MESSAGE CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE' EXPORTING DEFAULTOPTION = 'Y' DIAGNOSETEXT1 = HLP_TEXT2 DIAGNOSETEXT2 = HLP_TEXT3 DIAGNOSETEXT3 = HLP_TEXT4 TEXTLINE1 = HLP_TEXT5 TEXTLINE2 = HLP_TEXT6 TITEL = HLP_TEXT1 * START_COLUMN = 25 * START_ROW = 6 CANCEL_DISPLAY = ' ' IMPORTING ANSWER = HLP_ANTWORT EXCEPTIONS OTHERS = 0.
RS_TREE_SET_CURRENT_TREE CALL FUNCTION 'RS_TREE_SET_CURRENT_TREE' TABLES * NODELIST = NODEINFO = HSEL_NODETAB EXCEPTIONS OTHERS = 1.
RS_TREE_LIST_DISPLAY CALL FUNCTION 'RS_TREE_LIST_DISPLAY' EXPORTING CALLBACK_PROGRAM = LIS_PROGNAME CALLBACK_USER_COMMAND = 'HSEL_USER_COMMAND2' callback_text_display = 'HSEL_TEXT_DISPLAY' * CALLBACK_MOREINFO_DISPLAY = ' ' * CALLBACK_COLOR_DISPLAY = ' ' CALLBACK_TOP_OF_PAGE = 'HSEL_TOP_OF_PAGE' STATUS = 'IMPLICIT' CHECK_DUPLICATE_NAME = '1' COLOR_OF_NODE = '1' * COLOR_OF_MARK = '3' COLOR_OF_LINK = '1' * COLOR_OF_MATCH = '5' LOWER_CASE_SENSITIVE = TRUE * MODIFICATION_LOG = ' ' NODE_LENGTH = 20 TEXT_LENGTH = 50 * TEXT_LENGTH1 = 0 * TEXT_LENGTH2 = 0 RETURN_MARKED_SUBTREE = TRUE SCREEN_START_COLUMN = 10 " %%% Dyn. erzeugen !!
RS_TREE_SET_CURRENT_TREE CALL FUNCTION 'RS_TREE_SET_CURRENT_TREE' TABLES * NODELIST = NODEINFO = HSEL_NODETAB EXCEPTIONS OTHERS = 1.
DYNP_VALUES_UPDATE CALL FUNCTION 'DYNP_VALUES_UPDATE' EXPORTING DYNAME = LIS_PROGNAME DYNUMB = '1000' TABLES DYNPFIELDS = H_DYNPREAD.
RSTH_LEAFS_COMPUTE CALL FUNCTION 'RSTH_LEAFS_COMPUTE' EXPORTING NODE_ID = SEL_HIER-KNOTEN_ID * IMPORTING * NODE_IS_LEAF = TABLES I_RSTHIE = RSTHIE_TAB E_LEAFS = H_BLAETTER 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 RMCS0HSL or its description.
RMCS0HSL - LIS Standard Analyses: Routines for Hierarchy Selection RMCS0HIE - LIS Standard Analyses: Routines for Hierarchy Processing RMCS0F0Z - LIS Standard Analyses: Routines with Z (Time Series) RMCS0F0X - LIS Standard Analyses: Routines with X RMCS0F0W - LIS Standard Analyses: Routines with W RMCS0F0V - LIS Standard Analyses: Routines with V