create or replace procedure p1
as
v_his number;
v_chinese number;
begin
for i in (select * from score) loop
select i.item into v_his where name='小张' and item='历史';
select i.item into v_chinese where name='小张' and item='语文';
insert into score1 values(i.name,v_his,v_chinese);