Shell Programming and Scripting

SELECT 'ALTER DISKGROUP ' $DG ' DROP FILE '''||R.NAME||'''; '
                          *
ERROR at line 1:
ORA-00911: invalid character

function DELNWE5O {
        export ORACLE_HOME=/ora00/app/oracle/product/11.2.0/grid_1
        export ORACLE_SID=+ASM
        export PATH=${ORACLE_HOME}/bin:${PATH}
        DG=`sqlplus -s '/as sysasm' <<-"EOF"
                set pagesize 0 feedback off verify off heading off echo off;
                select NAME from v\$asm_client ac ,v\$asm_diskgroup ad where ac.GROUP_NUMBER=ad.GROUP_NUMBER and ac.INSTANCE_NAME like 'nwe5o' and NAME like '%ARCH3';
                exit;
        EOF`
        echo ${DG} > /ora00/grid/Mani/dg.log
        export ORACLE_HOME=/ora01/app/oracle/product/11.2.0/db_1
        export ORACLE_SID=nwe5o
        export PATH=${ORACLE_HOME}/bin:${PATH}
        LIBPATH=${ORACLE_HOME}/lib
        sqlplus -s '/as sysdba' <<-"EOF"
                SET PAGES 0 LINES 175 HEAD OFF FEED OFF
                spool /ora00/grid/Mani/delete_list_ods_nwe5o.sql
                SELECT 'ALTER DISKGROUP ${DG} DROP FILE '''||R.NAME||'''; '
                FROM DBA_REGISTERED_ARCHIVED_LOG R, DBA_CAPTURE C, V$ASM_FILE F
                WHERE R.CONSUMER_NAME = C.CAPTURE_NAME
                AND R.NEXT_SCN < C.REQUIRED_CHECKPOINT_SCN
                AND F.FILE_NUMBER = SUBSTR(R.NAME,INSTR(R.NAME,'.',1,1)+1,INSTR(R.NAME,'.',1,2)-INSTR(R.NAME,'.',1,1)-1)
                AND F.INCARNATION = SUBSTR(R.NAME,INSTR(R.NAME,'.',1,2)+1);
                spool off
                EXIT
        EOF
}

        sqlplus -s '/as sysdba' <<-EOF
                SET PAGES 0 LINES 175 HEAD OFF FEED OFF
                spool /ora00/grid/Mani/delete_list_ods_nwe5o.sql
                SELECT 'ALTER DISKGROUP ${DG} DROP FILE ''||R.NAME||'''; '
                FROM DBA_REGISTERED_ARCHIVED_LOG R, DBA_CAPTURE C, V$ASM_FILE F
                WHERE R.CONSUMER_NAME = C.CAPTURE_NAME
                AND R.NEXT_SCN < C.REQUIRED_CHECKPOINT_SCN
                AND F.FILE_NUMBER = SUBSTR(R.NAME,INSTR(R.NAME,'.',1,1)+1,INSTR(R.NAME,'.',1,2)-INSTR(R.NAME,'.',1,1)-1)
                AND F.INCARNATION = SUBSTR(R.NAME,INSTR(R.NAME,'.',1,2)+1);
                spool off
                EXIT
        EOF