autoincrement

[andronoid]

Slm. autoincrement yerine aşağıdaki gibi bir kod yazdım. ibexpertte çalışıyor.

Kod: Tümünü seç

CREATE TRIGGER NEW_TABLE_BI0 FOR NEW_TABLE
ACTIVE BEFORE INSERT POSITION 0
AS
begin
   select max(islemno)+1 from new_table into new.islemno;
end

fakat delphi tarafında ise islemno adlı alanın aldığı değer gözükmüyor. dataset`in afterpost`undan sonra şu kodlar da var.

Kod: Tümünü seç

 IBTransaction.CommitRetaining;
 IBDataSet1.refresh;

1.si: değerin delphi de gözükmesi için ne yapılabilir?

2.si: bu tabloda 100.000 civarında kayıt tutulabilir. max fonksiyonunu kullanırsam hissedilir derecede yavaşlama olur mu?

3.sü: autoincremet`i kullanırsam, generatörün aldığı değeri kodla sıfırlayabilir miyim ? Sizce hangi yöntemi kullanmam daha verimli olur?


iyi çalışmalar...[/code]

[gkimirti]

generator kullan,digerleri sorun cıkartabilir.
istersen generatoru procedure icinden de tetikleyebilirsin
yani tablonun afterpost unda bu procedure u cagırarak hatta degerini alarak da sorunu cozebilirsin

[aslangeri]

S.A.
1. tabloyu close open yaparsan görünür.
2. yavaşlama olacağı kesin ama ne kadar hissedilir bilemiyorum. tabloya otomatik kayıt ekletip bunu test edebilirsin.
3. evet.

Kod: Tümünü seç

 set generator gen_xxx_id to 0

kolay gelsin.

[Kuri_YJ]

Arkadaşlar yanıtları vermişler ama ben ek bilgi vermek istiyorum.

Max aggregate'ler kullanacağınız zaman (özellikle Max) ilgili alan için DESC INDEX tanımlayın. O zaman hızınız hemen hemen hiç değişmez.

Kolay Gelsin.

[sadettinpolat]

en son eklediğin kayıta ait ID numarasını şu şekilde alabilirsin.

trigger aşağıdaki gibi

Kod: Tümünü seç

CREATE TRIGGER GIREN_BI FOR GIREN
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
  IF ((NEW.ID IS NULL) or (NEW.ID = 0)) THEN
    NEW.ID = GEN_ID(GEN_GIREN_ID,1);
END

ibdataset1 --> sağ tuş --> dataset editör --> key field alanında sadece ID alanını seç --> update field alanında da ID haric diğer alanları seç -->generate sql --> Insert Sql bölümüne gel -->

Kod: Tümünü seç

insert into GIREN
  (CINS, TOPLAM, TUR)
values
  (:CINS, :TOPLAM, :TUR)

olarak yazılmış olan kodu

Kod: Tümünü seç

insert into GIREN
  (ID,CINS, TOPLAM, TUR)
values
  (GEN_ID(GEN_GIREN_ID,0),:CINS, :TOPLAM, :TUR)

olarak değiştir.
ibdataset bileşenin GeneratorField ozelligine tıkla

Generator = GEN_GIREN_ID
Field = ID
Increment By = 1
Apply event = On post
yap.

bu sayede

Kod: Tümünü seç

ibdataset1.insert;
//ibdatasetID.Asinteger := 0; gibi bir kod sakın yazma :)
.....
.....
.....
ibdataset1.post;

dersen kayıdın normal ID değerine ulaşabilirsin.

bu işin güzel tarafı tabloyu close/open etmeden en son eklediğin kayıt üzerinde silme ve düzenleme işlemlerini sorunsuz bir şekilde yapabiliyorsun.

bu yöntemde trigger hiç bir iş yapmıyor ben olesine kullanıyorum.

[andronoid]

Verdiğiniz bilgiler için teşekkür ederim.
Kolay Gelsin...

[sadettinpolat]

Kod: Tümünü seç

insert into GIREN 
  (ID,CINS, TOPLAM, TUR) 
values 
  (GEN_ID(GEN_GIREN_ID,0),:CINS, :TOPLAM, :TUR)  

yerine

Kod: Tümünü seç

insert into GIREN 
  (ID,CINS, TOPLAM, TUR) 
values 
  (0,:CINS, :TOPLAM, :TUR)  

da yazabilirsiniz. bu şekilde triggerda bir işe yaramış olur

[husonet]

Öncelikle Her kod'un sizin projenizde çalışacak dierek düşünmeyelim. Bazı Otomatik Arttırma işlemleri Delphi kısmında Bazılarıda Database kısmında yaptırılmalıdır.

Kolay Gelsin...