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;