with lock ifadesi hata veriyor. -Çözüldü-

[Gold_Lady]

Merhaba..
Delphi 7 ve Firebird 1.5.3.4870 yüklü bilgisayarımda.

Kayıt kilitlemeye çalışıyorum, ancak ;

Kod: Tümünü seç

"Dynamic SQL error. SQL Error code =-104. Token unknow -1, char 23 with"

with ifadesinin tanınmadığı şeklinde bir hata alıyorum. SQL cümlem;

Kod: Tümünü seç

"select * from tablom where kayitno=:kayitno for update with lock" 

şeklinde.

IBX IBdataset SelectSQL kısmına yazıyorum bu cümleyi. Hep aynı hata. Belki Firebird de bir sorun vardır diye Firebirdu uninstall edip yeniden kurdum. Yine olmadı. İşyerindeki bilgisayarımda deniyorum yine aynı hata. Sorun nedir yardımcı olur musunuz?

[rsimsek]

Aramayı kullanalım

viewtopic.php?t=1770&highlight=firebird+lock
viewtopic.php?t=8598
viewtopic.php?t=3692

[Gold_Lady]

Sanırım sorumu yanlış anladığınız.
Ben zaten o linklerden öğrendiklerimi yapmaya çalışıyorum. Ancak forumda;

Kod: Tümünü seç

"select * from tablom where kayitno=:kayitno for update with lock"

şeklinde verilmiş bir kayıt kilitleme kodu bende;

Kod: Tümünü seç

"Dynamic SQL error. SQL Error code =-104. Token unknow -1, char 23 with"

şeklinde with ifadesinin tanınmadığı yönünde hata veriyor. Ben hatanın neden verdiğini bulmak istiyorum, nasıl kayıt kilitlendiğini sormadım ki.

[rsimsek]

Başka bir şey olabilir. IBExpert ile şu an denedim bir itirazda bulunmadı. IBDataSet in diğer SQL lerini (UpdateSQL vb.) oluşturmadığından olabilir Firebird aynı sürüm.

[Kuri_YJ]

Selamlar,

WITH (LOCK), WITH (NOLOCK), WITH (INDEX=ABUZERKADAYIF_IX) gibi SELECT cümlesine eklene ilaveler M$-SQL Server'a ait ifadelerdir. Bu ifadeler FB'de yok.

Kolay Gelsin

[Gold_Lady]

Kod: Tümünü seç

"select * from tablom where kayitno=:kayitno for update with lock"

benim sql cümlem bu. FB için bu şekilde olmayacak mı?

[White Rose]

sql kodunda "for update" yok

procedure TForm1.MuskrtAfterEdit(DataSet: TDataSet);
begin
try
lock.Close;
lock.SQL.Clear;
Lock.SQL.Add('Select * from Muskrt Where Msk_Kod=:KayitNo with lock');
Lock.Params[0].AsInteger:=MuskrtMSK_KOD.Value;
Lock.Open;
Caption:=IntToStr(MuskrtMSK_KOD.Value)+' NUMARALI KAYIT KİLİTLENDİ';
except
MUSKRT.Cancel;
Showmessage('Bu kayıt şu an kullanılmakta');
//IBTransaction1.RollbackRetaining;
end;
end;

ben bunu kullanıyorum ve çalışıyor...

[Gold_Lady]

Yine aynı...

with ifadesinde aynı hata. with ifadesi tanınmıyor diyor...

[Gold_Lady]

Arkadaşlar sorunu çözdük yakgul arkadaşımız sayesinde.
İlgilenen herkese teşekkür ederim.

Çözümü;

Firebird kurulumunda sanırım hata varmış. Kaldırıp tekrar yükledim olmadı. gds32.dll isimli dosyayıda silmem gerekiyormuş, sildim ve tekrar yükledim sorun çözüldü...

[Kuri_YJ]

Hmmm,

FOR UPDATE Gözümden kaçmış pardon !...


Kolay Gelsin