--
-- acs_sc_impl_alias__new/5
--
create or replace function acs_sc_impl_alias__new(
  character varying,
  character varying,
  character varying,
  character varying,
  character varying
) returns int4 as $$

declare
    p_impl_contract_name	alias for $1;
    p_impl_name			alias for $2;
    p_impl_operation_name	alias for $3;
    p_impl_alias		alias for $4;
    p_impl_pl			alias for $5;
    v_impl_id			integer;
begin

    v_impl_id := acs_sc_impl__get_id(p_impl_contract_name,p_impl_name);

    insert into acs_sc_impl_aliases (
        impl_id,
	impl_name,
	impl_contract_name,
	impl_operation_name,
	impl_alias,
	impl_pl
    ) values (
        v_impl_id,
	p_impl_name,
	p_impl_contract_name,
	p_impl_operation_name,
	p_impl_alias,
	p_impl_pl
    );

    return v_impl_id;

end;$$ language plpgsql;