<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>
*& 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>
잘보았습니다 . 감사합니다.