pl/sql de sequence de cycle kullanımı

Merhaba,

Database üzerinde kullandığımız tablolar için kayıt ekleme işlemi yaparken ya da kullanmış olduğumuz fonksiyon ,prosedür gibi veritabanı işlemlerinde sabit artan sayısal verilere ihtiyacımız olduğu zaman sequence yapısını kullanırız.Sequence sayesinde sıralı olarak sürekli yeni bir sayı elde ederiz. Bu işlem sequence oluşturduğumuzda verdiğimiz başlangıç değeri ile başlar ve bitiş değerine kadar devam eder.
Bazı durumlarda bu işlemin sabit bir değerler arasında tekrar etmesi gerekebilir. Bunun içinde kullandığımız sequence içinde cycle işlemini kullanırız.Cycle sayesinde sequence değerlerimiz kısıtlı başlangıç ve bitiş değerleri arasından işlem yapar.
Bu işlemi daha iyi anlamak için sequence yapısı iki farklı biçim içinde kullanalım. İlk olarak normal şekilde kullanımı yapalım ve bunun için bir sequence yaratalım.

create sequence normal_sequence
minvalue 1
maxvalue 10
start with 1
increment by 1
cache 20;

Strandart bir sequence elimizde olduğuna göre bu sequence si kullanalım ve alacağı değerli ve değer aşımından alacağımız hatayı görelim. Bu işlem için basit bir declare yazalım.

DECLARE
  seq_val NUMBER;
BEGIN
  BEGIN
    FOR i IN 1 .. 10 LOOP
      SELECT normal_sequence.NEXTVAL INTO seq_val FROM dual;
      dbms_output.put_line('Döngü Değeri=' || i || ' Sequence Değeri=' || seq_val);
    END LOOP;
  EXCEPTION
    WHEN OTHERS THEN
      dbms_output.put_line('Hata Oluştu=' || SQLERRM);
  END;
END;

Bu komutlar çalıştığı zaman sorunsuz olarak sequence çalışacaktır ve sonuç olarak aşağıdaki gibi bir çıktı oluşacaktır.

Döngü Değeri=1 Sequence Değeri=1
Döngü Değeri=2 Sequence Değeri=2
Döngü Değeri=3 Sequence Değeri=3
Döngü Değeri=4 Sequence Değeri=4
Döngü Değeri=5 Sequence Değeri=5
Döngü Değeri=6 Sequence Değeri=6
Döngü Değeri=7 Sequence Değeri=7
Döngü Değeri=8 Sequence Değeri=8
Döngü Değeri=9 Sequence Değeri=9
Döngü Değeri=10 Sequence Değeri=10

Fakat yazdığımız declare içindeki döngümüzü sequence max değeri olan 10 kere yerine 11 kere çalıştırdığımızda ise hata alırız. Değişen declare komutlarımız ve sonuçları aşağıdaki gibidir.

DECLARE
  seq_val NUMBER;
BEGIN
  BEGIN
    FOR i IN 1 .. 11 LOOP
      SELECT normal_sequence.NEXTVAL INTO seq_val FROM dual;
      dbms_output.put_line('Döngü Değeri=' || i || ' Sequence Değeri=' || seq_val);
    END LOOP;
  EXCEPTION
    WHEN OTHERS THEN
      dbms_output.put_line('Hata Oluştu=' || SQLERRM);
  END;
END;

Görüldüğü gibi döngümüz 10 kere değil 11 kere işlem yapacak ve sonuçları ise aşağıdaki gibi olacaktır.

Döngü Değeri=1 Sequence Değeri=1
Döngü Değeri=2 Sequence Değeri=2
Döngü Değeri=3 Sequence Değeri=3
Döngü Değeri=4 Sequence Değeri=4
Döngü Değeri=5 Sequence Değeri=5
Döngü Değeri=6 Sequence Değeri=6
Döngü Değeri=7 Sequence Değeri=7
Döngü Değeri=8 Sequence Değeri=8
Döngü Değeri=9 Sequence Değeri=9
Döngü Değeri=10 Sequence Değeri=10
Hata Oluştu=ORA-08004: sequence NORMAL_SEQUENCE.NEXTVAL exceeds MAXVALUE and cannot be instantiated

Aldığımız hatadan da anlaşılacağı gibi döngümüzün 11. dönüş değerinde sequence imiz max değerinden fazla bir değer almaya çalıştığı için hatayı alıyoruz.

Şimdi sabit başlangıç ve bitiş değerleri arasında bir sequence ve içerisinde cycle kullanımına bir göz atalım. Öncelikle cycle değerine sahip bir sequence oluşturalım.

create sequence cycle_sequence
minvalue 1
maxvalue 10
start with 1
increment by 1
cache 2
cycle;

Cycle değerine sabhip bir sequence elimizde olduğuna göre bu sequence si kullanalım ve alacağı değerli ve değer aşımında nasıl davranacağını görelim. Bu işlem için basit bir declare yazalım.

DECLARE
  seq_val NUMBER;
BEGIN
  BEGIN
    FOR i IN 1 .. 10 LOOP
      SELECT cycle_sequence.NEXTVAL INTO seq_val FROM dual;
      dbms_output.put_line('Döngü Değeri=' || i || ' Sequence Değeri=' || seq_val);
    END LOOP;
  EXCEPTION
    WHEN OTHERS THEN
      dbms_output.put_line('Hata Oluştu=' || SQLERRM);
  END;
END;

Normal olarak sequence max değeri olan 10 kadar döngümüz çalıştığından hiçbir sorun olmadan aşağıdaki gibi sonuç elde edilmektedir.

Döngü Değeri=1 Sequence Değeri=1
Döngü Değeri=2 Sequence Değeri=2
Döngü Değeri=3 Sequence Değeri=3
Döngü Değeri=4 Sequence Değeri=4
Döngü Değeri=5 Sequence Değeri=5
Döngü Değeri=6 Sequence Değeri=6
Döngü Değeri=7 Sequence Değeri=7
Döngü Değeri=8 Sequence Değeri=8
Döngü Değeri=9 Sequence Değeri=9
Döngü Değeri=10 Sequence Değeri=10

Fakat bu işlem yerine sequence max değerinden fazla bir şekilde döngümüz çalıştığı zaman ise ilk örnekteki gibi hata almak yerine cycle yapımızın nasıl çalıştığını görüyoruz. Hemen bu işlemi test etmek için declare satırımız aşağıdaki gibi değiştirelim.

DECLARE
  seq_val NUMBER;
BEGIN
  BEGIN
    FOR i IN 1 .. 15 LOOP
      SELECT cycle_sequence.NEXTVAL INTO seq_val FROM dual;
      dbms_output.put_line('Döngü Değeri=' || i || ' Sequence Değeri=' || seq_val);
    END LOOP;
  EXCEPTION
    WHEN OTHERS THEN
      dbms_output.put_line('Hata Oluştu=' || SQLERRM);
  END;
END;

Görüldüğü gibi döngümüz 10 kere değil 15 kere işlem yapacak ve bu işlem sırasında hata almadan cycle sayesinde aşağıdaki gibi değerlere ulaşacağız.

Döngü Değeri=1 Sequence Değeri=1
Döngü Değeri=2 Sequence Değeri=2
Döngü Değeri=3 Sequence Değeri=3
Döngü Değeri=4 Sequence Değeri=4
Döngü Değeri=5 Sequence Değeri=5
Döngü Değeri=6 Sequence Değeri=6
Döngü Değeri=7 Sequence Değeri=7
Döngü Değeri=8 Sequence Değeri=8
Döngü Değeri=9 Sequence Değeri=9
Döngü Değeri=10 Sequence Değeri=10
Döngü Değeri=11 Sequence Değeri=1
Döngü Değeri=12 Sequence Değeri=2
Döngü Değeri=13 Sequence Değeri=3
Döngü Değeri=14 Sequence Değeri=4
Döngü Değeri=15 Sequence Değeri=5

Bu sonuçtan da anlaşılacağı gibi eğer cycle değerine sahip bir sequence kullanıyorsak , kullandığımız sequence max değerine ulaşında tekrardan min değerinden itibaren değer alır ve işlemine devam eder.

Kolay gelsin.

pl/sql dbms_sql kullanımı

PL/SQL de dbms_sql kullanımı için hazırlanmış basit bir örnek. bu işlem işle istenildiği gibi sql string oluşturulup sorgulama sonucu istenilen değişkenlere atılabilinir.

DECLARE
  sql_string  VARCHAR2(5000);
  dbms_cursor NUMBER;
  valuee      NUMBER := 2;
  col_1       NUMBER;
  col_2       NUMBER;
  col_3       NUMBER;
  ignore      NUMBER;
BEGIN

  sql_string := 'Select colum_1,colum_2,colum_3 from table where colum_1=' || variable_1 || ' and colum_2=' || variable_2;

  dbms_cursor := dbms_sql.open_cursor;
  dbms_sql.parse(dbms_cursor, sql_string, valuee);
  ignore := dbms_sql.execute(dbms_cursor);

  dbms_sql.define_column(dbms_cursor, 1, col_1);
  dbms_sql.define_column(dbms_cursor, 2, col_2);
  dbms_sql.define_column(dbms_cursor, 3, col_3);

  WHILE dbms_sql.fetch_rows(dbms_cursor) > 0 LOOP
    dbms_sql.column_value(dbms_cursor, 1, col_1);
    dbms_sql.column_value(dbms_cursor, 2, col_2);
    dbms_sql.column_value(dbms_cursor, 3, col_3);
    dbms_output.put_line(col_1 || '-' || col_2 || '-' || col_3);
  END LOOP;

  dbms_sql.close_cursor(dbms_cursor);

END;

pl/sql çeşitli döngü kullanımı

PL/SQL ile kullanılabilecek döngü yapıları.

  WHILE TRUE LOOP
    --statements
  END LOOP;

  FOR i IN 1 .. 10 LOOP
    --statements
  END LOOP;

  FOR c IN (SELECT ) LOOP
    --statements
  END LOOP;

  OPEN c;
  LOOP
    FETCH c
      INTO abc;
    EXIT WHEN c%NOTFOUND;
    --statements
  END LOOP;
  CLOSE c;

  LOOP
    --statements
    EXIT WHEN a > 10;
  END LOOP;