Aufgaben laut Benutzer durchsuchen, Oracle

Language: Layout:

declare 
a_akt varchar(30);
a_dat varchar(30);
p_zaehler number (4);

begin
a_akt := 'dba19ss12adm';
--a_dat := TO_DATE('07.08.19','DD.MM.YY');
p_zaehler := 0;

select count(*) 
into p_zaehler
from aktanm
where ben = a_akt;

if p_zaehler = 0 
	then raise_application_error(-20001, 'Keine Aufgaben für Benutzer: '||a_akt||' gefunden');
else
  dbms_output.put_line('------------------------------------------------------------------');
    dbms_output.put_line('Alle Aufgaben des Benutzers: '||a_akt||' sind');
   dbms_output.put_line('------------------------------------------------------------------');
	for rec in
		(select ben,akt, dat
		from aktanm
		where ben=a_akt)
    
          
		loop
        
			dbms_output.put_line('Benutzer:  '||rec.ben||'| 	Aktion:  '||rec.akt||'| 	Datum:  '||rec.dat);
		end loop;
        
end if;
dbms_output.put_line('------------------------------------------------------------------');

--dbms_output.put_line(rec.count);
exception
	when others then dbms_output.put_line(sqlerrm);
end;