'ms_syst_data' ,p_proc_name => 'trig_b_i_syst_enum_functional_type_validate_new_allowed' ,p_param_data => to_jsonb(new) ,p_context_data => jsonb_build_object( 'tg_op', tg_op ,'tg_when', tg_when ,'tg_schema', tg_table_schema ,'tg_table_name', tg_table_name)), ERRCODE = 'PM105', SCHEMA = tg_table_schema, TABLE = tg_table_name; END IF; RETURN new; END;]]> 'ms_syst_data' ,p_proc_name => 'trig_b_iu_syst_enum_items_validate_functional_types' ,p_param_data => to_jsonb(new) ,p_context_data => jsonb_build_object( 'tg_op', tg_op ,'tg_when', tg_when ,'tg_schema', tg_table_schema ,'tg_table_name', tg_table_name)), ERRCODE = 'PM104', SCHEMA = tg_table_schema, TABLE = tg_table_name; END IF; RETURN new; END;]]> 'ms_syst_data' ,p_proc_name => 'trig_b_iud_syst_application_contexts_validate_owner_context' ,p_param_data => to_jsonb(new) ,p_context_data => jsonb_build_object( 'tg_op', tg_op ,'tg_when', tg_when ,'tg_schema', tg_table_schema ,'tg_table_name', tg_table_name)), ERRCODE = 'PM106', SCHEMA = tg_table_schema, TABLE = tg_table_name; END IF; RETURN old; END IF; IF tg_op = 'UPDATE' THEN IF new.database_owner_context != old.database_owner_context THEN RAISE EXCEPTION USING MESSAGE = 'The database owner context designation may ' || 'only be set on INSERT.', DETAIL = ms_syst_priv.get_exception_details( p_proc_schema => 'ms_syst' ,p_proc_name => 'trig_b_iud_syst_application_contexts_validate_owner_context' ,p_param_data => to_jsonb(new) ,p_context_data => jsonb_build_object( 'tg_op', tg_op ,'tg_when', tg_when ,'tg_schema', tg_table_schema ,'tg_table_name', tg_table_name)), ERRCODE = 'PM107', SCHEMA = tg_table_schema, TABLE = tg_table_name; END IF; END IF; IF tg_op IN ('INSERT', 'UPDATE') THEN -- There may only be one database owner context for any one application. IF new.database_owner_context AND exists( SELECT TRUE FROM ms_syst_data.syst_application_contexts sac WHERE sac.application_id = new.application_id AND sac.id != new.id AND sac.database_owner_context) THEN RAISE EXCEPTION USING MESSAGE = 'Each Application may only have one Application Context ' || 'defined as being the database owner.', DETAIL = ms_syst_priv.get_exception_details( p_proc_schema => 'ms_syst' ,p_proc_name => 'trig_b_iud_syst_application_contexts_validate_owner_context' ,p_param_data => to_jsonb(new) ,p_context_data => jsonb_build_object( 'tg_op', tg_op ,'tg_when', tg_when ,'tg_schema', tg_table_schema ,'tg_table_name', tg_table_name)), ERRCODE = 'PM101', SCHEMA = tg_table_schema, TABLE = tg_table_name; END IF; -- Database context owners may not be login contexts nor may they be -- started IF new.database_owner_context AND (new.login_context OR new.start_context) THEN RAISE EXCEPTION USING MESSAGE = 'A database owner context may not be a login ' || 'context nor may it be started.', DETAIL = ms_syst_priv.get_exception_details( p_proc_schema => 'ms_syst' ,p_proc_name => 'trig_b_iud_syst_application_contexts_validate_owner_context' ,p_param_data => to_jsonb(new) ,p_context_data => jsonb_build_object( 'tg_op', tg_op ,'tg_when', tg_when ,'tg_schema', tg_table_schema ,'tg_table_name', tg_table_name)), ERRCODE = 'PM107', SCHEMA = tg_table_schema, TABLE = tg_table_name; END IF; RETURN new; END IF; END;]]>