ABAP图表（Inserting charts）

It's a known fact that customers are very sensitive to the appeal of charts. Creating graphical charts (bar, pie char, lines graphs) in ABAP is simple. There are two main methods for creating charts in ABAP

• Using the class CL_GFW
• Using the function module GFW_PRES_SHOW

There are also other classes and function modules derived from these ones. Use transaction GRAL to explore all possibilities provided by this class and this FM.

The following are two short examples of the huge potential of function module GFW_PRES_SHOW :

---------------------代码--------------------------------

  REPORT ZTEST002 .

TYPE-POOLS: GFW.
INCLUDE GFW_PROG_TEXT.

DATA: OK_CODE TYPE SY-UCOMM, FIRST_CALL TYPE I,
      VALUES       TYPE TABLE OF GPRVAL WITH HEADER LINE,
      COLUMN_TEXTS TYPE TABLE OF GPRTXT WITH HEADER LINE.


START-OF-SELECTION.
* USAGE allowed in SAP internal test reports, only
  INCLUDE APPLG_AUTO_TEST_INIT.

  CALL SCREEN 100.

* USAGE allowed in SAP internal test reports, only
  INCLUDE APPLG_AUTO_TEST_FORM.

*
*&---------------------------------------------------------------------*
*&      Module  PBO_0100  OUTPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
MODULE STATUS_0100 OUTPUT.
  SET PF-STATUS '100'.
  IF FIRST_CALL IS INITIAL.
    REFRESH VALUES.
    REFRESH COLUMN_TEXTS.

    VALUES-ROWTXT = 'Salary'.
    VALUES-VAL1 = 50000.
    VALUES-VAL2 = 51000.
    VALUES-VAL3 = 51200.
    VALUES-VAL4 = 51760.
    APPEND VALUES.

    VALUES-ROWTXT = 'Life cost'.
    VALUES-VAL1 = 49000.
    VALUES-VAL2 = 51200.
    VALUES-VAL3 = 51300.
    VALUES-VAL4 = 51600.
    APPEND VALUES.

    COLUMN_TEXTS-COLTXT = '2003'.
    APPEND COLUMN_TEXTS.
    COLUMN_TEXTS-COLTXT = '2004'.
    APPEND COLUMN_TEXTS.
    COLUMN_TEXTS-COLTXT = '2005'.
    APPEND COLUMN_TEXTS.
    COLUMN_TEXTS-COLTXT = '2006'.
    APPEND COLUMN_TEXTS.

* Call a chart into a standard container, this function could be used for many
* different graphic types depending on the presentation_type field :
* gfw_prestype_lines
* gfw_prestype_area
* gfw_prestype_horizontal_bars
* gfw_prestype_pie_chart
* gfw_prestype_vertical_bars
* gfw_prestype_time_axis

    CALL FUNCTION 'GFW_PRES_SHOW'
      EXPORTING
        CONTAINER         = 'CONTAINER'    

        PRESENTATION_TYPE = GFW_PRESTYPE_LINES
      TABLES
        VALUES            = VALUES
        COLUMN_TEXTS      = COLUMN_TEXTS
      EXCEPTIONS
        ERROR_OCCURRED    = 1
        OTHERS            = 2.
  ENDIF. "//firstcall initial
  PERFORM AUTO_TEST_PBO USING 'EXIT'.
ENDMODULE.                 " PBO_0100  OUTPUT

MODULE USER_COMMAND_0100 INPUT.
  OK_CODE = SY-UCOMM.

  CASE OK_CODE.
    WHEN 'EXIT' OR 'BACK'.
      LEAVE PROGRAM.
  ENDCASE.
ENDMODULE.                 " PAI_0100  INPUT

---------------------------------------------

    REFRESH VALUES.
    REFRESH COLUMN_TEXTS.

    VALUES-ROWTXT = ''.
    VALUES-VAL1 = 10.
    VALUES-VAL2 = 35.
    VALUES-VAL3 = 45.
    VALUES-VAL4 = 8.
    VALUES-VAL5 = 2.
    APPEND VALUES.

    COLUMN_TEXTS-COLTXT = 'Fun'.
    APPEND COLUMN_TEXTS.
    COLUMN_TEXTS-COLTXT = 'Cars'.
    APPEND COLUMN_TEXTS.
    COLUMN_TEXTS-COLTXT = 'House'.
    APPEND COLUMN_TEXTS.
    COLUMN_TEXTS-COLTXT = 'Services'.
    APPEND COLUMN_TEXTS.
    COLUMN_TEXTS-COLTXT = 'Others'.
    APPEND COLUMN_TEXTS.



   CALL FUNCTION 'GFW_PRES_SHOW'
     EXPORTING
          CONTAINER         = 'CONTAINER'
          PRESENTATION_TYPE = GFW_PRESTYPE_PIE_CHART
          X_AXIS_TITLE      = 'Expenses'
          Y_AXIS_TITLE      = 'Expenses2'
     TABLES
          VALUES            = VALUES
          COLUMN_TEXTS      = COLUMN_TEXTS
     EXCEPTIONS
          ERROR_OCCURRED    = 1
          OTHERS            = 2


--------------------------------------------------------

参考链接http://www.sapfans.com/forums/viewtopic.php?f=31&t=326609