SAP Tutorials Blog

 

 


REPORT  YSAP_CLASS_INTERNAL_TABLES.


tables: pa0002.


PARAMETERS: pernr type pa0002-pernr.


types: begin of stru,

       pernr type pa0002-pernr,

       vorna type pa0002-vorna,

       nachn type pa0002-nachn,

       end of stru.


class parentclass definition.

  PUBLIC SECTION.

  methods: display.

  data: itab type table of stru,

        wtab type stru.

  endclass.


  class parentclass implementation.

    method display.

      SELECT * from pa0002 into CORRESPONDING FIELDS OF TABLE itab where pernr eq pernr.

        loop at itab into wtab.

          write: / wtab-pernr,

                 / wtab-vorna,

                 / wtab-nachn.

          endloop.

          endmethod.

          endclass.


     start-of-selection.


     data: parent type REF TO parentclass.


     create OBJECT: parent.


     call method parent->display. 


Serkan AKKAVAK

Computer Engineer BSc

SAP Department Manager

Contact : serkurumsal@yandex.com