oracle forms excel file yazma

Merhaba oracle forms da excel file yazmak için aşağıdaki kodlar kullanılabilinir. Yazılan metinlerin sütun sütün gelmesi için iki metin arasında tab ile ayırma işlemi yapılabilinir.

DECLARE
  txt_buffer VARCHAR2(32000);
  out_file   text_io.file_type;
BEGIN

  out_file := text_io.fopen('c:\buffer.txt', 'w');

  text_io.put(out_file, txt_buffer);
  text_io.new_line(out_file);

  txt_buffer := 'ORACLE FORMS EXCEL ÖRNEĞİ ';
  text_io.put(out_file, txt_buffer);
  text_io.new_line(out_file);

  txt_buffer := 'sutun_1' || '    ' || 'sutun_2' || '    ' || 'sutun_3';

  text_io.put(out_file, txt_buffer);
  text_io.new_line(out_file);
  text_io.fclose(out_file);

  host('copy ' || ' c:\buffer.txt ' || ' c:\oracle_forms_excel.xls');
  host('start excel.exe c:\oracle_forms_excel.xls', no_screen);

END;

oracle forms text file yazma

Merhaba oracle forms ile text file veri yazımına bir örnek.

DECLARE
  out_file text_io.file_type;
  str      VARCHAR2(4000);
BEGIN
  str      := 'oracle forms text yazma örneği';
  out_file := text_io.fopen('c:\oracle_forms_text.txt', 'w');
  text_io.put(out_file, str);
  text_io.fclose(out_file);
END;

oracle forms image file okuma

Merhaba  Oracle Forms da image file okuması yapmak için aşağıdaki script kullanılabilinir. file_filter satırı istenildiği gibi filitlenebilinir.

DECLARE
  filename VARCHAR2(256);
BEGIN
  filename := get_file_name(file_filter => 'JPEG Files (*.jpg)|*.jpg|');
  read_image_file(filename, 'JPG', 'block.resim');
END;

oracle forms text file okuma

Merhaba  Oracle Forms da text file okuması yapmak için aşağıdaki script kullanılabilinir. file_filter satırı istenildiği gibi filitlenebilinir.

DECLARE
  text_file   text_io.file_type;
  text_buffer VARCHAR2(4000);
  filename    VARCHAR2(256);
BEGIN
  filename  := get_file_name(file_filter => 'Txt Files (*.txt)|*.txt|');
  text_file := text_io.fopen(filename, 'r');

  LOOP
    text_io.get_line(text_file, text_buffer);
    :BLOCK.text := :BLOCK.text || text_buffer || chr(10);
  END LOOP;
END;