dll acil yardım

Firebird ve Interbase veritabanları ve SQL komutlarıyla ilgli sorularınızı sorabilirsiniz. Delphi tarafındaki sorularınızı lütfen Programlama forumunda sorunuz.
Kilitli
nedimtrc
Üye
Mesajlar: 23
Kayıt: 02 Nis 2007 09:31

dll acil yardım

Mesaj gönderen nedimtrc »

arkadaşlar acil yardımınızı bekliyorum bir türlü udf tanımlarken değişkenleri tanımlamada sorun yaşıyorum
unitte currency tanımladığım değeri numeric(10,5) olarak tanımlıyorum sonuç hep 0.00 çıkıyor ne değer alırsa alsın.
birde string değişken girişi yapılırken söyle gösterim
DECLARE EXTERNAL FUNCTION GECIKME
DATE,
DATE,
CSTRING(10),
CSTRING(10),
NUMERIC(10,2)
RETURNS INTEGER BY VALUE
ENTRY_POINT 'GECIKME' MODULE_NAME 'KONTROL'
olarak tanımlı
unit kısmında ise söyle

function GECIKME(SON, TAHSIL: TDate; KANUNE, UYGULAMA: PCHAR; TUTAR: currency):currency;

söyle bir işlem yapmak istiyorum unitte

TKANUN.Close;
TKANUN.SelectSQL.Clear;
TKANUN.SelectSQL.Add('SELECT * FROM KANUN WHERE KANUN_ADI='+QuotedStr(KANUNE));
TKANUN.Open;

ibexpertte söyle deniyorum

select gecikme('17.09.2005','04.05.2007','AMME','AYLIK',100) FROM rdb$database

sorunun kaynağına bakınca sql komutunda yazmak istediğim filtrelemek istediğim 'AMME' değişkenini atmıyor açıkçası dll olduğu içinde ne yazdığınıda test edemiyorum konu hakkında bilgisi olan arkadaşların acil yardımlarını bekliyorum
Kullanıcı avatarı
mussimsek
Admin
Mesajlar: 7603
Kayıt: 10 Haz 2003 12:26
Konum: İstanbul
İletişim:

Mesaj gönderen mussimsek »

Kilitli