Projede Toplam Çalışma Saati

Merhabalar ,
Bir rapor hazırlamak için, mesai saatleri içinde çalışılan zamanı bulan bir fonksiyona ihtiyaç duydum. İlgili fonksiyon hafta sonlarını , öğlen aralarını ve tüm resmi tatilleri çıkarıp toplam kaç dakika çalışılmış ise onu getirecek bir özellik barındırmalı idi. Internet te aradığım kadarı ile isteklerime bu şekilde çok fazla cevap veren bir fonksiyon bulamadım.Bu nedenle kendim yazdım ve bunu sizlerle paylaşmak istedim.

Öncelikle ilgili veritabanında Holidays Tablosu oluşturdum ve alanları da
HolidayID int , (primary key)
OfficialHolidayDate datetime , -- hangi gün resmi tatil ise
IsAllDayHoliday bit , -- Tüm gün mü tatil yoksa yarım gün mü
FinishTime char (5) -- eğer yarım gün ise mesai kaçta bitiyor

Bu tabloya ilgili resmi tatilleri eklemeniz gerekmektedir.

Declare
@WorkBeginDate Datetime, -- ilgili projenin başlama zamanı
@WorkEndDate DateTime, -- ilgili projenin bitiş zamanı
@BeginDayMorning char(5), -- mesainin sabah başlama saati
@EndDayMorning Char(5), -- mesainin öğlen bitiş zamanı
@BeginDayAfternoon char(5), -- mesainin öğleden sonra başlama zamanı
@EndDayAfternoon Char(5), -- mesainin öğleden sonra bitiş zamanı
@ExcludeWeekend Bit -- hafta sonları çıkarılacak mı ?

-- ilk değerler veriliyor. Fonksiyona parametre olarak ta geçebilirsiniz. Burada örnek olması için default değerler verilmiştir.
SET @WorkBeginDate = '20080104 08:00'
SET @WorkEndDate = '20080105 14:30'

SET @BeginDayMorning = '08:00'
SET @EndDayMorning = '12:00'
SET @BeginDayAfternoon = '13:00'
SET @EndDayAfternoon = '17:30'
SET @ExcludeWeekend = 1

DECLARE
@BeginDateBeginDay Datetime, -- projenin başlama zamanında mesainin başlangıcı
@BeginDateEndDay Datetime, -- projenin başlama zamanında mesainin bitisi
@EndDateBeginDay Datetime, -- projenin bitiş gününde mesainin bitisi
@WorkDayLength INT, -- bir günde çalışılan toplam dakika
@Minutes INT -- toplamda bulacak olduğumuz süre

--- Günlük Toplam Çalışma Saati Dakika olarak öğlen arası dahil

SET @WorkDayLength = DATEDIFF(mi,'20080101 ' + @BeginDayMorning,'20080101 ' + @EndDayAfternoon) - 60
SET @BeginDateBeginDay = CONVERT(Varchar,@WorkBeginDate,101) + ' ' + @BeginDayMorning -- normal mesai başlama o gün için
SET @BeginDateEndDay = CONVERT(Varchar,@WorkBeginDate,101) + ' ' + @EndDayAfternoon -- normal mesai bitiş o gün için
SET @EndDateBeginDay = CONVERT(VARCHAR,@WorkEndDate,101)+ ' ' + @BeginDayMorning -- bu da işin bittiği son gün mesai başlangıcı

IF ( SELECT COUNT(*) FROM Holidays
WHERE ( CONVERT(Varchar,@BeginDateEndDay,101) = OfficialHolidayDate
and IsAllDayHoliday = 1 ) ) > 0
SELECT @Minutes = 0

-- EĞER normal mesai bitiş o gün için büyükse işin bitme zamanından bu durumda
-- @BeginDateEndDay enddate ' e eşit olmalı
ELSE IF @BeginDateEndDay > @WorkEndDate
Begin
-- eğer iş öğlen arası açılıp öğlen arası bitti ise
IF @WorkBeginDate between CONVERT(Varchar,@WorkBeginDate,101) + ' ' +
@EndDayMorning and CONVERT(Varchar,@WorkBeginDate,101) + ' ' +
@BeginDayAfternoon and @WorkEndDate between
CONVERT(Varchar,@WorkBeginDate,101) + ' ' + @EndDayMorning and
CONVERT(Varchar,@WorkBeginDate,101) + ' ' + @BeginDayAfternoon
SELECT @Minutes = 0
-- iş o gün sabah çalışma saatleri arasında bitmiş mi
else if @WorkBeginDate between CONVERT(Varchar,@WorkBeginDate,101) + ' ' + @BeginDayMorning and CONVERT(Varchar,@WorkBeginDate,101) + ' ' +
@EndDayMorning and @WorkEndDate between
CONVERT(Varchar,@WorkBeginDate,101) + ' ' + @BeginDayMorning and
CONVERT(Varchar,@WorkBeginDate,101) + ' ' + @EndDayMorning
SELECT @Minutes = DATEDIFF(mi,@WorkBeginDate , CONVERT(Varchar,@WorkEndDate,101) + ' ' + @EndDayMorning )

-- öğleden sonra bitmiş ise
else if @WorkBeginDate between CONVERT(Varchar,@WorkBeginDate,101) + ' ' + @EndDayMorning and
CONVERT(Varchar,@WorkBeginDate,101) + ' ' + @EndDayAfternoon
SELECT @Minutes = DATEDIFF(mi,CONVERT(Varchar,@WorkBeginDate,101) + ' ' + @EndDayMorning ,@WorkEndDate) - 60
else
SELECT @Minutes =
DATEDIFF(mi,@WorkBeginDate,@WorkEndDate) - 60

SET @BeginDateEndDay = @WorkEndDate
end
else
begin
SELECT @Minutes =
DATEDIFF(mi,@WorkBeginDate,@BeginDateEndDay) – 60
-- öğlen arası da var
end

IF @BeginDateEndDay < @WorkEndDate
BEGIN
DECLARE @Counter INT
SET @Counter = 1
IF @ExcludeWeekend = 1
BEGIN
WHILE DateAdd(dd,@Counter,@BeginDateBeginDay)
< @EndDateBeginDay
BEGIN
--- yarım gün tatil mi
IF ( SELECT COUNT(*)
FROM Holidays
WHERE
(
DateAdd(dd,@Counter,
CONVERT(Varchar,@WorkBeginDate,101) ) =
OfficialHolidayDate
and IsAllDayHoliday = 0 )
) > 0
BEGIN
SELECT @Minutes =
@Minutes +
case
when CONVERT(char(5),FinishTime)
>= @EndDayMorning
-- öğleden sonranın bitiş saatinde ise
then
(
DATEDIFF(mi,
CONVERT(Varchar,OfficialHolidayDate ,101) + ' '
+ @BeginDayMorning ,CONVERT(Varchar,OfficialHolidayDate ,101) + ' ' + FinishTime)
) - 60
ELSE
(
DATEDIFF(mi,
CONVERT(Varchar,OfficialHolidayDate ,101) + ' '
+ @BeginDayMorning ,CONVERT(Varchar,OfficialHolidayDate ,101) + ' ' + FinishTime)
)
END
FROM Holidays
WHERE DateAdd(dd,@Counter,CONVERT(Varchar,@WorkBeginDate,101) ) = OfficialHolidayDate and IsAllDayHoliday = 0
End
else
if ( SELECT COUNT(*)
FROM Holidays
WHERE ( DateAdd(dd,@Counter,CONVERT(Varchar,@WorkBeginDate,101) ) = OfficialHolidayDate
and IsAllDayHoliday = 1 ) ) = 0 and (DATEPART(dw,DateAdd(dd,@Counter,@WorkBeginDate)) IN (2,3,4,5,6))
begin
SELECT @Minutes = @Minutes + (1 * @WorkDayLength)
end
set @Counter = @Counter + 1
end
END
ELSE
BEGIN
SELECT @Minutes = @Minutes + (( DATEDIFF(dd,@BeginDateBeginDay,@EndDateBeginDay) ) * @WorkDayLength) -- öğlen arası çıkmış şekilde
--SELECT @Minutes = @Minutes + (( DATEDIFF(dd,@BeginDateBeginDay,@EndDateBeginDay) - 1 ) * @WorkDayLength)
END

-- Yapılan işin son günü
if ( SELECT COUNT(*) FROM Holidays
WHERE ( CONVERT(Varchar,@WorkEndDate,101) = OfficialHolidayDate
and IsAllDayHoliday = 1 ) ) > 0
SELECT @Minutes = @Minutes + 0
else if CONVERT(Varchar,@WorkEndDate,101) + ' ' + @BeginDayAfternoon <= @WorkEndDate
and (DATEPART(dw, @WorkEndDate ) IN (2,3,4,5,6))
SELECT @Minutes = @Minutes + DATEDIFF(mi,@EndDateBeginDay,@WorkEndDate) - 60 -- öğle arası çıkarılıyor
-- eğer öğleden sonra bitmiş ise
else if (DATEPART(dw, @WorkEndDate ) IN (2,3,4,5,6))
SELECT @Minutes = @Minutes + DATEDIFF(mi,@EndDateBeginDay,CONVERT(Varchar,@WorkEndDate,101) + ' ' + @EndDayMorning )
end

SELECT @Minutes/60/24, 'Gün' , 'Saat', @Minutes/60, 'Dakika ' ,@Minutes


ilgili dosyayı buradan indirebilirsiniz.

Extension Methods nedir ?

c# 3.0 ile gelen yeni bir özelliktir. Bu metod yazılımcıya var olan bir tipe herhangi bir yeniden bir tip yaratma

olmadan yeni methodlar eklemeye olanak tanır.
Uzun zamandır beklediğim bir özellik idi çünkü bazı kontroller için uzun uzadıya ilgili sınıfı çağırmak zor geliyodu bana .
Mesala bir string değer in email olup olmadığını kontrol etmek için bir utility classı yazıp ilgili
class ta da IsValidEmail(string str) gibi bir fonksiyon bulunmakta ve değerin kontol etmek istediğimde de IsValidEmail(strEmail) yazmakta idim.Aslında bunda yanlış bir şey yok ama okunurluk bazında zor oluyordu.
Şu şekilde olması sizce de iyi olmaz mı? strEmail.IsValidEmail() bu kod daha okunaklı değil mi? bu yapacaklarımızdan sadece bir tanesi .
peki aynı şekilde diğer sık kulladığımız sınıflara da eklemek istemez miyiz ?
Niye her zaman bir string değeri
sayıya dönüştürken Convert.ToInt32(değişken) şeklinde yazıyoruz da neden degisken.ToInt32() yazamıyorum.İşte burada c# 3.0 ile gelen bu özellik sayesinde ilgili isteklerimiz yapabiliyoruz.

İlgili Class Yapısını string değer için şu şekilde yazabiliriz.

using System;
namespace ExtensionMethods
{
public static class ExtensionMethods
{

private static readonly string CharactersLowerCase = "abcdefghijklmnopqrstuvwxyz";
public static readonly string ValidEMailCharacters = "0123456789abcdefghijklmnopqrstuvwxyz_";

#region Method - ToInt32

public static int ToInt32(this string str)
{
return Int32.Parse(str);
}

#endregion

#region Method - IsMoney

public static bool IsMoney(this string value)
{
if (value == null)
return false;
string tmp = value.Trim();
if (tmp.Length == 0)
return false;
for (int i = 0; i < tmp.Length; i++)
if (!char.IsDigit(tmp, i) && tmp.ToCharArray()[i] != ',')
return false;
return true;
}

#endregion

#region Method - EMail

public static bool CheckEMail(this string eMail)
{
if (eMail == null)
return false;
string email = eMail.Trim();
string[] strEmail = email.Split(new char[] { '@' });
if (strEmail.Length != 2 || strEmail[0].Length < 2 || strEmail[1].Length < 5)
return false;

string[] left = strEmail[0].Split(new char[] { '.', '-' });
for (int i = 0; i < left.Length; i++)
if (left[i].Length < 1 || !CheckEMailPart(left[i]))
return false;
string[] right = strEmail[1].Split(new char[] { '.' });
if (right.Length < 2 || right[right.Length - 1].Length < 2)
return false;
for (int i = 0; i < right.Length - 1; i++)
{
if (right[i].Length < 2)
return false;
string[] tmp = right[i].Split(new char[] { '-' });
for (int j = 0; j < tmp.Length; j++)
if (tmp[j].Length < 1 || !CheckEMailPart(tmp[j]))
return false;
}
return CheckOnlyLowerCaseCharacters(right[right.Length - 1]);
}

private static bool CheckEMailPart(string str)
{
if (str == null || str == "")
return false;
for (int i = 0; i < str.Length; i++)
if (ValidEMailCharacters.IndexOf(str[i]) < 0)
return false;
return true;
}
private static bool CheckOnlyLowerCaseCharacters(string str)
{
if (str == null || str == "")
return false;
for (int i = 0; i < str.Length; i++)
if (CharactersLowerCase.IndexOf(str[i]) < 0)
return false;
return true;
}

#endregion



}
}


bu kısım ilgili class yapısı . Peki bu class ı nasıl kullacağız.
öncelikle
using ExtensionMethods;
eklememiz gerekmektedir.

string str = "aaq@aa.com";

if (str.CheckEMail())
{
//Doğru ise bunu yap
}
else
{
//yanlış ise bunu yap
}

şeklinde kullanabiliriz.

Bir sonraki yazımda görüşmek üzere ....
Sevgiyle Kalın

Oğuzhan KIVRAK

Mutluluk

Tekrar merhabalar sevgili okurlarım ,
Mulu olmak ne demektir sizce ? Her insan mutlu olabilir mi veyahut yalnız mutlu olmasına imkan var mı ? Muhakkak yanında birini ister , bu bir anne , baba, kardeş , arkadaş olabileceği gibi bir ömrü paylaşabileceği bir eş de olabilir.
Eşim derken bir ömrü paylaşmak kötü günlere beraber göğüs germek , iyi günde beraber sevinmek ve en önemlisi bu bence kendini hiç düşünmeden birine emanet edebilmektedir.
Geçen hafta çok sevdiğim bir arkadaşımı bekarlık mertebesinden , evlilik gibi kutsal bir müesseseye terfi ettirdik. Bu mutlu günlerinde yanında olmak biz arkadaşları için gurur verici olmuştur.
Kendisi evleninceye kadar bize çok çektirmiş olsa da en azından kurtulduk çok şükür :) . O gece arkaşımın yüzünde gördüğüm o mutluluk tarif edilemez bir mutluluktu.
Allah tan bu mutlu birlikteliğin bir ömür boyu sürmesini temenni eder , Serbay - Pakize KÖKEN çiftine tebrik eder ve mutluluklar dilerim..

Bir hayat hikayesi

Tekrar merhabalar ,
Hiç acı bir gerçekle , kalemlerin çizdiği çizgilerle karşılaştınız mı ? çıkarılması gereken bir acı dersle . Uzun zamandır hürriyetin foto galerilerinin içinde olan e-çizgiyi takip etmekteyim ve orada gördüğüm bir çizgi serisi tüm gerçeği çıplaklığı ile bir kez daha yüzüme vurdu.
http://fotogaleri.hurriyet.com.tr/galeridetay.aspx?cid=4148&rid=154

Nedir mi bu Tabiki tüm her şeyimizi yabancılara emanet etmek ve her şeyi hazır bekleme alışkanlığı . Evet burada kahramanımız ki bu bizler olmaktayız elinde kendince olan varken bir coni ile arkadaşlık kuruyor ve coni ile arkadaşlığı ilerletikçe coni kendine yardım öneriyor ve kahramanımız kabul ediyor ne var ki gün geçtikçe kahranımız bu yardıma iyice alııyor ve tembellik yapmaya başlıyor. Fakat gün geliyor ki coni artık işleri hayır için yapmıyor ücret istemeye başlıyor kahramanımızdan tabiikii bizim kide alışmış ya tembelliğe veriyor parayı ... peki sizce ne kadar sürer bu durum para bitince kadar .... tüm mal varlığıda ipotek ile coninin eline geçince yol görünüyor kendisine ve paşa paşa hani bizim bir deyimimiz vardır ya geçti bolu pazarı sür eşşeği niğdeye... evet kahramanımızda bunu yapıyor elden ne gelir , olan oldu kafasını taşlara vursa ne yazar kendine eziyet.
Evet bu çizgi bana bir şeyleri anımsattı Neden tüm varlıklarımız teker teker yabancılara satılmaya başlandı nerde ise bize ait bir şey kalmadı artık kendimizi bir yabancı şirkette çalışırsak çok üstte görmeye başladık. rivayet veya gerçek bende tam bilmiyorum ama anlatırlar zamanında eskişehir de uçak fabrikası kurulacakmış fakat amerika demiş ki ne gerek var fabrikayı açtınız üretime geçtiniz siz bu uçakları 150 lira ya üreteceksiniz gelin ben size bunları yarı fiyatına vereyim niye o kadar pahalı bir şey mal edesinizki tabii bizimkilerde ticaret kafası müthiş hemen kabul etmişler sonuçta kabul edilmiyecek gibi değil yarı yarıya kar edecekler. ne oldu sonra tamam o zaman aldık belki uçakları yarı fiyatına peki şimdi niye biz karar veremiyoz fiyata .. niye bize direkt dayatıyorlar fiyatı neden olacak çünkü elimiz mahkum . Bir fabrikamız olsa idi kötü mü olurdu kendi ürünümüz yerli ürünümüz olmuyacak mıydı o zaman pahalı üretilebilirdi ama bugun bunun fiyatını düşürmey i başaramıyacaktık.
Artık her alanda yabancılara mahkum hale geldik. Umarım geleceğimiz tamamen onların elinde olmaz. Biz ki 3 kıta da hüküm sürmüş bir neslin torunlarıyız hiç bir zaman esir olmadık olmuyacağız . Bu durumda ne mi yapabiliriz tabiki yerli malı tüketimini özendirerek başlayabiliriz yeni çözümler her zaman bulunmuştur ve bulunacaktır. ve tabiki işimizi başkalarının değil kendi yapma alışkalığımızı edinerek .
Bir başka yazımda görüşmek üzere esenlikle kalın....

Neler Oluyor Bize ??

Evet neler oluyor bize diye sormamız gerekmiyor mu kendimize ... bu soruyu sormak ve üzerine
düşünmek ? çok değil bundan bir kaç yıl önce demek istiyorum ama olmuyor çocukluğumda
insanlar bugunkünden çok farklıydı. Birbirlerine güvenen , canlarını bile emanet edecek
kadar güvenen , acı tatlı hatıralar paylaşan , birbirlerini gördüklerinde kafalarını başka
tarafa çevirmeyip selamlaşan , bildikleri yardıma muhtaç insanlara kimse görmeden
gururlarını incitmeden yardım eden , bir yere giderken evin kapısını bile açık bırakacak
kadar cesur olan insanlar evet bu insanlar nerelerde şimdi ?
Bizi bu hale getiren nelerdir diye sormamız gerekiyor kendimize , ne dersiniz sorun
batılılaşma nedeni ile olabilir mi ? Kendimizi o kadar kaptırmışız ki buna değerlerimizi
unutmuşuz. Biz bir aile idik ama aile kavramımızı tamamen yitirdik sanırım. Kuşaklar
arasında çok derin uçurumlar var öyle ki bir anne veya baba çocukları ile arasında iletişim
sorunu oluyor. Atalarımız zamanında oğullar babaları ile ava gitmez miydi kızlar anneleri
ile kalıp işleri öğrenmez miydi ? Sizce bu durumda kuşak arası dil farklılaşması mümkün mü ?
Peki bu kültürümüzdeki yozlaşma niye , niye inkar etmeye çalışıyoz kültürümüzü ?
En basitinden alacak olur isek Bayramlar : küçüklerin büyükleri ziyaret etmesi , insanların
birbirleri ile daha iyi kaynaşması ,dargınların barışması gibi görünürken malesef günümüzde
tatil olarak görülmekte birbirini ziyaret etmeyi bırakın kaçarcasına tatil diye
nitelendirilen yerlere gitmek artık moda haline gelmiştir .
Peki televizyon programlarında olana ne demeli... Bir televizyon programının yayınladığı
yarışmada malesef durum içler acısı . Bizim okullarımız da hiç bir şey mi öğretilmiyor. Biz
çevremize bu kadar mı duyarsız kaldık.Nasıl bir yarışma , masanın üzerine çıkıp oynamalar
bence çok da uygun bir durum değildi ki o saatte bunu kaç tane çocuk izledi ve bunu normal
bir davranış olarak benimsiyecek çocuk sayısını tahmin etmek bile güç , kaldı ki çocuklar
değil gençlerimizde ister istemez ünlü olmanın yolu bu şekilmiş diye düşünmeyecek mi ? Kimse bu gidişe dur demiyecek mi ? sizce yolun sonu ne görünüyor ... bence yolun sonu
Osmanlının çöküş devri zamanlarına doğru gidiyor.Gelin biraz düşünelim ve kendimize nereye
gidiyoruz diye bir soralım ve hep beraber neler yapabileceğimizi tartışalım.
Unutmuyalım ki bu ülkede bizler yaşıyoruz ve birbirimize ne kadar sahip çıkarsak o kadar
yenilmez olduğumuz unutmayalım ve şu bir gerçektir ki bizim bizden başka dostumuz yoktur.

Sevgi ve saygılarımla
mutlu kalın ve birbirinizi sevin

Merhaba

Merhabalar Arkadaşlar
kısmetse sizlerle bu sayfadan buluşacağım. ve bilginin paylaşıldıkça işe yaradığı ve büyüdüğü ilkesini benimsemişimdir. Bu bilgilerimi sizlerle paylaşmaya çalışacağım.