关于oracle的一点备忘

friht

　　数据库无法回避的就是处理数据
　　情景：发票信息，很多公司员工在进行交易的时候，填写的发票信息都是一样的，所以公司员工往往想调用统一的发票信息，公司会计登录系统可以填写通用发票信息，为了生成订单简单，发票需要和员工号码绑定，所以发票的表里想要复制一份员工号为会计的发票信息，改动其中的员工号，发票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;
　　解释：应该是要加上存储过程的名字