请教：存储过程

whitesong

下面是我写的存储过程,运行起来特别慢，怎么也出不来，是数据库原因还是我写的不准确？
department,subject,currency_code 是ledger_info主键，19000条记录
bank_org_id,product_id,currency_code是主键，140000条记录




update ledger_info set (balance,sum)
           = (select a.curr_balance,ledger_info.sum+a.curr_balance
              from pre_date_glender a
              where  cast(a.bank_org_id as varchar(9)) =
                     ledger_info.department
              and a.product_id = ledger_info.subject
              and a.currency_code = ledger_info.currency_code);