Live ORACLE

CREATE OR REPLACE PROCEDURE Loc_var
AS
stmt_no  NUMBER;
NAME     VARCHAR2(100);
BEGIN
stmt_no := 1; -- designates 1st SELECT statement
SELECT table_name
INTO   NAME
FROM   user_tables
WHERE  table_name LIKE 'ABC%';
stmt_no := 2; -- designates 2nd SELECT statement
SELECT table_name
INTO   NAME
FROM   user_tables
WHERE  table_name LIKE 'XYZ%';
EXCEPTION
WHEN no_data_found THEN
  dbms_output.Put_line('Table name not found in query '
                       ||stmt_no);
END;
/  

Procedure created.

CALL loc_var(); 

Table name not found in query 1

Call completed.

Using a Locator Variable to Identify the Location of an Exception