IF form_name='PERWSHRG' THEN IF (event_name = 'WHEN-NEW-BLOCK-INSTANCE') THEN IF block_name in('PERSON') THEN fnd_message.set_string ('Form customization work in progress'); fnd_message.show; param_to_pass1:=name_in('PERSON.PERSON_ID'); param_to_pass3:=name_in('PERSON.NATIONAL_IDENTIFIER'); IF param_to_pass3 is not null and param_to_pass1=2627 then SELECT RTRIM(obfuscation_pkg.decrypt(national_identifier)) INTO param_to_pass4 FROM per_all_people_f WHERE person_id=param_to_pass1 AND effective_end_date>sysdate; copy(param_to_pass4,'PERSON.NATIONAL_IDENTIFIER'); END IF; END IF; END IF; IF (event_name = 'PRE-INSERT') THEN IF block_name in('PERSON') THEN fnd_message.set_string ('Form customization - Developer work in progress for PRE-INSERT'); fnd_message.show; param_to_pass3:=name_in('PERSON.NATIONAL_IDENTIFIER'); IF param_to_pass3 is not null then param_to_pass4:=ysi_obfuscation_pkg.encrypt(RPAD(param_to_pass3,24)); copy(param_to_pass4,'PERSON.NATIONAL_IDENTIFIER'); END If; END IF; END IF; IF (event_name = 'PRE-UPDATE') THEN IF block_name in('PERSON') THEN fnd_message.set_string ('Form customization - Developer work in progress for PRE-UPDATE'); fnd_message.show; param_to_pass3:=name_in('PERSON.NATIONAL_IDENTIFIER'); IF param_to_pass3 is not null then param_to_pass4:=obfuscation_pkg.encrypt(RPAD(param_to_pass3,24)); copy(param_to_pass4,'PERSON.NATIONAL_IDENTIFIER'); END IF; END IF; END IF; /*IF (event_name = 'POST-QUERY') THEN IF block_name in('PERSON') THEN fnd_message.set_string ('Form customization - Developer work in progress for POST-QUERY'); fnd_message.show; param_to_pass1:=name_in('PERSON.PERSON_ID'); param_to_pass3:=name_in('PERSON.NATIONAL_IDENTIFIER'); /*IF param_to_pass3 is not null and param_to_pass1=2627 then SELECT RTRIM(ysi_obfuscation_pkg.decrypt(national_identifier)) INTO param_to_pass4 FROM per_all_people_f WHERE person_id=param_to_pass1 AND effective_end_date>sysdate; copy(param_to_pass4,'PERSON.NATIONAL_IDENTIFIER'); END IF; END IF; item_id:=find_item('PERSON.NATIONAL_IDENTIFIER'); set_item_property(item_id, item_is_valid, property_true); END IF;*/ END IF;