欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

oracle(plsql)生成流水號(hào)

 更新時(shí)間:2014年03月29日 10:22:31   作者:  
這篇文章主要介紹了oracle(plsql)生成流水號(hào),需要的朋友可以參考下

復(fù)制代碼 代碼如下:

CREATE OR REPLACE FUNCTION fn_no_make(v_prefix     VARCHAR2,
                                      v_table_name VARCHAR2,
                                      v_number_col VARCHAR2)
 /*
  * v_prefix:     編碼前綴兩位
  * v_table_name:編碼所在表名
  * v_number_col:編碼所在列名
  */ 
  RETURN VARCHAR2 IS
  v_old_no   VARCHAR2(50); --原編碼
  v_new_no   VARCHAR2(50); --新編碼
  v_old_num  NUMBER;       --原編碼后三位編號(hào)
  v_new_num  VARCHAR2(10); --新編碼后三位編號(hào)
  v_date_no  VARCHAR2(10); --當(dāng)前日期編號(hào)
  v_sql      VARCHAR2(4000);
BEGIN
  v_sql := 'SELECT MAX(' || v_number_col || ') FROM ' || v_table_name;
  EXECUTE IMMEDIATE v_sql INTO v_old_no;

  v_sql := 'SELECT TO_CHAR(SYSDATE,''YYYYMMDD'') FROM DUAL';
  EXECUTE IMMEDIATE v_sql INTO v_date_no;

  v_old_num := to_number(substr(v_old_no, 12, 3));
  v_new_num := lpad(to_char(v_old_num+1), 3, '0');

  IF v_old_no IS NULL OR substr(v_old_no, 3, 8) <> v_date_no THEN
    v_new_no := v_prefix || v_date_no || '-' || '001';
  ELSE
    v_new_no := v_prefix || v_date_no || '-' || v_new_num;
  END IF;

  RETURN v_new_no;
EXCEPTION
  WHEN OTHERS THEN
    dbms_output.put_line(SQLERRM);
END fn_no_make;

相關(guān)文章

最新評(píng)論