Script to find active sql for specific users

SELECT a.username, b.sql_text,a.status from v$session a INNER JOIN v$sqlarea b ON a.sql_id = b.sql_id where a.username in ('USERNAME')  and a.status='ACTIVE';