• Anasayfa
  • Hakkımızda
  • Etkinlikler
  • Destek Verin
  • Site Haritası
  • Giriş Yap
  • Üye Ol
  • Facebook
  • Twitter
  • RSS
Yazılım Dilleri
  • Soru - Cevap
  • EĞİTİM SETİ
  • KATEGORİ
  • DUYURU
  • TEKNOLOJİ HABERLERİ

Son Sorular

  • 23.04.2016 00:55:33C programlama 2 oyun
  • 20.04.2016 16:34:41Local Database
  • 15.04.2016 14:26:15Fatura kayıt işlemi
  • 21.03.2016 01:55:30C# problem

Popüler Sorular

  • 27.05.2012 05:49:50Asp.Net ile Date time alana veri ekleyemiiyorum ?
  • 2.04.2012 00:45:18.exe uzantılı dosya için dijital imza nerde nasıl alınır.
  • 12.05.2012 08:44:49Acil Yardım
  • 27.05.2012 13:46:51veri tabanı bağlantısı
  • .Net Framework
  • 8085 Assembly
  • Active Directory
  • ADO.NET
  • Android
  • Apple IOS
  • Arduino
  • ASP.NET
  • ASP.NET MVC
  • Blackberry
  • C#.Net
  • C++
  • CCG Framework
  • CISCO
  • CSS
  • Diğer
  • Dreamweaver
  • Entity Framework
  • Exchange Server
  • Gömülü Sistemler
  • GSM Programlama
  • Güncel
  • Güvenlik
  • HTML5
  • Java
  • Javascript / JQuery
  • Jira
  • Kariyer ve İş Yaşamı
  • LINQ
  • LibreOffice
  • Linux
  • Matlab
  • Microsoft Dynamics CRM
  • Mobil Uygulama Geliştirme
  • MySQL
  • NoSQL
  • Oracle
  • OWIN
  • PFSense
  • PHP
  • Powershell
  • Python
  • Sanallastirma
  • SAP-ABAP
  • SCOM 2012
  • SEO
  • Sharepoint 2010
  • Sharepoint 2013
  • Silverlight
  • Sistem Analiz ve Tasarımı
  • SQL Server
  • Symantec
  • TFS
  • T-SQL
  • Ubuntu
  • VB.NET
  • Veritabanı Yönetim Sistemleri
  • Visual Studio
  • VMware
  • WCF
  • Web Hosting
  • Windows 8
  • Windows Azure
  • Windows Phone 7.1
  • Windows Phone 8
  • Windows Server
  • Wordpress
  • WPF
  • Xamarin
  • XNA
  • Yazılım Mühendisliği
  • Yöneylem Araştırması
  • ASP.NET MVC
  • Entity Framework
  • Javascript / JQuery
  • LINQ
  • PHP

Son Duyurular

IPhone 6 ve IPhone 6 Plus Teknik Özellikleri ve Fiyatı

IPhone 6 ve IPhone 6 Plus Teknik Özellikleri ve Fiyatı

DELL'in Yeni Projesi: USB Bilgisayar (Project Ophelia)

DELL'in Yeni Projesi: USB Bilgisayar (Project Ophelia)

Windows Phone Youtube Uygulaması Google ve Microsoft ile Yeniden Yapılıyor

Windows Phone Youtube Uygulaması Google ve Microsoft ile Yeniden Yapılıyor

Android ve Apple IOS Telefonlar için Blackberry Messenger (BBM)

Android ve Apple IOS Telefonlar için Blackberry Messenger (BBM)

Nokia Lumia 925 Teknik Özellikleri, Lumia 928 ve 920 ile Karşılaştırması

Nokia Lumia 925 Teknik Özellikleri, Lumia 928 ve 920 ile Karşılaştırması

LG Optimus G Pro Özellikleri ve Gözle Video Oynatma Teknolojisi

LG Optimus G Pro Özellikleri ve Gözle Video Oynatma Teknolojisi

Pl/Sql de utl_file Kullanımı

Pl/Sql de utl_file kullanımı ile dosya işlemlerinin nasıl yapılacağını ve kontrolüne bir göz atalım.

11.11.2013

Yazar: Samet ÇELİKBIÇAK (Google+)

Kategori: Oracle

4600

Merhaba 

Yaptığımız geliştirmelerde bazı durumlarda işlemlerin çıktısını almamız gerekebilir. Örnek olarak .txt ya da .csv formatlarını kullanabiliriz. Bir log dosyasını fiziksel olarak disk üzerine kayıt etmek ya da işlem sonucu bir fiziksel dosya olarak almak için utl_file paketini kullanabiliriz. Daha önce blog içerisinde forms ya da reports ile text file ve excel dosyası hazırlanmasını örnek kodlarını paylaşmıştım. Şimdi yapcağımız işlem ise direk database üzerinden fiziksel diskte bir alana veri yazma olacak. Öncelikle utl_file ile dosya yazma işlemini kullanabilmemiz için database üzerinden fiziksel disk üzerinde erişebilmek için bir directory oluşturmalıyız. Ben bu işlem için "C:\" dizini altına "Oracle Directory" kısaltması olarak "OraDir" dosyasını oluşturacağım ve database üzerinden "C:\OraDir" lokasyonunu directory tanımında kullanacağım. Aşağıdaki komut ile fiziksel dosyamızı database üzerinde oradir ismi ile directory oluşturarak kullanacağız.

CREATE DIRECTORY oradir AS 'C:\OraDir\';

Şimdi örnek olarak bir txt dosyası hazırlayalım ve içinde "Merhaba Dünya" yazalım. Bu işlem için aşağıdaki kodu kullanabiliriz.

declare
  vInFileTxt utl_file.file_type;
begin
  vInFileTxt := utl_file.fopen('ORADIR', 'textfile.txt', 'w');

  utl_file.put(vInFileTxt, 'Merhaba ');
  utl_file.put(vInFileTxt, 'Dünya');
  utl_file.put_line(vInFileTxt, ''); --Bir sonraki satıra geçmek için kullandık.
  utl_file.put_line(vInFileTxt, 'Merhaba ve Dünya kelimelerini put komutu ile birleştirdik.');

  utl_file.fclose(vInFileTxt);
exception
  when others then
    dbms_output.put_line('Hata:' || sqlerrm);
end;

Yukarı kod içinde kullandığımız vInFileTxt utl_file.file_type; utl_file için ihtiyacımız olan dosya tipinde değişkenimizi yarattık. utl_file.fopen('ORADIR', 'textfile.txt', 'w'); komutunda ise sırası ile 'ORADIR' directory ismimiz, 'textfile.txt' ise oluşturacağımız dosyanın adı, 'w' komutu ise belirtiğimiz directory altındaki dosyası nasıl açacağımızı belirtiyor. utl_file.fclose(vInFileTxt); komutu ile ise açık olan dosyamızı kapatıyoruz. Dosya açma tipleri ise şu şekilde;

KOD AÇIKLAMA
A Append Text
AB Append Byte Mode
R Read Text
RB Read Byte Mode
W Write Text
WB Write Byte Mode

Text file oluşturduk şimdi buna benzer şekilde csv dosyasıda oluşturalım.

declare
  vInFileCsv utl_file.file_type;
begin
  vInFileCsv := utl_file.fopen('ORADIR', 'csvfile.csv', 'w');

  utl_file.put_line(vInFileCsv, 'Sıra;Açıklama;Tarih'); --Başlık bilgileri
  for i in 1 .. 10 loop
    utl_file.put_line(vInFileCsv, i || ';' || i || '. Satır' || ';' || to_char(sysdate, 'dd/mm/yyyy hh24:mi'));--Satır bilgileri
  end loop;
  utl_file.fclose(vInFileCsv);
exception
  when others then
    dbms_output.put_line('Hata:' || sqlerrm);
end;

Hem csv hem de text file hazırladık. Şimdi bu dosyalardan veri okuyalım. Önce text file dosyamızı okuyalım sonrasında ise csv dosyamızın okumasını hazırlayalım.

declare
  vOutFileTxt utl_file.file_type;
  vDeger      varchar2(4000);
begin
  vOutFileTxt := utl_file.fopen('ORADIR', 'textfile.txt', 'r');

  if utl_file.is_open(vOutFileTxt) then
    loop
      begin
        utl_file.get_line(vOutFileTxt, vDeger);

        if vDeger is null then
          exit;
        end if;

        dbms_output.put_line('Okunan Değer:' || vDeger);
      exception
        when no_data_found then
          exit;
      end;
    end loop;

  end if;
  utl_file.fclose(vOutFileTxt);

exception
  when others then
    dbms_output.put_line('Hata:' || sqlerrm);
end;

Kod bloğundaki if utl_file.is_open(vOutFileTxt) then komutu ile dosyamız açık olduğu sürece loop ile satır okumalarını yapıyoruz. utl_file.get_line(vOutFileTxt, vDeger); komutu ile dosya içindeki loop ile elimizde olan satırı vDeger isimli değişkenimize atıyoruz.Bu kod sonrasında çıktımız aşağıdaki gibi olacaktır.

Okunan De?er:Merhaba Dünya
Okunan De?er:Merhaba ve Dünya kelimelerini put komutu ile birle?tirdik.

Şimdi csv dosyamızın okumasını ve çıktısını kontrol edelim.

declare
  vOutFileCsv utl_file.file_type;
  vDeger      varchar2(4000);
begin
  vOutFileCsv := utl_file.fopen('ORADIR', 'csvfile.csv', 'r');

  if utl_file.is_open(vOutFileCsv) then
    loop
      begin
        utl_file.get_line(vOutFileCsv, vDeger);

        if vDeger is null then
          exit;
        end if;

        dbms_output.put_line('Okunan Değer:' || vDeger);
      exception
        when no_data_found then
          exit;
      end;
    end loop;

  end if;
  utl_file.fclose(vOutFileCsv);

exception
  when others then
    dbms_output.put_line('Hata:' || sqlerrm);
end;

Okuma işleminden sonra ise çıktımız aşağıdaki gibi olacaktır.

Okunan De?er:Syra;Açyklama;Tarih
Okunan De?er:1;1. Satyr;27/10/2013 13:21
Okunan De?er:2;2. Satyr;27/10/2013 13:21
Okunan De?er:3;3. Satyr;27/10/2013 13:21
Okunan De?er:4;4. Satyr;27/10/2013 13:21
Okunan De?er:5;5. Satyr;27/10/2013 13:21
Okunan De?er:6;6. Satyr;27/10/2013 13:21
Okunan De?er:7;7. Satyr;27/10/2013 13:21
Okunan De?er:8;8. Satyr;27/10/2013 13:21
Okunan De?er:9;9. Satyr;27/10/2013 13:21
Okunan De?er:10;10. Satyr;27/10/2013 13:21

Yukarıdaki işlemler ile benzer şekilde istenilen okuma ve yazma işlemleri yapılabilinir. Mevcut dosyaya bilgi eklemek için ise sadece "w" mod ile açılan dosya örneğinde olduğu gibi "w" yerine "a" ya da "A" yazmak yeterli olacaktır. Artık directory ve utl_fie kullanarak nasıl dosya oluşturacağımız bildiğimize göre hazırladığımız programlarda istediğimiz gibi fiziksel disk üzerine veri yazabilir, kodlarımızı log kayıtlarını atabilir ve ihtiyacımız olan ne varsa yapabiliriz.

Kolay gelsin.

Yazar Hakkında

Samet ÇELİKBIÇAK

Samet ÇELİKBIÇAK

sametcelikbicak.wordpress.com

Dokuz Eylül Üniversitesi Bilgisayar Teknolojisi ve Programlama Bölümü ile Anadolu Üniversitesi İşletme Bölümü mezunuyum. 2007 yılından bu zamana kadar aktif olarak yazılım sektöründe çalışmaktayım. Oracle teknolojileri ile program geliştiriyorum ve bunun yanında Java ile de ilgileniyorum. Boş zamanlarımda yeni teknolojileri araştırır, film izler ve kitap okurum.

Sosyal Medya

ORANLAR

  • 4600izleme

Arkadaşlarınla Paylaş

  • Tweet

0 Yorum

Yorum Yaz / Soru Sor

Lütfen yorum yazmak veya soru sormak için üye girişi yapınız.

Son Yorumlar

  • Böyle bir sayfalama ağ trafiğini hafifleti...
  • Merhaba, ellerinize sağlık çok yardımcı ol...
  • Merhaba Bu uygulama örneğinden ASP.net ...
  • Hocam Link başka sayfaya yönlendiriyor.
  • merhaba benim merak ettiğim bir konu var y...

En Güncel Sorular

  • Bilgilendirme maili (C#.Net)
  • Power Pivot (Sharepoint 2010)
  • BigInteger, BigDecimal (Asp.Net ve Asp.Net MVC)
  • visual C# ile asp nette veritabanı islemleri (Asp.Net ve Asp.Net MVC)
  • Share Point ile Dosya Arşiv Yönetim Sistemi yapılabilir mi ? (Sharepoint 2010)

En Son Cevap Verilen Sorular

  • Bilgilendirme maili
  • BigInteger, BigDecimal
  • visual C# ile asp nette veritabanı islemleri
  • Share Point ile Dosya Arşiv Yönetim Sistemi yapılabilir mi ?
  • txt dosyasına veri yazma

Twitter

Takip et: @yazilim_dilleri

En Çok Okunanlar

Elif BAYRAKDAR

C# ile SQL Server Bağlantısı, Insert, Update ve Delete Sorguları

23.05.2013

  • 122030
  • 0
Hakan Keskin

C# ile Windows Service Projesi Oluşturma, Debug Etme ve Setup Hazırlama

17.12.2013

  • 68134
  • 0
batuhan avlayan

Php - Mail Gönderme (İletişim Formu)

02.09.2013

  • 49928
  • 0

Sponsorlar

KODLAB
Pluralsight
Exchange server is
Office 365
YAZILIM DİLLERİ
Yukarı Çık
  • Hakkımızda
  • Facebook
  • Twitter
  • RSS

© Yazılım Dillerinin Buluşma Noktası | Kaynak belirtildiği sürece makaleler kopyalanabilir.
YazilimDilleri.Net sitesinde yer alan kullanıcıların oluşturduğu tüm içeriklerin yayınlanması ile ilgili yasal yükümlülükler içeriği oluşturan kullanıcıya aittir, YazilimDilleri.Net hiçbir şekilde sorumlu değildir.

Kapat

Giriş Yap

Kullanıcı Adı

Şifre

Şifremi Unuttum

KULLANICI GİRİŞİ