12 Haziran 2009 Cuma

ABAP : Macro - Ayin Son Gunu

Selamlar,
Ayın son günüyle beraber tarihi hesaplamak için, Last_Day_Of_Month gibi fonksiyonlar mevcuttur, fakat bunu yapmak yerine, ufak bir işlemle ayın son gününü hesaplayabiliriz.
Yapacağımız şey ;
Elimizdeki tarihin gününü 01 e çekmek, arkasından 31 eklemek, günü tekrar 1'e çekmek ve daha sonra 1 çıkarmak :)
bu ufak işlemle o ayın son günüyle beraber tarihe ulaşmış oluruz.
Makroya gelince;


DEFINE SON_GUN.
&1+6(2) = '01'.
&1 = &1 + 31.
&1+6(2) = '01'.
&1 = &1 - 1.
END-OF-DEFINITION.

data:
lv_tarih type d.

lv_tarih = sy-datum.
son_gun lv_tarih.

Bitirirken;
Bir önceki yazımda yazdığım Hakkari ile ilgili yazıya devam edelim ;
Zeydan Kurtuluş; her santimine bolca kar, bolca yağmur ve bolca ağıt düşen Hakkari'yi ve Hakkari'nin çocuklarını bakın nasıl tanımlıyor.

Hiçbir gün öylesine yaşanmaz Hakkari'de… İnsan hakkı değil, zorunluluktur çalışmak. Kimse yalnızca kadın, erkek ya da çocuk değildir... Çobandır, korucudur, çiftçidir, öğretmendir.. Avcıdır, yolcudur yeri geldiğinde.. Yaylaya çıkılacak, dağlara tırmanılacak, sürüler korunacaktır… Küçük kardeşlere bakılacak, tezekler kışa hazırlanacak, koyunlar kırkılacak , koyunlar-keçiler sağılacak , köprüler geçilecektir her gün, yine yine yine… Uzak hayaller, yakın dertlerle daha da uzaklaşsa da bu kentte, söğüt yaprağıyla ıslık çalmayı, can simidine dönüşen pet şişelerle Zap Suyunda yüzmeyi, iki direği, bir parça toprağı futbol sahasına çevirmeyi, hayata gol atmayı bilir çocuklar..




Hiç yorum yok: