*&---------------------------------------------------------------------*
 *& Report  CLASS                                                       *
 *&                                                                     *
 *&---------------------------------------------------------------------*
 
 report  zlmn_class.
 
 class CL_IBADET definition.              
   public section.
     methods:  constructor importing vakit type i,     "  Class içerisinde kullanılan metodlar
               besmele,
               elyika,
               abdest,
               namaz,
               duaet.
 endclass.
 
 class CL_IBADET implementation.            "Kullanılacak metodları tanımlıyoruz
 
   method constructor.                      " İlk olarak bu metod çalışır
     write:/  vakit, 'Vakit Namaz'.
   endmethod.
 
  method besmele.
     write:/ 'Besmele çek' color 2.
   endmethod.
 
   method elyika.
     write:/ 'Ellerini yıka' color 2.
   endmethod.
 
 
   method abdest.
     write:/ 'Abdest al' color 5.
   endmethod.
 
 
   method namaz.
       write:/ 'Namaz kıl' color 3.
   endmethod.
 
 
   method duaet.
     write:/ 'Dua et' color 1.
   endmethod.
 
 endclass.
 
 *Class metodlarına ulaşmak için nesne oluşturuyoruz (REF TO class <class adı> şeklinde)
 
 data Nesneler type ref to CL_IBADET.   " Class içindeki methodlara ulaşmak için nesne tanımlıyoruz
 
 start-of-selection.
   create object Nesneler
     exporting
       vakit = 5.
   skip 2.
 
   call method Nesneler->elyika.  "Metod çağırmak için : Nesneler->Method adı
   call method Nesneler->abdest.
   call method Nesneler->namaz.
   call method Nesneler->duaet. 
 
 
***********************************************************
Serkan AKKAVAK
Bilgisayar Mühendisi
serkurumsal@yandex.com
SAP ve ABAP konusunda tüm sorun ve sorularınızı gönderebilirsiniz.