set serveroutput on size 1000000
declare
	ps_count number(10);
	ps_total number(10);
	pct_used number(10);
begin
	dp_monitor.query_pcount(ps_count => ps_count,	
				ps_total => ps_total);	
	pct_used := ps_count / ps_total * 100.00;
	dbms_output.put_line(' :: pct used ' || pct_used || '%');
end;

/