ТЕМА:

declare 
     vSql Clob;
   begin 
     vSql:='select ''FFFFF'' F1...........
      ...........................................
      ...........................................
      ...........................................            
     ';
     insert into T1 values(vSql);
     commit;
   end;

   define A    
   A = ЗагрузитьФайлОперсреды('c:\work\rr12.sql') 
   declare 
     vSql Clob;
   begin 
     vSql:=A;
     insert into T1 values(vSql);
     commit;
   end;

create or replace function GetClobFromFile(iDir Varchar2,iFile Varchar2) return Clob as
  vFile BFile:=BFileName(iDir,iFile);
  vClob Clob :=' ';
  vDest Integer:=1;
  vSrcs Integer:=1;
  vLang Integer:=Dbms_Lob.Default_Lang_Ctx;
  vWars Number;
begin
  Dbms_Lob.FileOpen(vFile,Dbms_Lob.File_ReadOnly);
  Dbms_Lob.LoadClobFromFile(vClob,vFile,Dbms_Lob.GetLength(vFile),vDest,
                            vSrcs,Dbms_Lob.Default_Csid,vLang,vWars
                           );
  Dbms_Lob.FileClose(vFile);
  return vClob;
end;
/
insert into T1 values(GetClobFromFile('WORK','rr12.sql'));

declare
  s varchar2(32767) := q'{
@c:\work\rr12.sql
}';

drop table T1;
create table T1 (F1 Varchar2(4000));
declare
  s varchar2(32767) := q'{
@c:\work\rr12.sql
}';
begin 
  insert into T1 values(s);
  commit;
end;  
/
select * from T1;

Connected to Oracle Database 10g Enterprise Edition Release 10.2.0.5.0 
Connected as andrewbond
 
SQL> 
 
Table dropped
 
Table created
 
PL/SQL procedure successfully completed
 
F1
--------------------------------------------------------------------------------
 
@c:\work\rr12.sql
 
SQL>

oracle@server2:/tmp> cat 1.sql
set serverout on
declare
  s varchar2(32000) := q'[
@&1
]';
begin
  dbms_output.put_line(s);
end;
/
oracle@server2:/tmp> date>tmp.txt
oracle@server2:/tmp> sqlplus -s "/ as sysdba" @1.sql tmp.txt

Wed Jul 13 11:47:43 EEST 2011


PL/SQL procedure successfully completed.

exit
oracle@server2:/tmp>