存储过程变量赋值有关问题。求大神指点

存储过程变量赋值问题。。。。求大神指点
我想在一个存储过程中建立一个变量A，
 然后在通过"select fid from emp"这个SQL把查出来的FID值赋值给A，
然后接一个"update test set d='0' where fid=A"
这个存储过程该怎么写啊，求大神指点。。。。。。。。。。。。。。。。
------解决方案--------------------

引用:

我想在一个存储过程中建立一个变量A，
 然后在通过"select fid from emp"这个SQL把查出来的FID值赋值给A，
然后接一个"update test set d='0' where fid=A"
这个存储过程该怎么写啊，求大神指点。。。。。。。。。。。。。。。。

为了防止查询语句有多条返回值报错，所有选择游标。

create or replace procedure p_test is
begin
  FOR A IN (select fid from emp) LOOP
    update test set d='0' where fid=A.fid
  END LOOP;
  commit;
end;