Please let me know what is wrong with this
declare
a number ;
b number ;
x number ;
y number ;
d date ;
z date ;
begin
loop <>
a = 1;
b := a+1;
select shrfnbr into x from puneet_temp where serial = a;
select timestamp into d from puneet_temp where serial = a;
select shrfnbr into y from puneet_temp where serial = b;
loop <>
select trunc(shrstmp) into z from shopper where shrfnbr = x;
if
z <> d
then
dbms_output.put_line ( x||' ' || z ) ;
x:= x+1;
end if;
exit when x=y;
end loop B ;
a:=a+1;
exit when a = 200;
end loop A ;
end;