SAP Reports / Programs | Financials | Financial Supply Chain Management | Market Risk Analyzer(FIN-FSCM-TRM-MR) SAP FIN

MJBRRF00 SAP ABAP INCLUDE - Include MJBRRF00: Form Routines Screen 0010







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


Text pool values


Title: Include MJBRRF00: Form Routines Screen 0010


INCLUDES used within this REPORT MJBRRF00

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_LOSS_OF_DATA CALL FUNCTION 'POPUP_TO_CONFIRM_LOSS_OF_DATA' EXPORTING TEXTLINE1 = HIER_TX TEXTLINE2 = TEXT-B01 TITEL = TEXT-T01 * START_COLUMN = 25 * START_ROW = 6 IMPORTING ANSWER = ANSWER " 'J', 'N', 'A' EXCEPTIONS OTHERS = 1.

ENQUEUE_E_JBRRH * CALL FUNCTION 'ENQUEUE_E_JBRRH' * EXPORTING ** MODE_JBRRH = 'E' ** MODE_JBRRHBAUM = 'E' ** MODE_JBRRHBAUMT = 'E' ** MODE_JBRRHBLATT = 'E' ** MODE_JBRRHT = 'E' ** MANDT = SY-MANDT ** RHID = ** RKNOTEN = ** B_SPRAS = ** T_RKNOTEN = ** BL_RKNOTEN = ** SPRAS = ** X_RHID = ' ' ** X_RKNOTEN = ' ' ** X_B_SPRAS = ' ' ** X_T_RKNOTEN = ' ' ** X_BL_RKNOTEN = ' ' ** X_SPRAS = ' ' * _SCOPE = '3' ** _WAIT = ' ' ** _COLLECT = ' ' * EXCEPTIONS * FOREIGN_LOCK = 1 * SYSTEM_FAILURE = 2 * OTHERS = 3.

DEQUEUE_E_JBRRH *CALL FUNCTION 'DEQUEUE_E_JBRRH' * EXPORTING ** MODE_JBRRH = 'E' ** MODE_JBRRHBAUM = 'E' ** MODE_JBRRHBAUMT = 'E' ** MODE_JBRRHBLATT = 'E' ** MODE_JBRRHT = 'E' ** MANDT = SY-MANDT ** RHID = ** RKNOTEN = ** B_SPRAS = ** T_RKNOTEN = ** BL_RKNOTEN = ** SPRAS = ** X_RHID = ' ' ** X_RKNOTEN = ' ' ** X_B_SPRAS = ' ' ** X_T_RKNOTEN = ' ' ** X_BL_RKNOTEN = ' ' ** X_SPRAS = ' ' * _SCOPE = '3' ** _SYNCHRON = ' ' ** _COLLECT = ' ' * EXCEPTIONS * OTHERS = 1.

POPUP_TO_CONFIRM_WITH_VALUE *CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_VALUE' * EXPORTING ** DEFAULTOPTION = 'Y' * OBJECTVALUE = HIER_TX * TEXT_AFTER = TEXT-BA2 * TEXT_BEFORE = TEXT-BB2 * TITEL = TEXT-T02 ** START_COLUMN = 25 ** START_ROW = 6 * IMPORTING * ANSWER = ANSWER " J, N, A * EXCEPTIONS * TEXT_TOO_LONG = 1 * OTHERS = 2.

POPUP_TO_DISPLAY_TEXT * CALL FUNCTION 'POPUP_TO_DISPLAY_TEXT' * EXPORTING ** TITEL = TEXT-T05 * TEXTLINE1 = TEXT-T51 * TEXTLINE2 = TEXT-T52 ** START_COLUMN = 25 ** START_ROW = 6 * EXCEPTIONS * OTHERS = 1.

POPUP_TO_CONFIRM_STEP * CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' * EXPORTING ** DEFAULTOPTION = 'Y' * TEXTLINE1 = TEXT-T41 * TEXTLINE2 = TEXT-T42 * TITEL = TEXT-T04 ** START_COLUMN = 25 ** START_ROW = 6 * IMPORTING * ANSWER = ANSWER * EXCEPTIONS * OTHERS = 1.

ISB_RM_UPDATE_RISK_HIERARCHY CALL FUNCTION 'ISB_RM_UPDATE_RISK_HIERARCHY' EXPORTING CHECK_RH = IS_RH TABLES CHECK_TRHT = IT_RHT CHECK_RHBAUM = IT_RHBAUM CHECK_RHBAUMT = IT_RHBAUMT CHECK_RHBLATT = IT_RHBLATT EXCEPTIONS ERROR_WHILE_SAVING = 1 OTHERS = 2.

ISB_RM_UPDATE_RISK_HIERARCHY CALL FUNCTION 'ISB_RM_UPDATE_RISK_HIERARCHY' EXPORTING IS_RH = IS_RH TABLES I_TRHT = IT_RHT I_RHBAUM = IT_RHBAUM I_RHBAUMT = IT_RHBAUMT I_RHBLATT = IT_RHBLATT EXCEPTIONS ERROR_WHILE_SAVING = 1 OTHERS = 2.

ISB_RM_RH_GET CALL FUNCTION 'ISB_RM_RH_GET' EXPORTING P_RHID = RHID_F ERR_HANDLING = '2' READ_FROM_DB = 'X' IMPORTING W_JBRRH = IS_RH W_JBRRHT = IS_RHT TABLES IT_JBRRHBAUM_F = IT_RHBAUM IT_JBRRHBAUMT_F = IT_RHBAUMT IT_JBRRHBLATT_F = IT_RHBLATT * IT_RHT_ALL_L = * IT_RHBAUMT_ALL_L = EXCEPTIONS NO_HIERARCHY_FOUND = 1 OTHERS = 2.

ISB_RM_RH_GET CALL FUNCTION 'ISB_RM_RH_GET' EXPORTING P_RHID = RHID_F ERR_HANDLING = '2' READ_FROM_DB = 'X' rh_datum = rh_datum IMPORTING W_JBRRH = IS_RH * W_JBRRHT = d_valid_from = rh_valid_from d_valid_to = rh_valid_to TABLES IT_JBRRHBAUM_F = IT_RHBAUM * IT_JBRRHBAUMT_F = IT_JBRRHBLATT_F = IT_RHBLATT IT_RHT_ALL_L = IT_RHT IT_RHBAUMT_ALL_L = IT_RHBAUMT EXCEPTIONS NO_HIERARCHY_FOUND = 1 OTHERS = 2.

ENQUEUE_E_JBRRH CALL FUNCTION 'ENQUEUE_E_JBRRH' EXPORTING * MODE_JBRRH = 'E' * MODE_JBRRHBAUM = 'E' * MODE_JBRRHBAUMT = 'E' * MODE_JBRRHBLATT = 'E' * MODE_JBRRHT = 'E' MANDT = SY-MANDT RHID = RHID_F * RKNOTEN = * B_SPRAS = * T_RKNOTEN = * BL_RKNOTEN = * SPRAS = * X_RHID = ' ' * X_RKNOTEN = ' ' * X_B_SPRAS = ' ' * X_T_RKNOTEN = ' ' * X_BL_RKNOTEN = ' ' * X_SPRAS = ' ' _SCOPE = '3' * _WAIT = ' ' * _COLLECT = ' ' EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2 OTHERS = 3.

DEQUEUE_E_JBRRH CALL FUNCTION 'DEQUEUE_E_JBRRH' EXPORTING * MODE_JBRRH = 'E' * MODE_JBRRHBAUM = 'E' * MODE_JBRRHBAUMT = 'E' * MODE_JBRRHBLATT = 'E' * MODE_JBRRHT = 'E' MANDT = SY-MANDT RHID = RHID_F * RKNOTEN = * B_SPRAS = * T_RKNOTEN = * BL_RKNOTEN = * SPRAS = * X_RHID = ' ' * X_RKNOTEN = ' ' * X_B_SPRAS = ' ' * X_T_RKNOTEN = ' ' * X_BL_RKNOTEN = ' ' * X_SPRAS = ' ' _SCOPE = '3' * _SYNCHRON = ' ' * _COLLECT = ' ' EXCEPTIONS OTHERS = 1.

ISB_RM_RH_GET CALL FUNCTION 'ISB_RM_RH_GET' EXPORTING P_RHID = RHID_F ERR_HANDLING = '2' READ_FROM_DB = 'X' * IMPORTING * W_JBRRH = * W_JBRRHT = * TABLES * IT_JBRRHBAUM_F = * IT_JBRRHBAUMT_F = * IT_JBRRHBLATT_F = * IT_RHT_ALL_L = * IT_RHBAUMT_ALL_L = EXCEPTIONS NO_HIERARCHY_FOUND = 1 OTHERS = 2.

POPUP_TO_DECIDE_LIST CALL FUNCTION 'POPUP_TO_DECIDE_LIST' EXPORTING * CURSORLINE = 1 * MARK_FLAG = ' ' * MARK_MAX = 1 * START_COL = 0 * START_ROW = 0 TEXTLINE1 = TEXT-BC1 TEXTLINE2 = TEXT-BC2 TEXTLINE3 = TEXT-BC3 TITEL = TEXT-U11 IMPORTING ANSWER = IDX TABLES T_SPOPLI = IT_AGGRTYP EXCEPTIONS NOT_ENOUGH_ANSWERS = 1 TOO_MUCH_ANSWERS = 2 TOO_MUCH_MARKS = 3 OTHERS = 4.

ISB_RM_UPDATE_RISK_HIERARCHY CALL FUNCTION 'ISB_RM_UPDATE_RISK_HIERARCHY' EXPORTING IS_RH = IT_JBRRH CHECK_RH = WA_JBRRH EXCEPTIONS ERROR_WHILE_SAVING = 1 OTHERS = 2.

POPUP_TO_DECIDE_LIST * CALL FUNCTION 'POPUP_TO_DECIDE_LIST' * EXPORTING ** CURSORLINE = 1 ** MARK_FLAG = ' ' ** MARK_MAX = 1 ** START_COL = 0 ** START_ROW = 0 * TEXTLINE1 = TEXT-BE1 * TEXTLINE2 = TEXT-BE2 ** TEXTLINE3 = * TITEL = TEXT-U04 * IMPORTING * ANSWER = ANSWER * TABLES * T_SPOPLI = IT_AGGRTYP * EXCEPTIONS * NOT_ENOUGH_ANSWERS = 1 * TOO_MUCH_ANSWERS = 2 * TOO_MUCH_MARKS = 3 * OTHERS = 4.

POPUP_TO_DECIDE_LIST * CALL FUNCTION 'POPUP_TO_DECIDE_LIST' * EXPORTING ** CURSORLINE = 1 * MARK_FLAG = 'X' * MARK_MAX = IDX ** START_COL = 0 ** START_ROW = 0 * TEXTLINE1 = TEXT-BD1 * TEXTLINE2 = TEXT-BD2 ** TEXTLINE3 = ' ' * TITEL = TEXT-U05 * IMPORTING * ANSWER = ANSWER * TABLES * T_SPOPLI = IT_RH_AUSW * EXCEPTIONS * NOT_ENOUGH_ANSWERS = 1 * TOO_MUCH_ANSWERS = 2 * TOO_MUCH_MARKS = 3 * OTHERS = 4.

POPUP_TO_DECIDE_LIST * CALL FUNCTION 'POPUP_TO_DECIDE_LIST' * EXPORTING ** CURSORLINE = 1 ** MARK_FLAG = ' ' ** MARK_MAX = 1 ** START_COL = 0 ** START_ROW = 0 * TEXTLINE1 = TEXT-BC1 * TEXTLINE2 = TEXT-BC2 * TEXTLINE3 = TEXT-BC3 * TITEL = TEXT-U04 * IMPORTING * ANSWER = ANSWER * TABLES * T_SPOPLI = IT_AGGRTYP * EXCEPTIONS * NOT_ENOUGH_ANSWERS = 1 * TOO_MUCH_ANSWERS = 2 * TOO_MUCH_MARKS = 3 * OTHERS = 4.

ISB_RM_UPDATE_RISK_HIERARCHY





* CALL FUNCTION 'ISB_RM_UPDATE_RISK_HIERARCHY' * EXPORTING * IS_RH = IT_JBRRH * CHECK_RH = WA_JBRRH * EXCEPTIONS * ERROR_WHILE_SAVING = 1 * OTHERS = 2.

ENQUEUE_E_JBRRH CALL FUNCTION 'ENQUEUE_E_JBRRH' EXPORTING * MODE_JBRRH = 'E' * MODE_JBRRHBAUM = 'E' * MODE_JBRRHBAUMT = 'E' * MODE_JBRRHBLATT = 'E' * MODE_JBRRHT = 'E' MANDT = SY-MANDT * RHID = * RKNOTEN = * B_SPRAS = * T_RKNOTEN = * BL_RKNOTEN = * SPRAS = * X_RHID = ' ' * X_RKNOTEN = ' ' * X_B_SPRAS = ' ' * X_T_RKNOTEN = ' ' * X_BL_RKNOTEN = ' ' * X_SPRAS = ' ' _SCOPE = '3' * _WAIT = ' ' * _COLLECT = ' ' EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2 OTHERS = 3.

ISB_RM_UPDATE_RISK_HIERARCHY CALL FUNCTION 'ISB_RM_UPDATE_RISK_HIERARCHY' * EXPORTING * IS_RH = * IS_RHT = * CHECK_RH = * CHECK_RHT = TABLES I_TRHT = IT_JBRRHT I_RHBAUM = IT_JBRRHBAUM I_RHBAUMT = IT_JBRRHBAUMT I_RHBLATT = IT_JBRRHBLATT CHECK_TRHT = CHECK_RHT CHECK_RHBAUM = CHECK_RHBAUM CHECK_RHBAUMT = CHECK_RHBAUMT CHECK_RHBLATT = CHECK_RHBLATT EXCEPTIONS ERROR_WHILE_SAVING = 1 OTHERS = 2.

MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE' EXCEPTIONS OTHERS = 1.

SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING * PERCENTAGE = 0 TEXT = MSG_CHECK_RH EXCEPTIONS OTHERS = 1.

CHECK_TREE_RISK_NEW CALL FUNCTION 'CHECK_TREE_RISK_NEW' EXPORTING M_RHID = IT_RH-RHID * IS_RH = * IS_RHT = * TEXT_FLAG = 'X' IMPORTING ERROR_FLAG = ERR_FLAG TABLES * IT_KNOTS = * IT_RHBAUMT = * IT_LEAFS = IT_PROT = IT_PROT EXCEPTIONS NOT_FOUND = 1 DEPENDENT_TABLE_ERROR = 2 OTHERS = 3.

ISB_RM_UPDATE_RISK_HIERARCHY CALL FUNCTION 'ISB_RM_UPDATE_RISK_HIERARCHY' EXPORTING IS_RH = IT_RH CHECK_RH = CHECK_RH EXCEPTIONS ERROR_WHILE_SAVING = 1 OTHERS = 2.

ISB_RM_RH_GET CALL FUNCTION 'ISB_RM_RH_GET' " RH-Daten einlesen (bei INSR gibt's EXPORTING " noch keine) P_RHID = RHID IMPORTING W_JBRRH = WA_RH EXCEPTIONS NO_HIERARCHY_FOUND = 1 OTHERS = 2 .

RM_GROUP_AUTH_CHECK CALL FUNCTION 'RM_GROUP_AUTH_CHECK' EXPORTING I_AUTGR = AUTH_GROUP I_ACTVT = ACTIVITY IMPORTING E_RETURNCODE = RC_F EXCEPTIONS NO_AUTHORITY = 1 INTERNAL_ERROR = 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 MJBRRF00 or its description.