declare
	al_id Alert := null;
	al_button number := null;	
begin
	  if :maint_wo_dtl.wo_action_req  is null then
		al_id := Find_Alert('CAUTION');
		set_alert_property(al_id,alert_message_text,'The Action Required can not be blank.');
		al_button := Show_Alert(al_id);
		raise form_trigger_failure;
 	end if;
Exception
	when no_data_found then
	:maint_wo_dtl.wo_action_req := 'DONE';
  when others then
  message('Code--' ||dbms_error_code || 'text -- '||dbms_error_text);
  message('Code--' ||dbms_error_code || 'text -- '||dbms_error_text);
  raise;
end;

declare
   al_id       Alert          := null;
   al_button   number         := null;
   l_msg       varchar2 (100) := 'maint_wo_dtl.wo_action_req WVI - ';
begin
   message (l_msg || 'start');
   pause;

   if :maint_wo_dtl.wo_action_req is null then
      message (l_msg || 'in IF');
      pause;
      al_id      := Find_Alert ('CAUTION');
      message (l_msg || 'alert found');
      pause;
      set_alert_property (al_id, alert_message_text, 'The Action Required can not be blank.');
      message (l_msg || 'alert message set');
      pause;
      al_button  := Show_Alert (al_id);
      message (l_msg || 'after alert');
      pause;
      raise form_trigger_failure;
      message (l_msg || 'should not see this one');
      pause;
   end if;

   message (l_msg || 'end');
   pause;
exception
   when others then
      message (l_msg || 'others - ' || dbms_error_code || ':' || dbms_error_text);
      pause;
      raise form_trigger_failure;
end;