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 | Dynamic Selection(LDB) 관련 자료입니다. [9] | 우헤헤 | 2012.11.20 | 12247 |
203 | abap 자료 [13] | 철죽1 | 2012.11.20 | 12264 |
202 | class-based exceptions 예제. | 철죽1 | 2012.09.02 | 12268 |
201 | abap tip [5] | 민상애비 | 2012.11.14 | 12400 |
200 | SAP에서의 QR Code 프린팅절차 [19] | 양키 | 2012.11.16 | 12433 |
» | instance vs static 예 [1] | 철죽1 | 2012.09.02 | 12620 |
198 | sap 튜닝 자료입니다. [44] | iop890mm | 2012.10.09 | 12689 |
197 | 파일 첨부 - 한개씩 말고 다중으로 가능? [1] | 연오랑 | 2012.10.23 | 12760 |
196 | LSMW,CATT [8] | 민상애비 | 2012.11.14 | 12817 |
195 | dynamic SQL in SAP [13] | 엠엠공유 | 2011.08.10 | 12875 |
194 | sap tree 에 관한 자료 - [pdf . 영어] [14] | Jenny | 2011.08.04 | 12881 |
193 | create object 예. [1] | 철죽1 | 2012.09.02 | 12935 |
192 | SAP ICON 정리 [14] | paran | 2012.11.15 | 13026 |
191 | ABAP [Dictionary] Search Help Coding [13] | 문바이 | 2012.04.02 | 13044 |
190 | Technical Guide-ABAP Tuning 기초 [5] | 민상애비 | 2012.11.14 | 13083 |
189 | ABAP TRIAL 설치 영문문서 [8] | 열공아밥 | 2010.07.14 | 13087 |
188 | lock 예 [5] | 철죽1 | 2012.09.02 | 13223 |
187 | bdc프로그램개발 [33] | 절감 | 2014.01.06 | 13404 |
186 | ABAP으로구현한 네트웍오목 [8] | 메탈광 | 2007.02.09 | 13406 |
185 | 마이너스 세금 계산서 전표 생성 [4] | tommy | 2010.10.13 | 13424 |
local class 내에 class-data 로 선언된 work area 는 class 의 All instances ( crete 될때 마다 1개의 instances 개 생성됨)에 영향을 줍니다.
class-data = static 입니다. 참고 하세요..