度量快速开发平台-专业、快速的软件定制快开平台

标题: oracle(plsql)生成流水号 [打印本页]

作者: 张兴康 时间: 2020-6-11 14:47
标题: oracle(plsql)生成流水号

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;    --原编码后三位编号
  v_new_num  VARCHAR2(10); --新编码后三位编号
  v_date_no  VARCHAR2(10); --当前日期编号
  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;

作者: 张兴康 时间: 2020-6-11 14:47
仅供参考

作者: 万望 时间: 2020-6-11 16:12
使用自定义函数不失为一个方式

作者: 万望 时间: 2020-6-11 16:15

作者: 陈晓龙 时间: 2020-6-12 15:00
打雷了，下雨了！

作者: 张兴康 时间: 2020-6-12 15:36

陈晓龙发表于 2016-7-12 15:00
打雷了，下雨了！

回家收衣服了

作者: 陈晓龙 时间: 2020-6-13 14:28

张兴康发表于 2016-7-12 15:36
回家收衣服了

怎么还不回家！

作者: 张兴康 时间: 2020-6-13 15:09

陈晓龙发表于 2016-7-13 14:28
怎么还不回家！

想起今天没晾衣服噻

作者: 陈晓龙 时间: 2020-6-14 17:57

张兴康发表于 2016-7-13 15:09
想起今天没晾衣服噻

哈哈

欢迎光临度量快速开发平台-专业、快速的软件定制快开平台 (http://plat.delit.cn/)