Delphi Forum

Merhaba arkadaşlar. Takıldığım bir konu var. Normalde veritabanında tablo oluştururken arama ve filtrelemede kullandığımız key lerin alan tipi otomatik sayı veya integer olur. Bunun aradığımız değeri hızlı bulmasında çok önemli olduğunu biliyorum.Fakat çalıştığım hastanenin otomasyonunda kayıtlar ...

s.a.
genel olarak bir iki tavsiye vermek istiyorum....
- tablolaraa isimler ver. adotable3,adotable4 bizim için hiçbir şey ifade etmiyor. hangisi stok hangisi master vs. tablolara isimler verirsen daha anlaşılır olur.
- birde döngü meselesi var... eğer bir tabloyu baştan aşağı tarıyacaksan while ...

Dediğiniz gibi ben de şu an programı yaşıyorum ve kalem kağıt elimde mantığımı akış diyagramları kullanarak uyguluyorum. Şu an içiçe döngü kullanarak problemi çözmeye çalışıyorum. Bu arada önerilerinizin çoğunu uyguladım. Büyük küçük harf ayrımını sıfır sonucunu falan dikkate aldım.

İlginiz için ...

AdoTable4.Edit demişsin ama bundan önce hangi kayda konumlanacağı hakkında tek satır kod olmayınca tüm değerleri tek kayda toplaması normal.

Arkadaşlar malesef bütün konumlannmaları yaptım ama hala adotable3 teki kayıtları adotable4 te konumlandığı ilk kayda yapıyor. Son olarak kodlarım şöyle ...

döngü yardımıyla doğru kaydı aramak yerine, locate komutunu kullanın. sizin yazdığınız kodlardaki eksiklik, adotable4 hep aynı kayıt üzerinde duruyor. for döngüsü içinde adotable4.next komutunun olması gerekirdi.

Malesef adotable4.next komutu işlemiyor hep ilk kayıtta kalıyor. Locate komutunu ...

Merhaba arkadaşlar. Sorunum , bir döngünün içinde farklı tablodaki bir alandan ,başka tablodaki bir alana kayıt atamamam. Kodlarımı veriyorum:

for j:=0 to adotable4.RecordCount-1 do
begin
if adotable3['STOK_KODU']=adotable4['STOK_KODU'] then
begin
adotable4.Edit;
adotable4.FieldByName('STOK ...

Append i yeni kayıt buttonuyla yapıyorum.Kodlar:

button1.Click;//Master tabloyu filtreleyen button
adotable2.Edit;//Master tablo
adotable2['CIK_FATURA_NO']:=edit2.Text;
adotable2['CIK_FATURA_TARIHI']:=edit3.Text;
adotable2['MUSTERI_NO']:=edit4.Text;
adotable2.Post;
adotable3.Append;//Detay tablosu ...

Tekrar merhaba.
Söylediğiniz yöntemi yapmadan zaten kayıt yapmıyor. Şu an ilk önce master kayıtlar post edilip sonra detay post edilerek kayıt yapılabiliyor. Benim sorunum sadece kaydı dbgrid e atmaması. Ama dbgrid e atmamasına rağmen tabloda kayıt gözüküyor.Aynı şekilde bu master kaydı ...

Tekrar merhaba.
Malesef dbedit leri silmeme rağmen yine aynı sorun oldu ve dbgride boş kayıt atıyo.Ama veritabanından tabloya baktığımda kayıt gözüküyor. Projede sorgulattığımda da dbgird te gözüküyor. Sadece yeni kayıtta sorun oluyor. Acaba dbgrid yerine başka bir grid bileşeni mi kullansam ...

dbedit nesnelerini kullanmama konusunda kesinlikle size katııyorum. Şu an bütün dbedit nesnelerini sildim ve normal edit nesneleri koydum. Editlerden tabloya post ederek gönderiyorum. Sorgulama sonucu bilgileri editlere yazdığım bir procedure sayesinde getiriyorum. Kayıtla ilgili ufak bir problem ...

Arkadaşlar merhaba.
Sorunum dbeditlere girdiğim kayıtların kayıt buttonuna yazdığım append komutuyla atmaması.
Basit bir mal hesabı yapıyorum. Dört adet dbeditim var. Bunlar: kdv,iskonto,adet ve toplam fiyat. adet db editinin onexit olayına yazdığım bir function işliyor. On exit olayında şu kod var ...

bunu kodlarla yapmak yerine veri tabanından yapmalısın. Stok_kodu alanını uniq olarak işaretlersen kaydedilmez.

Dediğiniz mantıklı ama veritabanı ingilizce olduğu zaman verdiği uyarı kullanıcıyı rahatsız edebilir. O yüzden amacım kontrol altına almak ve ona göre kodlar işletmek. Eğer kodlarımda ...

Tablomda tekrar kayıtlar olmasın istiyorum. Yaptığı zamanda uyarsın istiyorum.

Arkadaşlar yeniden merhaba. Yeniden başka bir sorunla karşınızdayım.
Bu seferki sorunum tablomun içindeki tekrar kayıtları yaptıramamam. Kodlarımdaki mantık düzgün gibi gözüküyo ama geriye hiç bişey döndürmüyo. Kodlarım:

while not adotable3.Eof do
begin
if adotable3.Locate('STOK_KODU',dbedit4.Text ...

Durum tamamen yukarıdaki yazdığım koddan ve table2 nin mastersourcenin table1 e bağlanmasından ibaret başka bi ekstre yok.
Benim amacım bi faturaya bağlı birden çok stoğu kaydetmek. Uygulamamda stokları detay tablosuna attığımda yukarıdaki kod çalışıyo yani hem masteri, hem de detayı aynı anda ...