ABAP dilinde INCLUDE anahtar kelimesi kullanarak sınıflar oluşturulur. INCLUDE’in içinde yaptığımız değişikleri aslında ana program içerisinde de yazabiliriz. Ana program içinde yapmamamızın amacı eğer birden fazla programda bunları kullanabileceksek global olarak tanıtalım ki başka bir program tarafından çağrılsın. Aynı zamanda tek bir değişiklik ile bütün programları etkileyecek bir değişiklik sağlasın.
Type özelliğini INCLUDE olarak seçerek oluşturuyoruz. SAP bize INCLUDE için ayrı bir ekran açıyor ve bu ekranda yaptığımız değişiklikleri kaydederek ana program üzerinden çağırıyoruz.
TYPE-POOL yapısı içerisinde daha önce oluşturduğum tipleri sınıfıma dahil ederek bir program yazmaya çalıştım.
Her programın başında kullanabileceğim programın kimi çalıştırdığı ve ne zaman çalıştırdığı bilgisini oluşturduğum sınıf içinden aldım.
REPORT ZCIHANSTAJPROGRAM.
include zcihanprogram_inc.
parameters sayi1 type i.
parameters sayi2 type i.
DATA sonuc type p decimals 2.
parameters ekle radiobutton group grp1.
parameters cıkar radiobutton group grp1.
parameters bol radiobutton group grp1.
parameters carp radiobutton group grp1.
if ekle = ‘X’.
sonuc = sayi1 + sayi2.
elseif cıkar = ‘X’.
sonuc = sayi1 – sayi2.
elseif bol = ‘X’.
sonuc = sayi1 / sayi2.
elseif carp = ‘X’.
sonuc = sayi1 * sayi2.
ENDIF.
write: ‘Sonuç : ‘,sonuc.
Include
write : / ‘Program ‘,sy-uname,’ tarafından calıstırıldı.’,
/ sy-uzeit , ‘ zamanında’.
uline.
Cihan Bozkurt 