BC Shrink Lobs

SET echo off
SET termout off
SET feedback off
SET heading off
SET pagesize 0
SET linesize 250
SET trimspool ON
SET verify off

spool lobs.sql

SELECT 'alter table ' || l.owner || '.' || l.table_name ||
       ' modify lob (' || l.column_name || ') (shrink space cascade); -- ' ||
       round(s.bytes / 1024 / 1024, 2) || ' MB'
FROM dba_lobs l
JOIN dba_segments s
  ON s.tablespace_name = l.tablespace_name
 AND s.owner = l.owner
 AND s.segment_type = 'LOBSEGMENT'
WHERE l.owner = 'SYS'
  AND l.tablespace_name = 'SYSAUX'
  AND l.table_name LIKE 'WR%'
ORDER BY s.bytes
/

spool off
SET termout ON