REPORT z14_06.
CLASS c1 DEFINITION.
PRIVATE SECTION.
DATA: L_DATA TYPE I.
PROTECTED SECTION.
DATA : l_num TYPE i.
ENDCLASS. "c1 DEFINITION
CLASS c2 DEFINITION INHERITING FROM c1.
PUBLIC SECTION.
METHODS : set_data IMPORTING p_imp TYPE i,
get_data EXPORTING p_exp TYPE i.
ENDCLASS.
CLASS c2 IMPLEMENTATION.
METHOD set_data.
l_num = p_imp.
ENDMETHOD.
METHOD get_data.
p_exp = l_num + 1.
ENDMETHOD.
ENDCLASS. "c1 IMPLEMENTATION
DATA: go_cref TYPE REF TO c2.
DATA: gv_data TYPE i.
START-OF-SELECTION.
CREATE OBJECT go_cref.
CALL METHOD: go_cref->set_data
EXPORTING p_imp = '10'.
CALL METHOD: go_cref->get_data
IMPORTING p_exp = L_DATA.
WRITE : / 'GET_DATA Method : ', L_DATA.
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
570 | REPORT z15_09. | sapjoy | 2012.08.01 | 967 |
569 | REPORT z14_19. | sapjoy | 2012.08.01 | 968 |
568 | REPORT z10_09. | sapjoy | 2012.07.30 | 969 |
567 | REPORT z05_07. | sapjoy | 2012.07.30 | 970 |
566 | REPORT z07_03. | sapjoy | 2012.07.30 | 970 |
565 | REPORT z05_29. | sapjoy | 2012.07.30 | 974 |
564 | REPORT z12_04. | sapjoy | 2012.07.30 | 976 |
563 | REPORT Z12_17. | sapjoy | 2012.07.30 | 981 |
562 | REPORT z15_08. | sapjoy | 2012.08.01 | 982 |
561 | REPORT z17_10 . | sapjoy | 2012.08.01 | 984 |
560 | REPORT z09_02. | sapjoy | 2012.07.30 | 992 |
559 | REPORT z12_07. | sapjoy | 2012.07.30 | 993 |
558 | REPORT z12_32. | sapjoy | 2012.07.30 | 994 |
557 | REPORT z17_08 . | sapjoy | 2012.08.01 | 994 |
556 | REPORT z05_06. | sapjoy | 2012.07.30 | 996 |
555 | REPORT z05_19. | sapjoy | 2012.07.30 | 996 |
554 | REPORT z05_03. | sapjoy | 2012.07.30 | 998 |
553 | REPORT Z12_16. | sapjoy | 2012.07.30 | 998 |
552 | REPORT z12_25. | sapjoy | 2012.07.30 | 998 |
» | REPORT z14_06. [1] | sapjoy | 2012.08.01 | 1007 |
소스코드 수정본
rEPORT z14_06.
CLASS c1 DEFINITION.
* PRIVATE SECTION.
* DATA: L_DATA TYPE I.
PROTECTED SECTION.
DATA : l_num TYPE i.
ENDCLASS. "c1 DEFINITION
CLASS c2 DEFINITION INHERITING FROM c1.
PUBLIC SECTION.
METHODS : set_data IMPORTING p_imp TYPE i,
get_data EXPORTING p_exp TYPE i.
ENDCLASS.
CLASS c2 IMPLEMENTATION.
METHOD set_data.
l_num = p_imp.
ENDMETHOD.
METHOD get_data.
p_exp = l_num + 1.
ENDMETHOD.
ENDCLASS. "c1 IMPLEMENTATION
DATA: go_cref TYPE REF TO c2.
DATA: gv_data TYPE i.
START-OF-SELECTION.
CREATE OBJECT go_cref.
CALL METHOD: go_cref->set_data
EXPORTING p_imp = '10'.
CALL METHOD: go_cref->get_data
* IMPORTING p_exp = L_DATA.
IMPORTING p_exp = gv_data.
* WRITE : / 'GET_DATA Method : ', L_DATA.
WRITE : / 'GET_DATA Method : ', gv_data.