Oracle form点击item，让其变颜色

l_current_item varchar2(50):=name_in('System.Cursor_Item');

if …… then

SET_ITEM_INSTANCE_PROPERTY(l_current_item,
                                 CURRENT_RECORD,
                                 VISUAL_ATTRIBUTE,
                                 'L_FINISH_SELECT');