메뉴 건너뛰기

SAP 한국 커뮤니티

REPORT Z17_003

sapjoy 2007.02.09 04:39 조회 수 : 2352

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.
번호 제목 글쓴이 날짜 조회 수
71 Z17_ZSFLIGHT sapjoy 2007.02.27 2418
70 REPORT Z17_028 sapjoy 2007.02.26 2946
69 REPORT Z09_013 sapjoy 2007.02.24 2247
68 REPORT Z17_020. [2] sapjoy 2007.02.23 2193
67 REPORT z17_025 sapjoy 2007.02.23 2207
66 REPORT Z17_020 sapjoy 2007.02.23 2174
65 REPORT Z17_000. sapjoy 2007.02.22 2422
64 REPORT Z17_022 sapjoy 2007.02.22 2317
63 REPORT Z17_017 . sapjoy 2007.02.15 2185
62 REPORT Z17_016 . sapjoy 2007.02.14 2166
61 REPORT Z17_015 sapjoy 2007.02.13 2287
60 REPORT Z17_012 sapjoy 2007.02.13 2309
59 INCLUDE Z17_011_CLASS sapjoy 2007.02.12 2494
58 REPORT Z17_011 sapjoy 2007.02.12 2289
57 REPORT Z017_007 [3] sapjoy 2007.02.12 2362
56 REPORT Z17_006 sapjoy 2007.02.12 2215
55 REPORT Z17_005 sapjoy 2007.02.12 2178
» REPORT Z17_003 sapjoy 2007.02.09 2352
53 REPORT Z17_002 sapjoy 2007.02.08 2143
52 REPORT Z17_001. sapjoy 2007.02.07 2153