-- -- acs_sc_msg_type__new/2 -- create or replace function acs_sc_msg_type__new( character varying, character varying ) returns int4 as $$ declare p_msg_type_name alias for $1; p_msg_type_spec alias for $2; v_msg_type_id integer; begin v_msg_type_id := acs_object__new( null, 'acs_sc_msg_type', now(), null, null, null ); insert into acs_sc_msg_types ( msg_type_id, msg_type_name ) values ( v_msg_type_id, p_msg_type_name ); perform acs_sc_msg_type__parse_spec(p_msg_type_name,p_msg_type_spec); return v_msg_type_id; end;$$ language plpgsql;