关于oracle的一点备忘

Posted 2020-09-27

数据库无法回避的就是处理数据

情景：发票信息，很多公司员工在进行交易的时候，填写的发票信息都是一样的，所以公司员工往往想调用统一的发票信息，公司会计登录系统可以填写通用发票信息，为了生成订单简单，发票需要和员工号码绑定，所以发票的表里想要复制一份员工号为会计的发票信息，改动其中的员工号，发票id，创建时间，其余不变

不知道大家弄懂应用情境没，叙述能力有限。

解决：可以使用select into，但是感觉不方便和灵活。所以考略利用右边和存储过程，因为没有返回值，就不写函数了

上代码：

create or replace procedure myprocd(
    uid in varchar2
)
AS
    receipt_autoid number;
BEGIN
    select SEQ_CHEM_DICT_RECEIPT.NEXTVAL into receipt_autoid from dual;
    for rs in (select * from CHEM_DICT_RECEIPT where user_id=‘0‘)
    loop
        rs.user_id:=uid;
        rs.id:=receipt_autoid;
        rs.receipt_id:=‘RE0215‘||receipt_autoid;
        rs.created_time:=sysdate;
        insert into chem_dict_receipt values rs;
    end loop;
END myprocd;
execute myprocd(‘002‘);

提醒:我实在是没搞清楚序列如何在循环中增加，所以我更改了策略，我让游标只能读取一次，也就是不再循环，所以更改如下

CREATE OR REPLACE procedure SIT_HXPGL.myproce(
    uid_re in varchar2,
    type_re in varchar2
)AS
    receipt_autoid number(12);
BEGIN
    select SEQ_CHEM_DICT_RECEIPT.NEXTVAL into receipt_autoid from dual;
    for rs in (select * from CHEM_DICT_RECEIPT where user_id=‘0‘ and receipt_type=type_re)
    loop
        rs.user_id:=uid_re;
        rs.id:=receipt_autoid;
        rs.receipt_id:=‘RE0215‘||receipt_autoid;
        rs.created_time:=sysdate;
        insert into CHEM_DICT_RECEIPT values rs;
        
    end loop;
END myproce;
/

无奈：代码里没有办法标红。我新加了一个变量

type_re

这样我的游标只能每次读取一组数据。

最后加一句，关于执行存储过程，好像是call和execute都可以，推荐使用call

小思路：好像可以吧获取自增序列放在自定义函数，然后调用，可能不会有问题

关于函数和存储过程或者游标，这里有个链接很好，可以参考下

http://wen866595.iteye.com/blog/1733887       程序点滴

其中有个小问题，我实在实践中发现的，但是还没看oracle的官方文档。

问题：存储过程的结束END；

解决：END myproc;

解释：应该是要加上存储过程的名字

本文出自 “一站式解决方案” 博客，请务必保留此出处http://10725691.blog.51cto.com/10715691/1945344