REPORT Z17_003 .
CLASS counter DEFINITION.
PUBLIC SECTION.
METHODS: set IMPORTING set_value type i,
increment,
get EXPORTING get_value type i.
* PROTECTED SECTION.
DATA count TYPE i.
ENDCLASS.
CLASS counter IMPLEMENTATION.
METHOD set.
count = set_value.
ENDMETHOD.
METHOD increment.
ADD 1 TO count.
ENDMETHOD.
METHOD get.
get_value = count.
ENDMETHOD.
ENDCLASS.
DATA : CREF1 TYPE REF TO COUNTER,
L_imp TYPE I.
START-OF-SELECTION.
CREATE OBJECT CREF1.
CALL METHOD CREF1->SET( exporting set_value = 3 ).
WRITE : / 'SET METHOD :', CREF1->COUNT.
CALL METHOD CREF1->increment.
CALL METHOD CREF1->GET( IMPORTING get_value = l_imp ).
WRITE : / 'GET METHOD :' , l_imp.
CLASS counter DEFINITION.
PUBLIC SECTION.
METHODS: set IMPORTING set_value type i,
increment,
get EXPORTING get_value type i.
* PROTECTED SECTION.
DATA count TYPE i.
ENDCLASS.
CLASS counter IMPLEMENTATION.
METHOD set.
count = set_value.
ENDMETHOD.
METHOD increment.
ADD 1 TO count.
ENDMETHOD.
METHOD get.
get_value = count.
ENDMETHOD.
ENDCLASS.
DATA : CREF1 TYPE REF TO COUNTER,
L_imp TYPE I.
START-OF-SELECTION.
CREATE OBJECT CREF1.
CALL METHOD CREF1->SET( exporting set_value = 3 ).
WRITE : / 'SET METHOD :', CREF1->COUNT.
CALL METHOD CREF1->increment.
CALL METHOD CREF1->GET( IMPORTING get_value = l_imp ).
WRITE : / 'GET METHOD :' , l_imp.
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
430 | REPORT Z13_001 | sapjoy | 2007.01.08 | 2362 |
429 | report zsalv_013 | sapjoy | 2010.08.20 | 2361 |
428 | REPORT z19_002 | sapjoy | 2007.03.24 | 2360 |
427 | REPORT z18_008 | sapjoy | 2007.03.07 | 2359 |
426 | REPORT Z11_010 | sapjoy | 2006.12.22 | 2358 |
425 | Z07_005 | sapjoy | 2006.12.06 | 2353 |
424 | REPORT Z017_007 [3] | sapjoy | 2007.02.11 | 2353 |
423 | REPORT z18_004 [1] | sapjoy | 2007.03.05 | 2348 |
422 | report zsalv_023 . | sapjoy | 2010.08.20 | 2347 |
» | REPORT Z17_003 | sapjoy | 2007.02.08 | 2347 |
420 | REPORT Z07_018 | sapjoy | 2006.12.08 | 2341 |
419 | method DISPLAY_LIST . [2] | sapjoy | 2007.10.28 | 2341 |
418 | REPORT z17_18 . | sapjoy | 2012.08.01 | 2339 |
417 | REPORT Z10_001 | sapjoy | 2008.04.14 | 2339 |
416 | report zsalv_003 | sapjoy | 2010.08.20 | 2336 |
415 | REPORT ZBAPI_ALE | sapjoy | 2009.02.05 | 2334 |
414 | report zsalv_011 | sapjoy | 2010.08.20 | 2331 |
413 | report zsalv_030 . | sapjoy | 2010.08.20 | 2330 |
412 | report zsalv_018 . | sapjoy | 2010.08.20 | 2327 |
411 | REPORT Z07_012 | sapjoy | 2006.12.08 | 2326 |