SQL & PL/SQL

create or replace procedure vendor_usage
as
v_id varchar2(25);
mg varchar2(25);rent varchar2(25);
cam varchar2(25);raw varchar2(25);ro varchar2(25);
eb varchar2(25);pb varchar2(25);gas varchar2(25);
ac varchar2(25);
lt varchar2(25);ex varchar2(25);fa varchar2(25);
rev varchar2(25);ent_date date;
cursor c1 is select vendoruser_id,mg_charge*mg_unit, rent_charge*rent_unit,cam_charge*cam_unit,raw_charge*raw_unit,
ro_charge*ro_unit,eb_charge*eb_unit,pb_charge*pb_unit,gas_charge*gas_unit,ac_charge*ac_unit,
lt_charge*lt_unit,ex_charge*ex_unit,fa_charge*fa_unit,
(totalsfm/rspercent)/100, entry_date from vendor_use;
begin
open c1;
loop
fetch c1 into v_id,mg,rent,cam,raw,ro,eb,pb,gas,ac,lt,ex,fa,rev,ent_date;
if rev>mg then
insert into vendor_final values(v_id,rev,rent,cam,raw,ro,eb,pb,gas,ac,lt,ex,fa,rev,ent_date);
else
insert into vendor_final values(v_id,mg,rent,cam,raw,ro,eb,pb,gas,ac,lt,ex,fa,rev,ent_date);
end if;
exit when c1%notfound;
end loop;
close c1;
end;

sql>sql statement ignored
sql>ORA-00936:missing expression