Lock Record

[ahmet_sinav]

aktif row uzerinde diger kullanicilarin herhangi bir islem yapmamasi icin bir sql clause var mi?
select * from tbl_ with lock seklinde bir komut var fakat bu sadece commit olana kadar calisiyor. ben aktif kayit secili durumda ise islem yapilmasini (delete,insert,update) engellemek istiyorum. bunu nasil gerceklestirebilirim? Arama yaptim bir compenent onerisi haricinde herhangibir bir sonuc bulamadim.
Saygilar;

[bobasturk]

merhaba,

vt tarafında istediğiniz şekilde nasıl yapılacağı hakkında bilgi veremeyeceğim ama delphi tarafında eğer fb kullanıyor ve ib bileşenleri ile bağlanıyorsanız ilgili transaction u çift tıklayarak buradaki özelliklerinden kullanıcıların sadece okuma veya okuyup yazma gibi ayarlarını yapabilirsiniz.

kolay gelsin

[veliadiguzel]

S.A.

bu konuda aklıma ilk gelen kayıt bazında kilitleme icin dosyaya bir alan eklemek ve kayıt select oldugun da o alana Mesela "aktif" veya "1" gibi bir bilgi post etmek ve gene secerken bu alanı kontrol edip eğer "aktif veya "1" ise kayıt kullanılıyor gibi bir "hata" mesajı vermek.

boyle bir konu sanırım forumda da gecmisti


A.E.O.

[ahmet_sinav]

Cevaplar için teşekkürler.

[White Rose]

Eğer Fibplus kullanıyorsan dataset in BeforeEdit ve BeforeDelete olaylarına

Try
Table.LockRecord(True);
except
Raise Exception.Create('Bu kayıt kilitli kardeş....');
end;

kodunu yaz

[ahmet_sinav]

yok fibplus kullanmıyorum.
ibx bileşenleri kullanıyorum.
query'de
select * from tablo_adi with lock
şeklinde seçince transaction commitretain olana kadar kitli kalıyor.
kilidi kaldırmak için transaction.commitretaining demek gerekiyor.
buraya kadar prolem yok.
fakat kullanıcılar yapmak istedikleri işlemleri iptal etmek isteyebilirler. bu durumda nasıl bir yol izlemeliyim.
şöyleki
seçim esnasında
'select * from tablo where no='+edit.text+' with lock'
diyorum. bu seçimi editin on exit eventına yazdım.
farklı bir kayda konumlanmaya çalışırken eğer transactionı commitretain etmez isem kayıt transactionı commitretain edene kadar kilitli kalıyor. tabi başka kullanıcı da üzerinde işlem yapılmamasına rağmen o kayda gelince 'kayıt kilitli' mesajı alıyor.
Saygılar;

[Terminator]

lock emriyle gezerek okuduysan locklı kalması gayet doğal.
vay efendim bu adamın daha önceki locklarını bulup kaldırayım ben diyemez.

kullandığın component ve firebird sürümünde rollbackretaining varsa onu kullan, yoksa, queryini close ederek dene.
o da olmuyorsa,
hiçbir değişiklik olmadıysa normal rollback yaparak,
değişen tablolar varsa commit[retaining] yaparak transactionu bitir/tazele.

locklar nasıl yapılır, hangi durumlarda kalkar gibi bilgiler dökmanlarda gayet detaylı açıklanıyor.

soru odaklı öğrenmek okuyup sindirmekten daha kolay geliyor biliyorum ama, bunu sürekli yapmaya kalkmanın cami önünde mendil açmaya dönüşeceğini anlayabiliyor olmanız lazım. bilgisayarcılık akıllı adam işidir,
akıllı adam da, bırakın hazır çözümleri ve imkanları araştırıp öğrenmeyi,
kendisi bir çözüm yaratabilen kişidir.

[rsimsek]

...
soru odaklı öğrenmek okuyup sindirmekten daha kolay geliyor biliyorum ama, bunu sürekli yapmaya kalkmanın cami önünde mendil açmaya dönüşeceğini anlayabiliyor olmanız lazım. bilgisayarcılık akıllı adam işidir,
akıllı adam da, bırakın hazır çözümleri ve imkanları araştırıp öğrenmeyi,
kendisi bir çözüm yaratabilen kişidir.

Hocam isabetli söylüyorsunuz da bildiklerimizle bilmediklerimiz arasındaki fark günbegün artmaktayken en iyi çözüm bu işin tabletlerinin bir an önce çıkmasıdır Bu teknolojik çağ da buna imkân verir tahmin ediyorum

[Terminator]

...
soru odaklı öğrenmek okuyup sindirmekten daha kolay geliyor biliyorum ama, bunu sürekli yapmaya kalkmanın cami önünde mendil açmaya dönüşeceğini anlayabiliyor olmanız lazım. bilgisayarcılık akıllı adam işidir,
akıllı adam da, bırakın hazır çözümleri ve imkanları araştırıp öğrenmeyi,
kendisi bir çözüm yaratabilen kişidir.

Hocam isabetli söylüyorsunuz da bildiklerimizle bilmediklerimiz arasındaki fark günbegün artmaktayken en iyi çözüm bu işin tabletlerinin bir an önce çıkmasıdır Bu teknolojik çağ da buna imkân verir tahmin ediyorum

artan bildiklerimizle bilmediklerimiz arasında fark değil, endişe.
tablet olayı halledilir, asıl sorun 250lilik kullanabileceklerin 750lilik satınalabilenlerle olan haksız rekabeti olacak..

[rsimsek]

...artan bildiklerimizle bilmediklerimiz arasında fark değil, endişe...

Bilinmezlik deryasına daldıkça ne kadar az bildiğimizi dolaysıyla bildiklerimizle bilmediklerimiz arasındaki farkı daha iyi anlıyoruz. Yani "Bildiğim tek şey hiç bir şey bilmediğimdir/Socrates" e gidiyor

...
tablet olayı halledilir, asıl sorun 250lilik kullanabileceklerin 750lilik satınalabilenlerle olan haksız rekabeti olacak..

Rekabet her zaman vardır zaten. Önemli olan her iki tarafa da hitap etmek ve ortalamayı tutturup dengeyi sağlayabilmekte..

[Terminator]

...artan bildiklerimizle bilmediklerimiz arasında fark değil, endişe...

Bilinmezlik deryasına daldıkça ne kadar az bildiğimizi dolaysıyla bildiklerimizle bilmediklerimiz arasındaki farkı daha iyi anlıyoruz. Yani "Bildiğim tek şey hiç bir şey bilmediğimdir/Socrates" e gidiyor

...
tablet olayı halledilir, asıl sorun 250lilik kullanabileceklerin 750lilik satınalabilenlerle olan haksız rekabeti olacak..

Rekabet her zaman vardır zaten. Önemli olan her iki tarafa da hitap etmek ve ortalamayı tutturup dengeyi sağlayabilmekte..

örneğimin nedeni, 750mg tablet kullananlar nedeniyle o zaman da, daha fazla bilenlerin gerisinde kalıyor olmandan endişe edip yeni bir çözüm önermenden endişelenmemdi.
tablet çıksa, insanoğlu yine işin daha kolayını isteyecektir.
eski çağları düşünün.. okuyan yazan elle gösterilir, kitaplar elle yazılır, saklıdır, bilgi dağıtılmaz güçtür, insanlar mum ışığında yaşar vs vs..
bugün internette ne ararsan var, 2 tık ötede...
acaba diyorum, biliyor olmanın verdiği haz, öğrenme sürecinin hazzından daha mı yüksek,
ya da, ne kadar çok neyi bilmeye başlarsak o haz, acıya dönüşmeye başlar..

[rsimsek]

Kimbilir