BARCBO04 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Demo program for the mutual updating of screen and bar chart graphics...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 BARCBO04 into the relevant SAP transactions such as SE38 or SE80
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.
Title: Demo Program: Mutual Updating of Bar Chart and Screen
Text Symbol: 001 = Horizontal bars
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
BARC_CONVERT_DATE CALL FUNCTION 'BARC_CONVERT_DATE' EXPORTING DATE = G_DATES-START IMPORTING STRING = NODE_VALS-VAL.
BARC_CONVERT_DATE CALL FUNCTION 'BARC_CONVERT_DATE' EXPORTING DATE = G_DATES-END IMPORTING STRING = NODE_VALS-VAL.
GRAPH_SET_CUA_STATUS CALL FUNCTION 'GRAPH_SET_CUA_STATUS' EXPORTING PROGRAM = PROG STATUS = 'GRAFIK' EXCEPTIONS INV_CUA_INFO = 1.
BARC_SET_TIME_AXIS CALL FUNCTION 'BARC_SET_TIME_AXIS' EXPORTING START = TA_START END = TA_END.
BARC_ADD_CHART CALL FUNCTION 'BARC_ADD_CHART' IMPORTING ID = CHART.
BARC_SET_COLUMN_WIDTH CALL FUNCTION 'BARC_SET_COLUMN_WIDTH' EXPORTING CHART_ID = CHART WIDTH = 4000.
BARC_SET_CHART_ATTRIB CALL FUNCTION 'BARC_SET_CHART_ATTRIB' EXPORTING FL = BC_CONST-CHART_TITLE_BOX ID = CHART VAL = VAL.
BARC_ADD_SECTION CALL FUNCTION 'BARC_ADD_SECTION' EXPORTING SIZE = 70 START = TA_START UNIT = '5' IMPORTING ID = SECTION.
BARC_ADD_RIBBON CALL FUNCTION 'BARC_ADD_RIBBON' EXPORTING CHART_ID = CHART COLOR_TYPE = 'R1' SECTION_ID = SECTION UNIT = '5'. "Tagesribbon
BARC_ADD_RIBBON CALL FUNCTION 'BARC_ADD_RIBBON' EXPORTING CHART_ID = CHART COLOR_TYPE = 'R2' SECTION_ID = SECTION UNIT = '3'. "Monatsribbon
BARC_CONVERT_DATE CALL FUNCTION 'BARC_CONVERT_DATE' EXPORTING DATE = G_DATES-START IMPORTING STRING = NODE_VALS-VAL.
BARC_CONVERT_DATE CALL FUNCTION 'BARC_CONVERT_DATE' EXPORTING DATE = G_DATES-END IMPORTING STRING = NODE_VALS-VAL.
BARC_GRAPHIC_PBO CALL FUNCTION 'BARC_GRAPHIC_PBO' EXPORTING ABAP_CMD = ABAP_CMD PROFILE = GRAPH_PROFILE SET_FOCUS = FOCUS_FLAG STAT = STAT STATUS_TEXT = STATUS_TEXT WAIT_FOR_INPUT = WFI_FLAG TABLES BOXES = BOXES BOX_VALS = BOX_VALS NODES = NODES NODE_VALS = NODE_VALS POSITIONS = POSITIONS EXCEPTIONS ERR_IN_PROFILE = 1 INV_PROFILE = 2 INV_WINID = 3.
GRAPH_RECEIVE CALL FUNCTION 'GRAPH_RECEIVE' IMPORTING MCODE = M_TYP RWNID = RWNID EXCEPTIONS INV_COMMUNICATION = 1 NO_BATCH = 2.
BARC_GRAPHIC_PAI CALL FUNCTION 'BARC_GRAPHIC_PAI' IMPORTING GRAPH_CMD = GRAPH_CMD TABLES BOXES = BOXES BOX_VALS = BOX_VALS DELETIONS = DELETIONS NODES = NODES NODE_VALS = NODE_VALS POSITIONS = POSITIONS EXCEPTIONS INV_WINID = 1.
BARC_REVERT_DATE CALL FUNCTION 'BARC_REVERT_DATE' EXPORTING STRING = NODE_VALS-VAL IMPORTING DATE = G_DATES-START.
BARC_REVERT_DATE CALL FUNCTION 'BARC_REVERT_DATE' EXPORTING STRING = NODE_VALS-VAL IMPORTING DATE = G_DATES-END.
BARC_REVERT_DATE CALL FUNCTION 'BARC_REVERT_DATE' EXPORTING STRING = NODE_VALS-VAL IMPORTING DATE = G_DATES-START.
CALL FUNCTION 'BARC_REVERT_DATE' EXPORTING STRING = NODE_VALS-VAL IMPORTING DATE = G_DATES-END.
BARC_REVERT_DATE CALL FUNCTION 'BARC_REVERT_DATE' EXPORTING STRING = NODE_VALS-VAL IMPORTING DATE = G_DATES-START.
BARC_REVERT_DATE CALL FUNCTION 'BARC_REVERT_DATE' EXPORTING STRING = NODE_VALS-VAL IMPORTING DATE = G_DATES-END.
BARC_GRAPHIC_PAI CALL FUNCTION 'BARC_GRAPHIC_PAI'.
CONTROL_INIT CALL FUNCTION 'CONTROL_INIT' EXCEPTIONS CONTROL_INIT_ERROR = 1.
CONTROL_SETFUNCTIONCODE CALL FUNCTION 'CONTROL_SETFUNCTIONCODE' EXPORTING FCODE = 'GRAF'. "Aufrufen Balkenplan
CONTROL_FLUSH CALL FUNCTION 'CONTROL_FLUSH'.
CONTROL_EXIT CALL FUNCTION 'CONTROL_EXIT'.
DYNP_UPDATE_FIELDS CALL FUNCTION 'DYNP_UPDATE_FIELDS' EXPORTING DYNAME = DYNNAME DYNUMB = '0900' TABLES DYNPFIELDS = FIELDS EXCEPTIONS INVALID_ABAPWORKAREA = 1 INVALID_DYNPROFIELD = 2 INVALID_DYNPRONAME = 3 INVALID_DYNPRONUMMER = 4 INVALID_REQUEST = 5 NO_FIELDDESCRIPTION = 6 UNDEFIND_ERROR = 7 OTHERS = 8.
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 BARCBO04 or its description.
BARCBO04 - Demo Program: Mutual Updating of Bar Chart and Screen BARCBO04 - Demo Program: Mutual Updating of Bar Chart and Screen BARCBO03 - Demo Program: Bar Chart in Maintenance Mode (Planning Board) BARCBO03 - Demo Program: Bar Chart in Maintenance Mode (Planning Board) BARCBO02 - Demo Program: Bar Chart in Maintenance Mode BARCBO02 - Demo Program: Bar Chart in Maintenance Mode