regarding oops program

[Former Member]

I have done simple oops program. the program is below

class class definition . It is throwing error Method *** is unknown or protected or private.

PUBLIC SECTION.

DATA : WTEXT(40) VALUE 'ABAP OBJECTS'.

METHODS:DISPLAY.

ENDCLASS.

&----

---

*&

• class c1 IMPLEMENTATION

*&

&----

---

CLASS Class IMPLEMENTATION.

METHOD DISPLAY.

WRITE:/ ' THIS METHOD TO DISPLAY'.

ENDMETHOD.

ENDCLASS.

*********************

START-OF-SELECTION.

DATA: CLASS TYPE REF TO class.

CREATE OBJECT: CLASS.

*WRITE:/ CLASS->WTEXT.

call method:

CLASS-> DISPLAY.

It is throwing error Method *** is unknown or protected or private.

Please rectify the error.

thanks &rgds

vvvvvv

[Former Member]

where is your class definition?

[Former Member]

Hi,

try it now. the error is because of gap after > symbol in statement

call method:CLASS-> DISPLAY.

class class definition .
  PUBLIC SECTION.
  DATA : WTEXT(40) VALUE 'ABAP OBJECTS'.
  METHODS:DISPLAY.
ENDCLASS.


CLASS Class IMPLEMENTATION.
  METHOD DISPLAY.
    WRITE:/ ' THIS METHOD TO DISPLAY'.
  ENDMETHOD.
ENDCLASS.

*********************

START-OF-SELECTION.

DATA: CLASS TYPE REF TO class.

CREATE OBJECT: CLASS.

call method:CLASS->DISPLAY.

rgds,

bharat,

[Former Member]

Thank u bharat

[Former Member]

Change your code , there is a gap between -> method

REPORT  ZTEST_CODE.

class c1 definition.
PUBLIC SECTION.

DATA : WTEXT(40) VALUE 'ABAP OBJECTS'.

METHODS:DISPLAY.

ENDCLASS.



CLASS C1 IMPLEMENTATION.

METHOD DISPLAY.
WRITE:/ 'THIS METHOD TO DISPLAY'.
ENDMETHOD.
ENDCLASS.

*********************

START-OF-SELECTION.

DATA: CLASS TYPE REF TO c1.

CREATE OBJECT: CLASS.

*WRITE:/ CLASS->WTEXT.
call method:
CLASS->DISPLAY.