اين الخطأ في الكود?

اريد عرض ال items الموجوده في الجدول على text box tabular لكن لا يعمل Run خطأ في الcompile
component must be declared
-----------------------------------------------------------------------------------------------

Declare

cursor c is select ITEMNAMEARA,ITEMNAMEENG,Price from item where catno=:cat.catno;


v_ITEMNAMEARA item.ITEMNAMEARA%type;
v_ITEMNAMEENG item.ITEMNAMEENG%type;
v_Price item.Price%type;


begin
if :cat.catno is null then

message('You must enter the department number');
message('You must enter the department number');

else

open c;

loop
fetch c into v_ITEMNAMEARA,v_ITEMNAMEENG,v_Price;

:item.ITEMNAMEARA:=v_ITEMNAMEARA;
:item.ITEMNAMEENG:=v_ITEMNAMEENG;
:item.Price:=v_Price;

next_record;
exit when c%notfound;
end loop;
end if;

close c;
exception
when no_data_found then
message('no data');
go_item(':cat.catno');

end;

untitled.bmp