设计一个存储过程,实现在同一个账户表中的两个账户之间转账的功能,转出账户余额不足或转出、转入账户不存在的拒绝转账。(用事务控制)
DELIMITER $$
CREATE
PROCEDURE `banks`.`pro1`(IN e DECIMAL,IN idSource INT,IN idTarget INT)
BEGIN
DECLARE balanceSource DECIMAL(10, 2);
DECLARE accountTarget INT;
START TRANSACTION;
SELECT balance INTO balanceSource FROM account WHERE id = idSource;
SELECT id INTO accountTarget FROM account WHERE id = idTarget;
IF (balanceSource < e) THEN
-- 转出账户余额不足,回滚事务
ROLLBACK;
SELECT '转出账户余额不足' AS result;
ELSEIF (accountTarget IS NULL) THEN
-- 转如账户不存在,回滚事务
ROLLBACK;
SELECT '转入账户不存在' AS result;
ELSE
UPDATE account SET balance = balance - e WHERE id = idSource;
UPDATE account SET balance = balance + e WHERE id = idTarget;
SELECT "转账成功" AS result;
END IF;
COMMIT;
END$$
DELIMITER ;