CREATE OR REPLACE PROCEDURE procName (IDIn IN Customers.CustomerID%TYPE) IS
BEGIN
   FOR aCursor IN (SELECT CustomerName AS NameMatch FROM Customers WHERE CustomerID = IDIn)
   LOOP
    DBMS_OUTPUT.PUT_LINE(aCursor.NameMatch);
   END LOOP;
END procName;
/