procedure ModifyFieldName
(
in_NewName in varchar2,
out_result out varchar2
)
is
begin
alter tablename
modify fieldname in_NewName
out_result := 0;
exception
when others then
out_result := 1;
end;
(
in_NewName in varchar2,
out_result out varchar2
)
is
begin
alter tablename
modify fieldname in_NewName
out_result := 0;
exception
when others then
out_result := 1;
end;
as
sql string(1000);
begin
sql='alter table '||oldName||' to '||newName||;
execute imediate sql;
end RenameTable;
/
create or replace RenameTable(oldName string,newName string)
as
sql string(1000);
v_i integer;
begin
select count(*) into v_i from tab where table_name=''||oldName||'';
if v_i>0 then
sql='alter table '||oldName||' to '||newName||;
execute imediate sql;
end if;
end RenameTable;
/
modify name to newname char(1) ;我也初学,好像是这样的吧