--WHEN-VALIDATE-RECORD
IF :mend.MEND_CAUSE is  null THEN
         FND_MESSAGE.SET_STRING(‘请输入评价原因!!‘);
          FND_MESSAGE.SHOW;
 RAISE form_trigger_failure;
END IF;
错误的原因:
IF :mend.MEND_CAUSE is not null then 
         null;
ELSIF :mend.MEND_CAUSE is  null then 
        :mend.MEND_CAUSE := ‘同意‘;
        :mend.MEND_CAUSE := NULL;
        FND_MESSAGE.SET_STRING(‘请输入评价原因!!‘);
        FND_MESSAGE.SHOW;
        RAISE form_trigger_failure;
END IF;
在这里加了这个改变了block的状态.
原文:http://www.cnblogs.com/hopedba/p/5786748.html