SAP Reports / Programs | Aerospace & Defence Industry Solution | Aerospace & Defence Industry Solution(IS-AD) SAP IS

ADPRIOTOOLF10 SAP ABAP INCLUDE - documentation and ABAP source code







ADPRIOTOOLF10 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 ADPRIOTOOLF10 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 ADPRIOTOOLF10. "Basic submit
SUBMIT ADPRIOTOOLF10 AND RETURN. "Return to original report after report execution complete
SUBMIT ADPRIOTOOLF10 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 ADPRIOTOOLF10

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:

WS_QUERY CALL FUNCTION 'WS_QUERY' EXPORTING QUERY = 'WS' IMPORTING RETURN = WS EXCEPTIONS INV_QUERY = 1 NO_BATCH = 2 FRONTEND_ERROR = 3 OTHERS = 4.

BARCHART_CREATE CALL FUNCTION 'BARCHART_CREATE' EXPORTING OWNER_REPID = THIS_REPID DYNNR = THIS_DYNNR CHANGING HANDLE = BARC_OCX.

BARC_LOGIC CALL FUNCTION 'BARC_LOGIC' TABLES ALL_BOXES = ALL_BOXES ALL_BOX_VALS = ALL_BOX_VALS ALL_LINKS = ALL_LINKS ALL_LINK_VALS = ALL_LINK_VALS ALL_NODES = ALL_NODES ALL_NODE_VALS = ALL_NODE_VALS ALL_POSITIONS = ALL_POSITIONS BOXES = BOXES BOX_VALS = BOX_VALS DELETIONS = DELETIONS LINKS = LINKS LINK_VALS = LINK_VALS NODES = NODES NODE_VALS = NODE_VALS POSITIONS = POSITIONS.

BARC_GRAPHIC_PAI CALL FUNCTION 'BARC_GRAPHIC_PAI' EXPORTING CONTROL_HANDLE = BARC_OCX "für Umstellung auf OCX IMPORTING GRAPH_CMD = GRAPH_CMD GRAPH_CMD_INFO = GRAPH_CMD_INFO GR_SEL_FIELD = GR_SEL_FIELD LAYER_TYPE = LAYER_KIND SETTINGS = SETTINGS SYMBOLTYPE = SYMBOLTYPE TABLES BOXES = BOXES BOX_VALS = BOX_VALS DELETIONS = DELETIONS LINKS = LINKS LINK_VALS = LINK_VALS NODES = NODES NODE_VALS = NODE_VALS POSITIONS = POSITIONS EXCEPTIONS INV_WINID = 1.

BARC_ADD_LAYER CALL FUNCTION 'BARC_ADD_LAYER' EXPORTING COLOR_TYPE = 'L0' FIRSTDATE = 1 LAYER_KIND = LAYER_KIND SYMBOLTYPE = SYMBOLTYPE SECONDDATE = 2 LAYER_TYPE = LAYER_TYPE EXCEPTIONS INVALID_TYPE = 01.

BARC_ADD_LAYER CALL FUNCTION 'BARC_ADD_LAYER' EXPORTING COLOR_TYPE = 'L0' FIRSTDATE = FIRSTDATE LAYER_KIND = LAYER_KIND LAYER_TYPE = LAYER_TYPE SECONDDATE = SECONDDATE SYMBOLTYPE = SYMBOLTYPE EXCEPTIONS INVALID_TYPE = 01.

BARC_GET_TEXTINDEX CALL FUNCTION 'BARC_GET_TEXTINDEX' EXPORTING BOX_TYPE = ALL_BOXES-TYPE FIELD = BOX_VALS-FL FORM_TYPE = ALL_BOXES-FORM_TYPE OBJECT_TYPE = BC_CONST-BOX_OBJECT IMPORTING TEXTINDEX = BOX_VALS-FL EXCEPTIONS INV_BOX_TYPE = 01 INV_OBJECT_TYPE = 02 INV_WINID = 03.

BARC_SET_SECTION_ATTRIB CALL FUNCTION 'BARC_SET_SECTION_ATTRIB' EXPORTING FL = VALS-FL ID = VALS-ID VAL = VALS-VAL.

BARC_SET_RIBBON_ATTRIB CALL FUNCTION 'BARC_SET_RIBBON_ATTRIB' EXPORTING FL = VALS-FL ID = VALS-ID VAL = VALS-VAL.

BARC_SET_GRID_ATTRIB CALL FUNCTION 'BARC_SET_GRID_ATTRIB' EXPORTING FL = VALS-FL ID = VALS-ID VAL = VALS-VAL.

BARC_ADD_DATELINE CALL FUNCTION 'BARC_ADD_DATELINE' EXPORTING CHART_ID = DATELINE-CHART_ID COLOR_TYPE = DATELINE-COLOR_TYPE DATE = DATELINE-DATE.

BARC_LOGIC CALL FUNCTION 'BARC_LOGIC' EXPORTING GRAPH_CMD = GRAPH_CMD TABLES ALL_BOXES = ALL_BOXES ALL_BOX_VALS = ALL_BOX_VALS ALL_LINKS = ALL_LINKS ALL_LINK_VALS = ALL_LINK_VALS ALL_NODES = ALL_NODES ALL_NODE_VALS = ALL_NODE_VALS ALL_POSITIONS = ALL_POSITIONS BOXES = BOXES BOX_VALS = BOX_VALS DELETIONS = DELETIONS LINKS = LINKS LINK_VALS = LINK_VALS NODES = NODES NODE_VALS = NODE_VALS POSITIONS = POSITIONS.

BARC_GET_PROFILE_CONTENTS CALL FUNCTION 'BARC_GET_PROFILE_CONTENTS' EXPORTING GET_TBCA_DEFS = SPACE GET_TBCC_DEFS = SPACE GET_TBCF_DEFS = SPACE GET_TBCL_DEFS = 'x' GET_TBCO_DEFS = SPACE GET_TFAT_DEFS = SPACE GET_TFMT_DEFS = SPACE GET_THLT_DEFS = SPACE PROFILE = PROFILE TABLES TBCA_DEFS = TMP_TBCA TBCC_DEFS = TMP_TBCC TBCF_DEFS = TMP_TBCF TBCL_DEFS = TMP_TBCL TFAT_DEFS = TMP_TFAT TFMT_DEFS = TMP_TFMT THLT_DEFS = TMP_THLT EXCEPTIONS INV_TBCA_DEFS = 01 INV_TBCC_DEFS = 02 INV_TBCF_DEFS = 03 INV_TBCG_DEFS = 04 INV_TBCL_DEFS = 05 INV_TBCO_DEFS = 06.

BARC_ADD_CALENDAR CALL FUNCTION 'BARC_ADD_CALENDAR' IMPORTING ID = CALENDAR.

BARC_ADD_TIME_OBJECT CALL FUNCTION 'BARC_ADD_TIME_OBJECT' EXPORTING FL = BC_CONST-DAY_IN_WEEK R_VAL = BC_CONST-SATURDAY TIMEOBJECT_TYPE = BC_CONST-RECURRENT IMPORTING ID = TO1.

BARC_ADD_TIME_OBJECT CALL FUNCTION 'BARC_ADD_TIME_OBJECT' EXPORTING FL = BC_CONST-DAY_IN_WEEK R_VAL = BC_CONST-SUNDAY TIMEOBJECT_TYPE = BC_CONST-RECURRENT IMPORTING ID = TO2.

BARC_ADD_TIME_PROFILE CALL FUNCTION 'BARC_ADD_TIME_PROFILE' EXPORTING TIMEPROF_TYPE = BC_CONST-WEEK IMPORTING ID = PROF1.

BARC_SET_TIME_PROFILE_ATTRIB CALL FUNCTION 'BARC_SET_TIME_PROFILE_ATTRIB' EXPORTING FL = BC_CONST-ADD_NW_TIME ID = PROF1 VAL = VAL.

BARC_SET_TIME_PROFILE_ATTRIB





CALL FUNCTION 'BARC_SET_TIME_PROFILE_ATTRIB' EXPORTING FL = BC_CONST-ADD_NW_TIME ID = PROF1 VAL = VAL.

BARC_SET_CALENDAR_ATTRIB CALL FUNCTION 'BARC_SET_CALENDAR_ATTRIB' EXPORTING FL = BC_CONST-ADD_PROFILE ID = CALENDAR VAL = VAL.

BARC_ADD_CHART CALL FUNCTION 'BARC_ADD_CHART' EXPORTING COLUMN_ANZ = 8 INDEX = 1 SIZE = 300 CHART_TYPE = '0' IMPORTING ID = CHART EXCEPTIONS INV_WINID = 01.

CONVERT_DATE_TO_EXTERNAL CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL' EXPORTING DATE_INTERNAL = SY-DATUM IMPORTING DATE_EXTERNAL = DATE_EXT EXCEPTIONS DATE_INTERNAL_IS_INVALID = 1 OTHERS = 2.

BARC_SET_CHART_ATTRIB CALL FUNCTION 'BARC_SET_CHART_ATTRIB' EXPORTING FL = BC_CONST-CHART_BORDER_BOX ID = CHART VAL = VAL.

BARC_SET_CHART_ATTRIB CALL FUNCTION 'BARC_SET_CHART_ATTRIB' EXPORTING ID = CHART FL = BC_CONST-CHART_TITLE_BOX VAL = VAL.

BARC_SET_CHART_ATTRIB CALL FUNCTION 'BARC_SET_CHART_ATTRIB' EXPORTING ID = CHART FL = BC_CONST-MULTI_LINE_CONFIRM VAL = BC_CONST-X.

BARC_SET_CHART_ATTRIB CALL FUNCTION 'BARC_SET_CHART_ATTRIB' "SH note 1156011 EXPORTING id = chart fl = bc_const-chart_empty_rows val = bc_const-regular. "SH note 1156011

BARC_SET_COLUMN_WIDTH CALL FUNCTION 'BARC_SET_COLUMN_WIDTH' EXPORTING CHART_ID = CHART INDEX = 1 WIDTH = 3500.

BARC_SET_COLUMN_WIDTH CALL FUNCTION 'BARC_SET_COLUMN_WIDTH' EXPORTING CHART_ID = CHART INDEX = 2 WIDTH = 1300.

BARC_SET_COLUMN_WIDTH CALL FUNCTION 'BARC_SET_COLUMN_WIDTH' EXPORTING CHART_ID = CHART INDEX = 3 WIDTH = 1300.

BARC_SET_COLUMN_WIDTH CALL FUNCTION 'BARC_SET_COLUMN_WIDTH' EXPORTING CHART_ID = CHART INDEX = 4 WIDTH = 2000.

BARC_SET_COLUMN_WIDTH CALL FUNCTION 'BARC_SET_COLUMN_WIDTH' EXPORTING CHART_ID = CHART INDEX = 5 WIDTH = 3300.

BARC_SET_COLUMN_WIDTH CALL FUNCTION 'BARC_SET_COLUMN_WIDTH' EXPORTING CHART_ID = CHART INDEX = 6 WIDTH = 3300.

BARC_SET_COLUMN_WIDTH CALL FUNCTION 'BARC_SET_COLUMN_WIDTH' EXPORTING CHART_ID = CHART INDEX = 7 WIDTH = 3300.

BARC_SET_COLUMN_WIDTH CALL FUNCTION 'BARC_SET_COLUMN_WIDTH' EXPORTING CHART_ID = CHART INDEX = 8 WIDTH = 3300.

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_ADD_GRID CALL FUNCTION 'BARC_ADD_GRID' EXPORTING CALENDAR_ID = CALENDAR1 CHART_ID = CHART COLOR_TYPE = 'G1' SECTION_ID = SECTION GRID_TYPE = BC_CONST-CALENDAR_GRID.

BARC_SET_TIME_AXIS CALL FUNCTION 'BARC_SET_TIME_AXIS' EXPORTING START = B_BEGIN END = B_END.




BARC_ADD_SECTION CALL FUNCTION 'BARC_ADD_SECTION' EXPORTING SIZE = 500 START = B_BEGIN UNIT = '5' IMPORTING ID = SECTION.

SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING ENTRY_ACT = ENTRY_ACT ENTRY_TO = ENTRY_TO LAST_PAGE_FULL = SPACE LOOPS = LINE_COUNT OK_CODE = SAVE_OK_CODE IMPORTING ENTRY_NEW = ENTRY_NEW EXCEPTIONS NO_ENTRY_OR_PAGE_ACT = 01 NO_ENTRY_TO = 02 NO_OK_CODE_OR_PAGE_GO = 03.

SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING ENTRY_ACT = ENTRY_ACT ENTRY_TO = ENTRY_TO LAST_PAGE_FULL = SPACE LOOPS = LINE_COUNT_SEL OK_CODE = SAVE_OK_CODE IMPORTING ENTRY_NEW = ENTRY_NEW EXCEPTIONS NO_ENTRY_OR_PAGE_ACT = 01 NO_ENTRY_TO = 02 NO_OK_CODE_OR_PAGE_GO = 03.

BARCHART_SET_FUNCTION_CODE CALL FUNCTION 'BARCHART_SET_FUNCTION_CODE' EXPORTING HANDLE = BARC_OCX FUNCTION_CODE = SY-UCOMM IMPORTING RETURN = RETVAL.

BARC_GRAPHIC_PBO CALL FUNCTION 'BARC_GRAPHIC_PBO' EXPORTING ABAP_CMD = ABAP_CMD STAT = STAT CONTROL_HANDLE = BARC_OCX.

BARC_GRAPHIC_PBO CALL FUNCTION 'BARC_GRAPHIC_PBO' EXPORTING ABAP_CMD = ABAP_CMD CONFIRM = 'X' PROFILE = GRAPH_PROFILE STAT = STAT STATUS_TEXT = STATUS_TEXT CONTROL_HANDLE = BARC_OCX "für OCX-Umstellung TABLES BOXES = BOXES BOX_VALS = BOX_VALS DELETIONS = DELETIONS LINKS = LINKS LINK_VALS = LINK_VALS NODES = NODES NODE_VALS = NODE_VALS POSITIONS = POSITIONS EXCEPTIONS ERR_IN_PROFILE = 1 INV_PROFILE = 2 INV_WINID = 3.

BARC_GRAPHIC_PAI CALL FUNCTION 'BARC_GRAPHIC_PAI' EXPORTING CONTROL_HANDLE = BARC_OCX AT_CONTROL_DESTROY = SGRC_CONST-YES.

CONTROL_DESTROY CALL FUNCTION 'CONTROL_DESTROY' CHANGING H_CONTROL = BARC_OCX EXCEPTIONS OTHERS = 1.

CONVERT_DATE_TO_EXTERNAL CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL' EXPORTING DATE_INTERNAL = VONDA IMPORTING DATE_EXTERNAL = D1 EXCEPTIONS DATE_INTERNAL_IS_INVALID = 1 OTHERS = 2.

BARC_ADD_DATELINE CALL FUNCTION 'BARC_ADD_DATELINE' EXPORTING CHART_ID = '0001' "dateline-chart_id COLOR_TYPE = 'B1' "dateline-color_type DATE = D1. "dateline-date

CONVERT_DATE_TO_EXTERNAL CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL' EXPORTING DATE_INTERNAL = BISDA IMPORTING DATE_EXTERNAL = D2 EXCEPTIONS DATE_INTERNAL_IS_INVALID = 1 OTHERS = 2.

BARC_ADD_DATELINE CALL FUNCTION 'BARC_ADD_DATELINE' EXPORTING CHART_ID = '0001' "dateline-chart_id COLOR_TYPE = 'B1' "dateline-color_type DATE = D2. "dateline-date

BARC_CONVERT_DATE CALL FUNCTION 'BARC_CONVERT_DATE' EXPORTING DATE = DATE IMPORTING STRING = STRING.

CONVERT_DATE_TO_EXTERNAL CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL' EXPORTING DATE_INTERNAL = DAY_ATTRIBUTES-DATE IMPORTING DATE_EXTERNAL = DATE_CONV1 EXCEPTIONS DATE_INTERNAL_IS_INVALID = 1 OTHERS = 2.

CONVERT_DATE_TO_EXTERNAL CALL FUNCTION 'CONVERT_DATE_TO_EXTERNAL' EXPORTING DATE_INTERNAL = DAY_ATTRIBUTES-DATE IMPORTING DATE_EXTERNAL = DATE_CONV2 EXCEPTIONS DATE_INTERNAL_IS_INVALID = 1 OTHERS = 2.

BARC_ADD_TIME_OBJECT CALL FUNCTION 'BARC_ADD_TIME_OBJECT' EXPORTING U_VAL = DATE_CONV1 IMPORTING ID = TO1.

BARC_ADD_TIME_OBJECT CALL FUNCTION 'BARC_ADD_TIME_OBJECT' EXPORTING U_VAL = DATE_CONV2 IMPORTING ID = TO2.

BARC_ADD_INTERVAL CALL FUNCTION 'BARC_ADD_INTERVAL' IMPORTING ID = INT1.

BARC_SET_INTERVAL_ATTRIB CALL FUNCTION 'BARC_SET_INTERVAL_ATTRIB' EXPORTING FL = BC_CONST-INTERVAL_START ID = INT1 VAL = VAL.

BARC_SET_INTERVAL_ATTRIB CALL FUNCTION 'BARC_SET_INTERVAL_ATTRIB' EXPORTING FL = BC_CONST-INTERVAL_END ID = INT1 VAL = VAL.

BARC_SET_CALENDAR_ATTRIB CALL FUNCTION 'BARC_SET_CALENDAR_ATTRIB' EXPORTING FL = BC_CONST-UNIQUE_INTERVAL ID = CALENDAR1 VAL = VAL.

BARC_SET_LEGEND_ATTRIB CALL FUNCTION 'BARC_SET_LEGEND_ATTRIB' EXPORTING CHART_ID = CHART USAGE = 'H' COLOR_TYPE = '00' TEXT = TEXT-092 EXCEPTIONS OTHERS = 1.

BARC_ADD_LEGEND_NODE CALL FUNCTION 'BARC_ADD_LEGEND_NODE' EXPORTING ID = NODES-ID CHART_ID = CHART FORM_TYPE = 'L1' COLOR_TYPE = 'L0' TEXT = TEXT * WINID = EXCEPTIONS INV_WINID = 1 OTHERS = 2.



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