Form中实现Checkbox全选反选

go_block('BLOCKNAME'); --跳到目的数据块first_record; --从第一条记录开始循环LOOP  if :BLOCK116.check_all = 'Y' then      :BLOCKNAME.check_box := 'Y'; --将指定行的复选框设置为选中  else    :BLOCKNAME.check_box := 'N';  end if;  EXIT WHEN :system.last_record = 'TRUE';  next_record;END LOOP;first_record;