store_feature(character varying, character varying, integer, integer, integer, text, integer, character, integer)

DECLARE

    pname                ALIAS FOR $1;

    paccession           ALIAS FOR $2;

    pfmin                ALIAS FOR $3;

    pfmax                ALIAS FOR $4;

    pfstrand             ALIAS FOR $5;

    presidues            ALIAS FOR $6;

    pseqlen              ALIAS FOR $7;

    pmd5checksum         ALIAS FOR $8;

    ptype_id             ALIAS FOR $9;

​

    pkeyid INTEGER;

  BEGIN

    SELECT INTO pkeyid feature_id

      FROM feature

      WHERE feature.name = pname AND

            feature.accession = paccession AND

            feature.fmin = pfmin AND

            feature.fmax = pfmax AND

            feature.fstrand = pfstrand AND

            feature.residues = presidues AND

            feature.seqlen = pseqlen AND

            feature.md5checksum = pmd5checksum AND

            feature.type_id = ptype_id;

    IF NOT FOUND THEN

      INSERT INTO feature 

       (name, accession, fmin, fmax, fstrand, residues, seqlen, md5checksum, type_id)

         VALUES

       (pname, paccession, pfmin, pfmax, pfstrand, presidues, pseqlen, pmd5checksum, ptype_id);

      RETURN currval('feature_pk_seq');

    END IF;

    UPDATE feature

      SET

      WHERE

         feature.name = pname AND

            feature.accession = paccession AND

            feature.fmin = pfmin AND

            feature.fmax = pfmax AND

            feature.fstrand = pfstrand AND

            feature.residues = presidues AND

            feature.seqlen = pseqlen AND

            feature.md5checksum = pmd5checksum AND

            feature.type_id = ptype_id

​

    RETURN pkeyid;

  END;