Oracle EBS FORM 设置块属性

declare
blk_id  BLOCK;
begin
    blk_id := Find_block('ADRP_HEADER');
         Set_block_property(blk_id,insert_allowed,property_false);
    	   Set_block_property(blk_id,update_allowed,property_false);
         Set_block_property(blk_id,delete_allowed,property_false);
end;