【EBS FORM】CHECKBOX全选/反选

点击(此处)折叠或打开

1. go_block('BLOCKNAME'); --跳到目的数据块
   
2. first_record; --从第一条记录开始循环
   
3. LOOP
   
4.   if :CONTROL.check_all = 'Y' then
   
5.     :BLOCKNAME.check_box := 'Y'; --将指定行的复选框设置为选中
   
6.   else
   
7.     :BLOCKNAME.check_box := 'N';
   
8.   end if;
   
9.   EXIT WHEN :system.last_record = 'TRUE';
   
10.   next_record;
    
11. END LOOP;
    
12. first_record;

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/29599494/viewspace-2112411/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/29599494/viewspace-2112411/