create or replace function get_request_code return varchar2 AS
--函数的作用：自动生成订单号
v_mca_no mcode_apply_01.mca_no%TYPE;
CURSOR get_max_mca_no IS
SELECT max(substr(mca_no, 11, 3)) -- 查出的最大单号，截取出最后三位，如：001、002...n
FROM mcode_apply_01
WHERE substr(mca_no, 3, 8) = to_char(sysdate, 'YYYYMMDD'); -- 截取单号，如：20170422
v_requestcode VARCHAR2(3);
BEGIN
OPEN get_max_mca_no;
FETCH get_max_mca_no INTO v_requestcode;
CLOSE get_max_mca_no;
IF v_requestcode IS NULL THEN
v_requestcode := NVL(v_requestcode, 0); -- NVL()函数：当v_requestcode为NULL时，取0作为值
END IF;
v_requestcode := lpad(v_requestcode + 1, 3, ''); -- 将游标中截取到的值加1，然后向左填充0，生成 001...00n 序号； lpad()函数：向左填充
v_mca_no := 'MA' || to_char(sysdate, 'YYYYMMDD') || v_requestcode; -- 最终生成的申请单号（如：MA20170422001；MA20170422002;...MA2017042200N ）
RETURN '0~,'|| v_mca_no;
END ;
注：如需测试该函数，请复制到Oracle数据库中，右击函数名“get_request_code”，选择“test” 进行测试，测试时记得把相应的表名及字段换成自己建立的
函数 substr()， 详解：http://www.cnblogs.com/dshore123/p/7805050.html
|
原创作者：DSHORE 作者主页：http://www.cnblogs.com/dshore123/ 原文出自：http://www.cnblogs.com/dshore123/p/7824801.html 欢迎转载，转载务必说明出处。（如果本文对您有帮助，可以点击一下右下角的 推荐，或评论，谢谢！） |