3:
4: l_debug VARCHAR2(3);
5:
6: /************************************************************************
7: Procedure to autonomously update qp_limit_balances table.
8: ***********************************************************************/
9: PROCEDURE Update_Balance(p_amount IN NUMBER,
10: p_limit_balance_id IN NUMBER)
11: IS
11: IS
12: PRAGMA AUTONOMOUS_TRANSACTION;
13: BEGIN
14: /*
15: INDX,qp_limit_transactions_pvt.update.upd1,QP_LIMIT_BALANCES_U1,LIMIT_BALANCE_ID,1
16: */
17: --sql statement upd1
18: UPDATE qp_limit_balances
19: SET available_amount = available_amount + p_amount
14: /*
15: INDX,qp_limit_transactions_pvt.update.upd1,QP_LIMIT_BALANCES_U1,LIMIT_BALANCE_ID,1
16: */
17: --sql statement upd1
18: UPDATE qp_limit_balances
19: SET available_amount = available_amount + p_amount
20: WHERE limit_balance_id = p_limit_balance_id;
21:
22: COMMIT;