Error while usind Private Method of a global class

Question

HI All..
I created a global class (ZLINE_GLOBAL) which has TOT_DATA private method. I have to call this private method in my report, I know that using Friend class we can do this.
But it is not working and showing the same error  "  METHOD "TOT_DATA" is unknown or Private or Public..
code i tried is
CLASS c2 DEFINITION DEFERRED.
CLASS ZLINE_GLOBAL DEFINITION FRIENDS c2.
  PUBLIC SECTION.
    METHODS : m1.
  PRIVATE SECTION.
    METHODS: m2.
ENDCLASS.
CLASS ZLINE_GLOBAL IMPLEMENTATION .
  METHOD m1.
    WRITE : 'Public Method C1'.
  ENDMETHOD.                    "M1
  METHOD m2.
    WRITE : 'Private Method C1'.
  ENDMETHOD.
ENDCLASS.
CLASS c2 DEFINITION FRIENDS ZLINE_GLOBAL.  "my friends are here, allow them access to my (C2's) private components
  PUBLIC SECTION.
    METHODS :m3.
ENDCLASS.
CLASS c2 IMPLEMENTATION.
  METHOD m3.
    DATA : obj TYPE REF TO ZLINE_GLOBAL.
    CREATE OBJECT obj.
    CALL METHOD obj->TOT_DATA.    "here Iam calling Private method of global class
  ENDMETHOD.                    "M3
ENDCLASS.
START-OF-SELECTION.
  DATA obj_c2 TYPE REF TO c2.
  CREATE OBJECT obj_c2.
  obj_c2->m3( ).
can anybody help me on this..
Murthy

Answer 1

Hi Murthy,
Replace TOT_DATA with M2, you do not have any method by name "TOT_DATA" in your code.
CLASS c2 DEFINITION DEFERRED.
CLASS ZLINE_GLOBAL DEFINITION FRIENDS c2.
  PUBLIC SECTION.
    METHODS : m1.
  PRIVATE SECTION.
    METHODS: m2.
ENDCLASS.
CLASS ZLINE_GLOBAL IMPLEMENTATION .
  METHOD m1.
    WRITE : 'Public Method C1'.
  ENDMETHOD.                    "M1
  METHOD m2.
    WRITE : 'Private Method C1'.
  ENDMETHOD.
ENDCLASS.
CLASS c2 DEFINITION FRIENDS ZLINE_GLOBAL.  "my friends are here, allow them access to my (C2's) private components
  PUBLIC SECTION.
    METHODS :m3.
ENDCLASS.
CLASS c2 IMPLEMENTATION.
  METHOD m3.
    DATA : obj TYPE REF TO ZLINE_GLOBAL.
    CREATE OBJECT obj.
    CALL METHOD obj->M2.    "here Iam calling Private method of global class
  ENDMETHOD.                    "M3
ENDCLASS.
START-OF-SELECTION.
  DATA obj_c2 TYPE REF TO c2.
  CREATE OBJECT obj_c2.
  obj_c2->m3( ).
Regards,
Chen