I need a script to reduce the size of the Fra which has used 34 gb in space

Question

I need an rman script to reduce the size of the Fra:
SQL> select * from v$flash_recovery_area_usage;
FILE_TYPE PERCENT_SPACE_USED PERCENT_SPACE_RECLAIMABLE NUMBER_OF_FILES
CONTROL FILE 0 0 0
REDO LOG 0 0 0
ARCHIVED LOG 0 0 0
BACKUP PIECE 0 0 0
IMAGE COPY 0 0 0
FLASHBACK LOG 69.99 19.33 2357
FOREIGN ARCHIVED LOG 0 0 0
7 rows selected.
SQL> SELECT
2 ROUND((A.SPACE_LIMIT / 1024 / 1024 / 1024), 2) AS FLASH_IN_GB,
3 ROUND((A.SPACE_USED / 1024 / 1024 / 1024), 2) AS FLASH_USED_IN_GB,
4 ROUND((A.SPACE_RECLAIMABLE / 1024 / 1024 / 1024), 2) AS FLASH_RECLAIMABLE_GB,
5 SUM(B.PERCENT_SPACE_USED) AS PERCENT_OF_SPACE_USED FROM
6 V$RECOVERY_FILE_DEST A,
7 V$FLASH_RECOVERY_AREA_USAGE B
8 GROUP BY
9 SPACE_LIMIT,
10 SPACE_USED ,
11 SPACE_RECLAIMABLE ;
FLASH_IN_GB FLASH_USED_IN_GB FLASH_RECLAIMABLE_GB PERCENT_OF_SPACE_USED
50 34.99 11.14 69.99

Answer 1

In /gateprd/ARCHIVE/*.arc
This is the script to remove the archives after it has been backup by the netbackup policy named Archive. This policy removes the archives that have been backed up.
/home/oracle/dba/scripts> more rmovarch.sh
#!/bin/ksh
# compress /gateprd/ARCHIVE/*.arc
find /gateprd/ARCHIVE/*.arc -type f ! -exec echo {} > /home/oracl
e/dba/lists/ARCHIVElist \;
if test $(cat /home/oracle/dba/lists/ARCHIVElist|wc -l) -gt 0
then
echo "Hay archives. Se corre script de borrar"
/home/oracle/dba/scripts/ARCHIVE_BACKUP.sh ARCHIVE
else
echo "No archives!!"
fi