Form - CHECKBOX全選功能

FORM BUILDER開發，遇到這樣一個需求：
添加一個CHECKBOX完成全選功能，紅框爲新添加的CHECKBOX（如圖示）

Try to use APP_RECORD.FOR_ALL_RECORDS
ex：Soure Block：TEST  Soure Item：CHECK(is a Checkbox Item)
一、BLOCK：CONTROL(Non Database Data Block) Add a Checkbox Item(Item Name：ALL_CHECK)
二、CONTROL.ALL_CHECK add Trigger(Item Level) -- WHEN-CHECKBOXBOX-CHANGED
     ---------------------------------------------------------------------------
     BEGIN
        APP_RECORD.FOR_ALL_RECORDS ('TEST'                 --Source Block
                                                           ,'ALL_CHECK'       --Source Block Trigger
                                                          );
     END;
     ---------------------------------------------------------------------------
三、Block：TEST  add User-define Trigger(Block Level), Trigger Name：ALL_CHECK
     ---------------------------------------------------------------------------
     BEGIN
         IF :CONTROL.ALL_CHECK = 'Y' THEN
           :TEST.CHECK = 'Y';
         ELSE
            :TEST.CHECK = 'N';
         END IF;
     END;
     ---------------------------------------------------------------------------