<PRE>*&---------------------------------------------------------------------*
*&  Program ID : ZKIM_0502_01                                          *
*&  Author     :                                                       *
*&  Written    :                                                       *
*&---------------------------------------------------------------------*
*&  사양개요   :                                                       *
*&                                                                     *
*&                                                                     *
*&---------------------------------------------------------------------*
*&  처리방법 :                                                         *
*&   1.                                                                *
*&                                                                     *
*&   2.                                                                *
*&                                                                     *
*&   3.                                                                *
*&                                                                     *
*&---------------------------------------------------------------------*
*&  변경이력                                                           *
*&   1. 2005.01.01   S20050101-XXX  홍길동                             *
*&     - 최초 생성                                                     *
*&   2. 2006.01.01   S20060101-XXX  홍길동                             *
*&     -                                                               *
*&                                                                     *
*&---------------------------------------------------------------------*
REPORT  ZKIM_0502_01                  .
*/ 테이블 정의                                                         *

*/ 변수 정의                                                           *

DATA: BEGIN OF ITAB_DATA OCCURS 0,
           DATANAME(15),
           QUANTITY1 TYPE I,
           QUANTITY2 TYPE I,
           QUANTITY3 TYPE I,
           QUANTITY4 TYPE I,
      END OF ITAB_DATA,
      BEGIN OF ITAB_OPTIONS OCCURS 0,
           OPTION(20),
      END OF ITAB_OPTIONS.
ITAB_DATA-DATANAME = '판매량'.
ITAB_DATA-QUANTITY1 = 98.
ITAB_DATA-QUANTITY2 = 40.
ITAB_DATA-QUANTITY3 = 99.
ITAB_DATA-QUANTITY4 = 99.
APPEND ITAB_DATA.
ITAB_DATA-DATANAME = '재고량'.
ITAB_DATA-QUANTITY1 = 78.
ITAB_DATA-QUANTITY2 = 10.
ITAB_DATA-QUANTITY3 = 30.
ITAB_DATA-QUANTITY4 = 59.
APPEND ITAB_DATA.
ITAB_DATA-DATANAME = '불량품'.
ITAB_DATA-QUANTITY1 = 88.
ITAB_DATA-QUANTITY2 = 80.
ITAB_DATA-QUANTITY3 = 20.
ITAB_DATA-QUANTITY4 = 19.
APPEND ITAB_DATA.
ITAB_DATA-DATANAME = '금액'.
ITAB_DATA-QUANTITY1 = 74.
ITAB_DATA-QUANTITY2 = 32.
ITAB_DATA-QUANTITY3 = 20.
ITAB_DATA-QUANTITY4 = 19.
APPEND ITAB_DATA.


CALL FUNCTION 'GRAPH_MATRIX_3D'
     EXPORTING
          COL1        = '서울'
          COL2        = '대전'
          COL3        = '광주'
          COL4        = '울산'
          TITL        = '계열사별 1월 실적'
     TABLES
          DATA        = ITAB_DATA
          OPTS        = ITAB_OPTIONS
     EXCEPTIONS
          OTHERS      = 1.
</PRE>