Error FRM-41056, Urgent, Please help.

Question

Hi All,
I am doing validation in post-change trigger of a item. When i am chaning any thing in the item it is fine, but when i am query it from key_block at that time the error message "FRM-41056, Can find the Block: Invalid Id" populating. If i am commented that validation code the form is working fine without validation but there is no error message.
Can any body help why it is happing and solution for this? Please suggest , it is urgent.
Thanks
Radha

Answer 1

Previous code
====================
begin
G$_CHECK_QUERY_MODE;
g$_sel_spriden_pidm_name(:fpbpohd_block.DISPLAY_VEND_CODE, 'DISPLAY_VEND_NAME', 'Y', :HOLD_VEND_PIDM);
:GLOBAL.QUERY_MODE := '0';
EXCEPTION
WHEN FORM_TRIGGER_FAILURE THEN
:GLOBAL.QUERY_MODE := '0';
RAISE FORM_TRIGGER_FAILURE;
END;
New Code
================
DECLARE
cursor pti_cursor is
select ftvvend_disc_code, ftvvend_atyp_code
from ftvvend
where ftvvend_eff_date <= sysdate
and (ftvvend_term_date > sysdate
or ftvvend_term_date is null)
and ftvvend_pidm = :hold_vend_pidm;
TEMP_FTVVEND_DISC_CODE varchar2(30);
TEMP_FTVVEND_ATYP_CODE varchar2(30);
BEGIN
G$_CHECK_QUERY_MODE;
g$_sel_spriden_pidm_name(:fpbpohd_block.DISPLAY_VEND_CODE, 'DISPLAY_VEND_NAME', 'Y', :HOLD_VEND_PIDM);
OPEN PTI_CURSOR;
FETCH PTI_CURSOR INTO TEMP_FTVVEND_DISC_CODE, TEMP_FTVVEND_ATYP_CODE;
IF PTI_CURSOR%NOTFOUND THEN
     MESSAGE('Vendor is Invalid');
     RAISE FORM_TRIGGER_FAILURE;
end if;
CLOSE PTI_CURSOR;
:GLOBAL.QUERY_MODE := '0';
EXCEPTION
WHEN FORM_TRIGGER_FAILURE THEN
:GLOBAL.QUERY_MODE := '0';
RAISE FORM_TRIGGER_FAILURE;
END;