PL / SQLコードを実行しようとしていますが、識別子に関するエラーが含まれています。コードが実行されていません
DECLARE
a := customer.purchase%TYPE;
id := &employee.empno;
BEGIN
UPDATE employee SET salary = salary + 5000;
UPDATE employee SET bonus = bonus + 1000 WHERE empno = &id;
SAVEPOINT sumeet;
UPDATE customer SET purchase = purchase + 5000 WHERE custid = a;
SELECT SUM(purchase) INTO a;
IF (a < 11000) THEN
ROLLBACK sumeet;
END IF;
COMMIT;
END;
/