Advertisement
Guest User

Untitled

a guest
Jun 14th, 2018
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PL/SQL 0.53 KB | None | 0 0
  1. CREATE OR REPLACE PROCEDURE nowa_lokata (acc_id NUMBER, VALUE NUMBER) IS
  2. BEGIN
  3. DECLARE
  4. bal NUMBER;
  5. BEGIN
  6. SELECT balance INTO bal FROM ACCOUNTS WHERE account_id=acc_id;
  7. BEGIN
  8. IF VALUE < bal THEN
  9.     INSERT INTO deposits
  10.     VALUES (
  11.     (SELECT MAX(deposit_id)+1 FROM deposits WHERE ACCOUNT_NUMBER= acc_id),acc_id , VALUE,  ( SELECT CURRENCY FROM accounts
  12.     WHERE account_id = acc_id ), 4 ,SYSDATE  );
  13.     UPDATE accounts
  14.     SET balance = balance - VALUE
  15.     WHERE account_id = acc_id;
  16. END IF;
  17. END;
  18. END;
  19. END nowa_lokata;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement