İlaç Adı barkodu Fiyatı SQL Scripti

Firebird ve Interbase veritabanları ve SQL komutlarıyla ilgli sorularınızı sorabilirsiniz. Delphi tarafındaki sorularınızı lütfen Programlama forumunda sorunuz.
Cevapla
Kullanıcı avatarı
kefukar
Üye
Mesajlar: 705
Kayıt: 22 Kas 2004 03:08
İletişim:

İlaç Adı barkodu Fiyatı SQL Scripti

Mesaj gönderen kefukar »

S.a
Arkadaşlar piyasadaki İlaç Adı , Barkodu, Fiyatı (Fiyatlar değişken gerçi olmasa da olur) içeren SQL Scripti arıyorum.
Elinde olan veya bulabilecek var mı?
selm@n
Kıdemli Üye
Mesajlar: 442
Kayıt: 01 Oca 2004 11:52
Konum: Adapazarı
İletişim:

Mesaj gönderen selm@n »

;)
Kullanıcı avatarı
kadirkurtoglu
Üye
Mesajlar: 748
Kayıt: 22 May 2005 01:20
Konum: Uzakta Görünen Tepeden...

Mesaj gönderen kadirkurtoglu »

script mssql için hazırlanmış, fb için varsa rica edebilirmiyim...
Bir mum, yanındaki mumları tutuşturmakla,
ışığında hiç bir şey kaybetmez.

Mevlana

OS win.10, IDE Delphi 10.3, RDBMS Firebird and MSSQL, BROWSER Chrome
Kullanıcı avatarı
kefukar
Üye
Mesajlar: 705
Kayıt: 22 Kas 2004 03:08
İletişim:

Mesaj gönderen kefukar »

selm@n teşekkürler. ;)
selm@n
Kıdemli Üye
Mesajlar: 442
Kayıt: 01 Oca 2004 11:52
Konum: Adapazarı
İletişim:

Mesaj gönderen selm@n »

@kefukar rica ederim. @kadirkurtoglu inş vaktim olursa fb içinde hazırlarım gönlüm fb ama malum çalıştığımız kurum ms çu :?
;)
Berdem
Üye
Mesajlar: 431
Kayıt: 28 Tem 2003 12:28

Mesaj gönderen Berdem »

Merhaba,

Kod: Tümünü seç

CREATE GENERATOR G_ILAC;

CREATE TABLE ILAC (
    BARKOD           DMN_AD /* DMN_AD = VARCHAR(16) */,
    ORJINAL          DMN_AD_ORTA /* DMN_AD_ORTA = VARCHAR(32) */,
    ILAC_ADI         DMN_AD_UZUN /* DMN_AD_UZUN = VARCHAR(64) */,
    ETKEN_MADDE      DMN_AD_UZUN /* DMN_AD_UZUN = VARCHAR(64) */,
    BIRIM_MIKTAR     DMN_AD_KISA /* DMN_AD_KISA = VARCHAR(10) */,
    BIRIM_CINSI      DMN_AD_KISA /* DMN_AD_KISA = VARCHAR(10) */,
    FARMOSETIK_FORM  DMN_AD /* DMN_AD = VARCHAR(16) */,
    AMBALAJ          DMN_SAYI_KUCUK /* DMN_SAYI_KUCUK = SMALLINT */,
    AMBALAJ_BIRIMI   DMN_AD /* DMN_AD = VARCHAR(16) */,
    FIRMA_ADI        DMN_AD_ORTA /* DMN_AD_ORTA = VARCHAR(32) */,
    ITHAL_IMAL       DMN_AD_KISA /* DMN_AD_KISA = VARCHAR(10) */,
    RECETE           DMN_AD_KISA /* DMN_AD_KISA = VARCHAR(10) */,
    HAZIRAN          DMN_PARA /* DMN_PARA = DOUBLE PRECISION */,
    REFERANS         DMN_PARA /* DMN_PARA = DOUBLE PRECISION */,
    REFERANS_ULKE    DMN_AD_KISA /* DMN_AD_KISA = VARCHAR(10) */,
    DEPO_ALIS        DMN_PARA /* DMN_PARA = DOUBLE PRECISION */,
    DEPO_SATIS       DMN_PARA /* DMN_PARA = DOUBLE PRECISION */,
    ECZA_SATIS       DMN_PARA /* DMN_PARA = DOUBLE PRECISION */,
    PERAKENDE        DMN_PARA /* DMN_PARA = DOUBLE PRECISION */,
    KDV_ORANI        DMN_PARA /* DMN_PARA = DOUBLE PRECISION */,
    SON              DMN_TARIH /* DMN_TARIH = DATE */,
    ILAC_N0          DMN_SAYI NOT NULL /* DMN_SAYI = INTEGER */,
    DURUM            DMN_AD_UZUN /* DMN_AD_UZUN = VARCHAR(64) */
);




/******************************************************************************/
/****                             Primary Keys                             ****/
/******************************************************************************/

ALTER TABLE ILAC ADD PRIMARY KEY (ILAC_N0);


/******************************************************************************/
/****                               Triggers                               ****/
/******************************************************************************/


SET TERM ^ ;


/******************************************************************************/
/****                         Triggers for tables                          ****/
/******************************************************************************/



/* Trigger: TR_GEN_ILAC */
CREATE TRIGGER TR_GEN_ILAC FOR ILAC
ACTIVE BEFORE INSERT POSITION 0
AS
            BEGIN
 if(New.ILAC_N0 is null) then
        New.ILAC_N0 = GEN_ID(G_ILAC,1);
   
 
  
END
^


SET TERM ; ^
http://www.saglik.gov.tr/IEGM/dosyagost ... ISTESI.xls
Sağlık Bakanlığı adresinden güncel fiyatları indir.Table kopyala.Kolay gelsin..
Kullanıcı avatarı
kadirkurtoglu
Üye
Mesajlar: 748
Kayıt: 22 May 2005 01:20
Konum: Uzakta Görünen Tepeden...

Mesaj gönderen kadirkurtoglu »

Buyrun Access Database

fb yolda geliyor

http://www.gigasize.com/get.php/1101447/ILACLISTE.MDB
Bir mum, yanındaki mumları tutuşturmakla,
ışığında hiç bir şey kaybetmez.

Mevlana

OS win.10, IDE Delphi 10.3, RDBMS Firebird and MSSQL, BROWSER Chrome
Kullanıcı avatarı
kefukar
Üye
Mesajlar: 705
Kayıt: 22 Kas 2004 03:08
İletişim:

Mesaj gönderen kefukar »

:) Teşekkürler arkadaşlar. Coşturdunuz valla.
Hadi kadir ver coşkuyu alttan alttan (FB için) :)
Kullanıcı avatarı
kadirkurtoglu
Üye
Mesajlar: 748
Kayıt: 22 May 2005 01:20
Konum: Uzakta Görünen Tepeden...

Mesaj gönderen kadirkurtoglu »

kefukar yazdı::) Teşekkürler arkadaşlar. Coşturdunuz valla.
Hadi kadir ver coşkuyu alttan alttan (FB için) :)
http://www.gigasize.com/get.php/1102405/ILACLISTESI.FDB
Bir mum, yanındaki mumları tutuşturmakla,
ışığında hiç bir şey kaybetmez.

Mevlana

OS win.10, IDE Delphi 10.3, RDBMS Firebird and MSSQL, BROWSER Chrome
Kullanıcı avatarı
sabanakman
Kıdemli Üye
Mesajlar: 3077
Kayıt: 17 Nis 2006 08:11
Konum: Ah bi Antalya olaydı keşke (Ankara)

Mesaj gönderen sabanakman »

Bu değerli paylaşım güzel oldu. Bir de dosyaları sıkıştırmış olsan süper olacaktı. Neyse bir dahaki sefere aklında bulunsun hem gönderme hem de indirme açısından sıkışmış dosya daha avantajlı oluyor :) . Teşekkürler.
Şaban Şahin AKMAN
_________________
Derin olan kuyu değil kısa olan iptir. - .
Kullanıcı avatarı
kadirkurtoglu
Üye
Mesajlar: 748
Kayıt: 22 May 2005 01:20
Konum: Uzakta Görünen Tepeden...

Mesaj gönderen kadirkurtoglu »

sabanakman yazdı:Bu değerli paylaşım güzel oldu. Bir de dosyaları sıkıştırmış olsan süper olacaktı. Neyse bir dahaki sefere aklında bulunsun hem gönderme hem de indirme açısından sıkışmış dosya daha avantajlı oluyor :) . Teşekkürler.
aslında yapmadığım bir uygulama dır rar lamamak. acele olunca iş sıkıştırma faslı nı es geçtim...
Bir mum, yanındaki mumları tutuşturmakla,
ışığında hiç bir şey kaybetmez.

Mevlana

OS win.10, IDE Delphi 10.3, RDBMS Firebird and MSSQL, BROWSER Chrome
Kullanıcı avatarı
kefukar
Üye
Mesajlar: 705
Kayıt: 22 Kas 2004 03:08
İletişim:

Mesaj gönderen kefukar »

Kadir Eyvallah. Coşkuyu tamamladın :)

Bundan sonra senden bahsedeceğim soranlara Kadir dieceğim hangi kadir diye sorduklarında ÇOŞTURAN KADİR diyeceğim ;)
Kullanıcı avatarı
kadirkurtoglu
Üye
Mesajlar: 748
Kayıt: 22 May 2005 01:20
Konum: Uzakta Görünen Tepeden...

Mesaj gönderen kadirkurtoglu »

kefukar yazdı:Kadir Eyvallah. Coşkuyu tamamladın :)

Bundan sonra senden bahsedeceğim soranlara Kadir dieceğim hangi kadir diye sorduklarında ÇOŞTURAN KADİR diyeceğim ;)
valle herkes (sizi tenzih ederek...) 'Deli Kadir ulennn...' diyorlar... coşturan kadir... :lol:
Bir mum, yanındaki mumları tutuşturmakla,
ışığında hiç bir şey kaybetmez.

Mevlana

OS win.10, IDE Delphi 10.3, RDBMS Firebird and MSSQL, BROWSER Chrome
Kullanıcı avatarı
aslangeri
Moderator
Mesajlar: 4322
Kayıt: 26 Ara 2003 04:19
Konum: Ankara
İletişim:

Mesaj gönderen aslangeri »

s.a.
arkdaşlar sağlık bakanlığının SKRS (sağlık kodları referans sistemi) var.
ordan ilaç listesini alabilirsiniz.
SKRS
Duyduğun Şeylerin Söylediklerim Olduğuna Eminim Ama
Anladığın Şeylerin Anlatmak İstediklerim Olduğuna Emin Değilim
Cevapla