存储过程替换text,ntext列中的字符串

declare @ptr varbinary(16) 
declare @amjnId int 
declare @Position int,@len int 
set @len=datalength('ILOVEHJL')　　 
declare wux_Cursor scroll Cursor 
for 
select textptr([Name]),[amjnId] from USA201 
for read only 
open wux_Cursor 
fetch next from wux_Cursor into @ptr,@amjnId 
while @@fetch_status=0 
begin 
　　select @Position=patindex('%ILOVEHJL%',[Name]) from USA201 where [amjnId]=@amjnId 
　　while @Position>0 
　　begin 
　　　　set @Position=@Position-1 
　　　　updatetext USA201.[Name] @ptr @Position @len 'i love hjl' 
　　　　select @Position=patindex('%ILOVEHJL%',[Name]) from USA201 where [amjnId]=@amjnId 
　　end 
　　fetch next from wux_Cursor into @ptr,@amjnId 
end 
close wux_cursor 
deallocate wux_cursor 
go