REPORT zr_class_02.
*----------------------------------------------------------------------*
* CLASS lcl_car DEFINITION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_car DEFINITION.
PUBLIC SECTION.
METHODS set_car IMPORTING im_model TYPE string
im_make TYPE string.
METHODS get_car EXPORTING ex_model TYPE string
ex_make TYPE string
ex_count TYPE i.
PRIVATE SECTION.
DATA: model TYPE string,
make TYPE string.
CLASS-DATA count TYPE i.
ENDCLASS. "lcl_car DEFINITION
*----------------------------------------------------------------------*
* CLASS lcl_car IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_car IMPLEMENTATION.
METHOD set_car.
model = im_model.
make = im_make.
count = 1 + count.
ENDMETHOD. "set_car
METHOD get_car.
ex_model = model.
ex_make = make.
ex_count = count.
ENDMETHOD. "get_car
ENDCLASS. "lcl_car IMPLEMENTATION
START-OF-SELECTION.
DATA: r_car01 TYPE REF TO lcl_car,
r_car02 TYPE REF TO lcl_car.
DATA: gv_model TYPE string,
gv_make TYPE string,
gv_count TYPE i.
CREATE OBJECT r_car01.
r_car01->set_car( EXPORTING im_model = 'SM7'
im_make = '2009' ).
r_car01->get_car( IMPORTING ex_model = gv_model
ex_make = gv_make
ex_count = gv_count ).
WRITE:/ gv_model, gv_make, gv_count.
CREATE OBJECT r_car02.
r_car02->set_car( EXPORTING im_model = 'SM5'
im_make = '2010' ).
r_car02->get_car( IMPORTING ex_model = gv_model
ex_make = gv_make
ex_count = gv_count ).
WRITE:/ gv_model, gv_make, gv_count.
r_car01->get_car( IMPORTING ex_model = gv_model
ex_make = gv_make
ex_count = gv_count ).
WRITE:/ gv_model, gv_make, gv_count.
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
204 | Web Dynpro 기초 자료입니다. [2] | kms | 2007.07.20 | 3294 |
203 | ABAP System Fields [5] | hooa | 2009.08.07 | 3293 |
202 | wd 관련4 [4] | 우째 .. | 2007.05.08 | 3293 |
201 | BAPI overview [3] | BEST!! | 2008.01.29 | 3291 |
200 | BSP Application관련 자료입니다. [4] | 혀나미 | 2007.12.04 | 3291 |
199 | Function에 관한 내용 입니다. [11] | Giant | 2008.10.28 | 3290 |
198 | 초간단 Icon 필드에 Icon 넣기.. 딱 4줄... [2] | 지의 | 2007.09.27 | 3289 |
197 | 허접한 문자,숫자구분법 | 도련님 | 2008.10.31 | 3287 |
196 | Overview of ABAP 6.10_BSP_CLASS [7] | activeman | 2008.01.18 | 3287 |
195 | coding standards [2] | sapjoy | 2007.04.24 | 3286 |
194 | ALV 사용하기 [50] | 웰컴 | 2008.12.05 | 3285 |
193 | BDC 플그램 [9] | 체리P. | 2007.08.21 | 3285 |
192 | ABAP Sample P/G eBook [2] | 썬바바 | 2007.09.13 | 3282 |
191 | Data를 Word File 형식으로 출력시키는 법 [3] | 블랙아이즈 | 2009.01.21 | 3281 |
190 | Variant 동적일자 세팅 방법 [2] | SSong | 2007.08.22 | 3280 |
189 | System Architecture [3] | 노냐 | 2009.02.27 | 3275 |
188 | ABAP T-CODE e-book 자료 [5] | magicsy69 | 2008.06.03 | 3275 |
187 | [ABAP] File Controll 관련 자료 [15] | GG | 2009.07.27 | 3271 |
186 | ABAP_Questions [3] | onefineday | 2008.12.28 | 3271 |
185 | Authorization_개요 [4] | xcomedy | 2008.07.19 | 3270 |
local class 내에 class-data 로 선언된 work area 는 class 의 All instances ( crete 될때 마다 1개의 instances 개 생성됨)에 영향을 줍니다.
class-data = static 입니다. 참고 하세요..