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;