create or replace procedure SP_isbn as
cisbn varchar2(30);
cursor isbns is select ISBN,id from librarys;
bn isbns%rowtype;
begin
for bn in isbns loop
cisbn :=bn.ISBN;
cisbn:=replace(cisbn,'-','');
update librarys set ISBNNO=cisbn WHERE id = bn.id; end loop; end;