public Rota(Rota modelRota) //kopya çıkartmak için kullanılır
{
//model rotanın bir kopyasını çıkartır
this._rotaceza = modelRota.rotaceza;
this.ekip = modelRota.ekip;
foreach (Gen kopyaGen in modelRota.ziyaretSirasi)
{
this.ziyaretSirasi.Add(new Gen(kopyaGen));
}
}
// Int64 gunId;
private List <Rota> RotaListesi()
{
List <Rota> myRotaList = new List <Rota>();
//grid1 sonuçlar
//grid2 rotalar
//grid 3 genler var,
//rotaların hepsi grid 2 den döngü ile alınacak, sonra bu döngüde ziyaret listesi bir reader ile çekilecek
//oluşturulan rotalar rotalistesine add yapılacak
for (int i = 0; i < dataGridView2.Rows.Count - 1; i++)
{
int rotaID = (int)dataGridView2.Rows[i].Cells[0].Value;
Rota myrota = new Rota();
myrota.ziyaretSirasi.Clear();//rota nesnesi doğası gereği her seferinde kendisi 2 adet gen ekliyor onlar silindi
Ekip myekip = new Ekip();
myekip.ekipID = (int)dataGridView2.Rows[i].Cells[3].Value;
myrota.ekip = myekip;
myrota.rotaceza = (int)dataGridView2.Rows[i].Cells[4].Value;
Uzaklik2 myuzaklik = new Uzaklik2();
myuzaklik.metre = (int)dataGridView2.Rows[i].Cells[5].Value;
myuzaklik.dakika = (int)dataGridView2.Rows[i].Cells[6].Value;
myrota.toplamUzaklik = myuzaklik;
string sqlcumle = "exec ZiyaretSirasigetir " + rotaID.ToString();
SqlCommand sqlkomut = new SqlCommand();
sqlkomut.Connection = Islemler.conn;
sqlkomut.CommandText = sqlcumle;
Islemler.conn.Open();
SqlDataReader drZiyaretler = sqlkomut.ExecuteReader();
while (drZiyaretler.Read())
{
Gen mygen = new Gen();
Hasta myhasta = new Hasta();
myhasta.hastaID = (int)drZiyaretler[1];
myhasta.gosterID = (int)drZiyaretler[2];
myhasta.bakimSuresi = (int)drZiyaretler[5];
myhasta.konum.lat = (double)drZiyaretler[6];
myhasta.konum.lon = (double)drZiyaretler[7];
mygen.hasta = myhasta;
mygen.atandigiTimeWindow.t1 = (int)drZiyaretler[3];
mygen.atandigiTimeWindow.t2 = (int)drZiyaretler[4];
myrota.ziyaretSirasi.Add(mygen);
}
drZiyaretler.Close();
myRotaList.Add(myrota);
Islemler.conn.Close();
}
return(myRotaList);
}
private void EkipleriAta() //o gün çalışacak olan ekipler için başlangıç rotası
{
for (int i = 0; i < Islemler.ekipListGun.Count; i++)
{
Rota myrota = new Rota();
Ekip myekip = Islemler.ekipListGun[i];
myrota.ekip = myekip;
//sabah mesai ekibe göre ayarla
myrota.ziyaretSirasi[0].atandigiTimeWindow.t1 = myekip.sabahMesai.t1;
myrota.ziyaretSirasi[0].atandigiTimeWindow.t2 = myekip.sabahMesai.t1;
//öğleden sonraki mesai ekibe göre ayarla
myrota.ziyaretSirasi[myrota.ziyaretSirasi.Count - 1].atandigiTimeWindow.t1 = myekip.ogleMesai.t2;
myrota.ziyaretSirasi[myrota.ziyaretSirasi.Count - 1].atandigiTimeWindow.t2 = myekip.ogleMesai.t2;
rotaListesi.Add(myrota);
}
}
public void AtamalariYap()
{
//ekip seç ekipe ait rotayı doldur sonra bu ekibi sil, diğer ekibi seç
while (_ekipList.Count > 0 && _hastaList.Count > 1) //while ya hasta listesi biterse yada ataacak ekip kalmaz ise boşalır
{
Ekip secilenekip = EkipSec(); //en uygun ekibi seçer
Rota myrota = new Rota(); //yeni bir rota başlattı
myrota.ekip = secilenekip; //rotanın ekibi atandı
if (myrota.ekip == null)
{
break; //programda runtime de bir hata olup ekip seçilemez ise kırılmasın diy eeklendi: algoritmaya bir etkisi yok
}
//ekip rotaya atandığı için rota başlangıç ve bitiş periyodları ekibe ait zaman periyodları olarak ayarlanıyor
myrota.ziyaretSirasi[0].atandigiTimeWindow.t1 = secilenekip.sabahMesai.t1; //başlangıç noktası
myrota.ziyaretSirasi[0].atandigiTimeWindow.t2 = secilenekip.sabahMesai.t1;
myrota.ziyaretSirasi[myrota.ziyaretSirasi.Count - 1].atandigiTimeWindow.t1 = secilenekip.ogleMesai.t2; //bitiş noktası
myrota.ziyaretSirasi[myrota.ziyaretSirasi.Count - 1].atandigiTimeWindow.t2 = secilenekip.ogleMesai.t2;
int periyod = myrota.ekip.sabahMesai.t1; //rota için başlangıç periyodu, ekibin sabah mesai başlangıcı
int nokta = 0; //rota başlangıç noktası her zaman 0. nokta, 0 sağlık merkezi
bool ziyaretedilebilirvarmi = true;
int saglikmerkezi = 0;
Hasta eskihasta = _hastaList[nokta];
while (ziyaretedilebilirvarmi) //seçilen ekip için uygun noktaları bularak gredy olarak atamalar yapacak
{
ziyaretedilebilirvarmi = false; //ziyaret edilebilir nokta bulamaz ise false kalsın diye güncellendi
Hasta kararverilenhasta = null;
int fark = Islemler.M; //fark değeri başlangıcta büyük bir değer alındı
int t1 = 0; //atama yapılacak zç1 değeri
int t2 = 0; //zç2
int atamaicint1 = 0;
int atamaicint2 = 0;
//aşağıdaki for tüm hasta listesini dolaşarak atama için en uygun hastayı bulur
// atanabilecek hasta bulursa ziyaretedilebilirvarmı true olur
for (int j = 1; j < _hastaList.Count; j++)//hasta listesi-1 kadar döngü ile mevcut hastalar taranıyor
{
Hasta yenihasta = _hastaList[j];
if (eskihasta == yenihasta)
{
continue; //aynı hasta için işlem yapmamalı
}
int eskihastayenihastauzaklik = Islemler.UzaklikGetir(eskihasta.hastaID, yenihasta.hastaID).dakika;
int yenihastasaglikmerkeziuzaklik = Islemler.UzaklikGetir(yenihasta.hastaID, saglikmerkezi).dakika;
int m1 = periyod + eskihastayenihastauzaklik + yenihasta.bakimSuresi;
int m2 = m1 + yenihastasaglikmerkeziuzaklik; //son noktadan sonra sağlık merkezine gidilebiliyormu
bool skillyeterli = (myrota.ekip.skill & yenihasta.skill) == yenihasta.skill; //skill ziayaret için yeteliyse true, değilse false
if (periyod + eskihastayenihastauzaklik > yenihasta.timeWindow.t1) //yeni hasta ziyaretinin başlaması gereken t1 değeri
{
t1 = periyod + eskihastayenihastauzaklik;
}
else
{
t1 = yenihasta.timeWindow.t1;
}
t2 = t1 + yenihasta.bakimSuresi; //yeni hasta t2 zamanı, hasta ziyaretinin bittiği time windows
bool mesaisarkmasiyok = !myrota.MesaiSarkmasiVar2(t1, t2); //rotada bu t1, t2 atamasında mesai sarkması varmı bakılıyor, dönen değer değillendi
if (skillyeterli && mesaisarkmasiyok && m1 <= yenihasta.timeWindow.t2 && m2 <= myrota.ekip.ogleMesai.t2)
{
//koşul sağlanmış ise ziyaret edilebilece bir hasta noktası var demektir. bu duurmda farklara bakılacak
ziyaretedilebilirvarmi = true; //ziyaret edilebilir bir nokta bulunduğundan true, hiç nokta bulamaz ise false olarak kalmaya devam edecek
int yenifark = yenihasta.timeWindow.t1 - (periyod + eskihastayenihastauzaklik); //bu formül ekibin en az bekleme yapacağı hastayı seçer eğer negatif ise hasta ziyareti hasta zç1 başladıkatn sonra başlayacaktır
if (yenifark < fark)
{
fark = yenifark;
kararverilenhasta = yenihasta;
nokta = j;//en düşük farka sahip olan noktayı bulmak için fark değei küçüldüğünde nokta güncelleniyor
atamaicint1 = t1;
atamaicint2 = t2;
}
}
}
if (ziyaretedilebilirvarmi) //rotaya yeni bir hasta daha eklenebilir mi?
{
//****burada nokta değerine ait hastayı rotaya ekle****
myrota.YeniNoktaEkleAraya(myrota.ziyaretSirasi.Count - 1, kararverilenhasta, atamaicint1, atamaicint2);//fark değiri en düşük olan hasta rotaya eklendi
myrota.KaydirmaUygula();
periyod = atamaicint2; //t2 de yeni yapılan ziyaretin bitişi var
eskihasta = kararverilenhasta;
_hastaList.Remove(kararverilenhasta); //hasta rotaya eklendiği için ziyaret listesinden çıkarıldı
// i = nokta;//arama başlangıç için yeni i değeri nokta oldu
}
else
{
//ziyaret edilebilecek hasta bulunamadı demektir
//bu durumda son rota için artık yeni hasta eklenemez anlamına gelir
//bu rota rotalistesine eklenecek
//seçilen ekip ekip listten silinecek
_rotaList.Add(myrota); //myrota için artık atanacak yeni hasta yok demektir
_ekipList.Remove(secilenekip); //myrota için belirlenen ekip için atanacak yeni hasta yok tekrar seçilmemesi çin listeden silindi
}
}
myrota.ToplamUzaklikHesapla();
}
}
public void AtamalariYap_onceki2()
{
//daha önce yazılmıştı artık kullanılmıyor
//ekip seç ekipe ait rotayı doldur sonra bu ekibi sil, diğer ekibi seç
while (_ekipList.Count > 0 && _hastaList.Count > 1)
{
Ekip secilenekip = EkipSec(); //en uygun ekibi seçer
Rota myrota = new Rota(); //yeni bir rota başlattı
myrota.ekip = secilenekip; //rotanın ekibi atandı
int periyod = myrota.ekip.sabahMesai.t1; //rota için başlangıç periyodu, ekibin sabah mesai başlangıcı
int nokta = 0; //rota başlangıç noktası her zaman 0. nokta, 0 sağlık merkezi
int i = 0; //hasta listesindeki ilk hasta Id si
bool ziyaretedilebilirvarmi = true;
while (ziyaretedilebilirvarmi) //seçilen ekip için uygun noktaları bularak gredy olarak atamalar yapacak
{
ziyaretedilebilirvarmi = false; //ziyaret edilebilir nokta bulamaz ise false kalsın diye güncellendi
int fark = Islemler.M; //fark değeri başlangıcta büyük bir değer alındı
int t1 = 0; //atama yapılacak zç1 değeri
int t2 = 0; //zç2
//aşağıdaki for tüm hasta listesini dolaşarak atama için en uygun hastayı bulur
// atanabilecek hasta bulursa ziyaretedilebilirvarmı true olur
for (int j = 1; j < _hastaList.Count; j++)//hasta listesi-1 kadar döngü ile mevcut hastalar taranıyor
{
if (i == j)
{
continue; //en son hasta
}
int m1 = periyod + Islemler.UzaklikGetir(_hastaList[i].hastaID, _hastaList[j].hastaID).dakika + _hastaList[j].bakimSuresi;
int m2 = m1 + Islemler.UzaklikGetir(_hastaList[j].hastaID, _hastaList[0].hastaID).dakika; //son noktadan sonra sağlık merkezine gidilebiliyormu
bool skillyeterli = (myrota.ekip.skill & _hastaList[j].skill) == _hastaList[j].skill; //skill ziayaret için yeteliyse true, değilse false
bool mesaisarkmasiyok = !myrota.MesaiSarkmasiVar(t1, t2); //rotada bu t1, t2 atamasında mesai sarkması varmı bakılıyor, dönen değer değillendi
if (skillyeterli && mesaisarkmasiyok && m1 < _hastaList[j].timeWindow.t2 && m2 < myrota.ekip.ogleMesai.t2)
{
//koşul sağlanmış ise ziyaret edilebilece bir hasta noktası var demektir. bu duurmda farklara bakılacak
ziyaretedilebilirvarmi = true; //ziyaret edilebilir bir nokta bulunduğundan true, hiç nokta bulamaz ise false olarak kalmaya devam edecek
int yenifark = _hastaList[j].timeWindow.t1 - (periyod + Islemler.UzaklikGetir(_hastaList[i].hastaID, _hastaList[j].hastaID).dakika);
if (yenifark < fark)
{
fark = yenifark;
nokta = j; //en düşük farka sahip olan noktayı bulmak için fark değei küçüldüğünde nokta güncelleniyor
if (m1 > _hastaList[j].timeWindow.t1) //ziyaret edilecek hastaya ulaşıldığında ziyaret başlayacak
{
t1 = m1; //eğer hastaya ulaşma zamanı ile hastanın istediği zç1 kıyaslayarak büyük olanını seçiyor
}
else
{
t1 = _hastaList[j].timeWindow.t1; //eğer hastaya ulaşma zamanı t1 den önce ise ziyaret t1 de başlayacak, bu durumda ekip beklemiş sayılır
}
t2 = t1 + _hastaList[j].bakimSuresi; //ziyaret bitişi için gereken t2 zamanı, t2=t1+bakim
}
}
}
if (ziyaretedilebilirvarmi) //rotaya yeni bir hasta daha eklenebilir mi?
{
//****burada nokta değerine ait hastayı rotaya ekle****
myrota.YeniNoktaEkleAraya(myrota.ziyaretSirasi.Count - 1, _hastaList[nokta], t1, t2); //fark değiri en düşük olan hasta rotaya eklendi
periyod = t2; //t2 de yeni yapılan ziyaretin bitişi var
_hastaList.RemoveAt(nokta); //hasta rotaya eklendiği için ziyaret listesinden çıkarıldı
i = nokta; //arama başlangıç için yeni i değeri nokta oldu
}
else
{
//ziyaret edilebilecek hasta bulunamadı demektir
//bu durumda son rota için artık yeni hasta eklenemez anlamına gelir
//bu rota rotalistesine eklenecek
//seçilen ekip ekip listten silinecek
_rotaList.Add(myrota); //myrota için artık atanacak yeni hasta yok demektir
_ekipList.Remove(secilenekip); //myrota için belirlenen ekip için atanacak yeni hasta yok tekrar seçilmemesi çin listeden silindi
}
}
}
if (_hastaList.Count <= 1)
{
MessageBox.Show("atamalar tamam");
}
else
{
MessageBox.Show("atamalar yapılamadı");
}
}
public void AtamalariYap_onceki()
{
//ekip seç ekipe ait rotayı doldur sonra bu ekibi sil, diğer ekibi seç
bool atamalartamam = false;
while (true)
{
Ekip secilenekip = EkipSec();
Rota myrota = new Rota();
myrota.ekip = secilenekip;
int periyod = myrota.ekip.sabahMesai.t1;
int nokta = 0; //rota başlangıç noktası her zaman 0. nokta, 0 sağlık merkezi
int i = 0; //hasta listesindeki ilk hasta Id si
bool ziyaretedilebilirvarmi = false;
int fark = Islemler.M;
int t1 = 0; //zç1
int t2 = 0; //zç2
//aşağıdaki for tüm hasta listesini dolaşarak atama için en uygun hastayı bulur
// atanabilecek hasta bulursa ziyaretedilebilirvarmı true olur
for (int j = 1; j < _hastaList.Count; j++)
{
int m1 = periyod + Islemler.UzaklikGetir(_hastaList[i].hastaID, _hastaList[j].hastaID).dakika + _hastaList[j].bakimSuresi;
int m2 = m1 + Islemler.UzaklikGetir(_hastaList[j].hastaID, _hastaList[0].hastaID).dakika;
if (m1 > _hastaList[j].timeWindow.t1) //ziyaret edilecek hastaya ulaşıldığında ziyaret başlayacak
{
t1 = m1; //eğer hastaya ulaşma zamanı t1(ZÇ1) den daha sonra ise
}
else
{
t1 = _hastaList[j].timeWindow.t1; //eğer hastaya ulaşma zamanı t1 den önce ise ziyaret t1 de başlayacak
}
t2 = t1 + _hastaList[j].bakimSuresi; //ziyaret bitişi gereken t2 zamanı, t2=t1+bakim
bool skillyeterli = (myrota.ekip.skill & _hastaList[j].skill) != _hastaList[j].skill;
bool mesaisarkmasiyok = !myrota.MesaiSarkmasiVar(t1, t2); //rotada bu t1, t2 atamasında mesai sarkması varmı bakılıyor, dönen değer değillendi
if (skillyeterli && mesaisarkmasiyok && m1 < _hastaList[j].timeWindow.t2 && m2 < myrota.ekip.ogleMesai.t2)
{
ziyaretedilebilirvarmi = true;
int yenifark = _hastaList[j].timeWindow.t1 - (periyod + Islemler.UzaklikGetir(i, _hastaList[j].hastaID).dakika);
if (yenifark < fark)
{
fark = yenifark;
nokta = j;//nokta dizinin indisi bu indissteki değeri rotaya eklemek gerek
}
}
}
if (ziyaretedilebilirvarmi) //rotaya yeni bir hasta daha eklenebilir mi?
{
//****burada nokta değerine ait hastayı rotaya ekle****
myrota.YeniNoktaEkleAraya(myrota.ziyaretSirasi.Count - 1, _hastaList[nokta], t1, t2);
if (_hastaList[i].timeWindow.t1 > periyod + Islemler.UzaklikGetir(_hastaList[i].hastaID, _hastaList[nokta].hastaID).dakika)
{
periyod = _hastaList[i].timeWindow.t1;
}
else
{
periyod = periyod + Islemler.UzaklikGetir(_hastaList[i].hastaID, _hastaList[nokta].hastaID).dakika;
}
_hastaList.RemoveAt(nokta); //hasta rotaya eklendiği için listeden çıkarıldı
i = nokta; //arama başlangıç için yeni i değeri nokta oldu
}
else
{
//ziyaret edilebilecek hasta bulunamadı demektir
//bu durumda son rota için artık yeni hasta eklenemez anlamına gelir
//bu rota rotalistesine eklenecek
//seçilen ekip ekip listten silinecek
//eğer hala listede hasta varsa count>1 (0 nolu hasta sağlık merkezi o silinmiyor), while dönmeye devam edecek
_rotaList.Add(myrota); //myrota için artık atanacak yeni hasta yok demektir
_ekipList.Remove(secilenekip); //myrota için belirlenen ekip için atanacak yeni hasta yok tekrar seçilmemesi çin listeden silindi
//atanacak hasta yoksa count=1 atama tamamlanmış demektir break ile çıkılır
//atanacak hasta kaldıysa fakat ekiplist te ekip kalmadıyda atamalar başarılamamış demektir break ile çıkılır
//atanacak hasta varsa fakat ekiplistte ekip varsa yeni rota başlatılır, üstteki 2 durum değilse bu duurmdur
if (_hastaList.Count <= 1)
{
atamalartamam = true;
break;//while kırıldı
}
if (_hastaList.Count > 1 && _ekipList.Count == 0)
{
atamalartamam = false;
break;//while kırıldı atamalar tamamlanamadı
}
//akış buraya gelmiş ise while dönmeye devam eder
}
}
if (atamalartamam)
{
MessageBox.Show("atamalar tamam");
}
else
{
MessageBox.Show("atamalar yapılamadı");
}
}
