Oralce 存储过程一

create or replace procedure InsertBankInfo is
  v_legalentityid ba_entity.legalentityid%type;
  v_BankId        fi_bankaccount.bankid%type;
  v_Bankaccountid fi_bankaccount.bankaccountid%type;
  v_InsertCount   number;
  v_FalseCount    number;
begin
  v_InsertCount := 0;
  v_FalseCount  := 0;
  for v_test in (Select t.tname,
                        t.tcode,
                        t.bankname,
                        t.bankname1,
                        t.bankno,
                        t.linenumber
                   From test_temp t) loop
    begin
      Select be.legalentityid
        into v_legalentityid
        From ba_entity be
       Where be.entitycode = v_test.tcode;
    Exception
      when no_data_found then
        v_legalentityid := 0;
      
    end;
    if v_legalentityid = 0 then
      dbms_output.put_line(v_test.tcode || '这个T代码不存在');
      v_FalseCount := v_FalseCount + 1;
    else
      --查找银行ID
      begin
        Select fbm.bankid
          into v_BankId
          From fi_bankmapping fbm
         Where fbm.financecompanybankname = v_test.bankname;
      Exception
        when no_data_found then
          v_BankId := 0;
          dbms_output.put_line(v_test.tcode || v_test.bankname ||
                               '这个银行不存在');
      end;
      --获取Id
      v_Bankaccountid := fi_bankaccount_seq.nextval;
      --插入数据
      insert into fi_bankaccount
        (bankaccountid,
         legalentityid,
         bankname,
         bankid,
         bankaccountno,
         currencycode,
         opendate,
         status,
         createddate,
         updateddate,
         createduserid,
         updateduserid,
         isflush,
         isbasic,
         linenumber)
      values
        (v_Bankaccountid,
         v_legalentityid,
         v_test.bankname1,
         v_BankId,
         v_test.bankno,
         'CNY',
         sysdate,
         41,
         sysdate,
         sysdate,
         100021,
         100021,
         1,
         'N',
         v_test.linenumber);
      dbms_output.put_line('插入ID' || v_Bankaccountid || v_test.tname ||
                           v_test.tcode || '----' || v_legalentityid ||
                           '银行ID' || v_BankId);
      v_InsertCount := v_InsertCount + 1;
    end if;
  end loop;
  dbms_output.put_line('成功添加了:' || v_InsertCount);
  dbms_output.put_line('失败了:' || v_FalseCount || '由于T代码不存在');
end InsertBankInfo;

 

转载于:https://www.cnblogs.com/zyhblogs/p/3671805.html

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值