posttipolimitecredito(character varying, integer, integer, character varying)

declare 

    internalid integer;

begin

    --DESCRICAO NULA

    if descricao is null then 

        RAISE EXCEPTION 'descricao = %', descricao

            USING HINT = 'Field descricao must be not null';

     end if;

​

    --IDNATIVO NULO OU FORA DO PADRAO 

    if idnativo is null or idnativo not in (0,1,-99999) then 

        RAISE EXCEPTION 'idnativo = %', idnativo

            USING HINT = 'Field must not be null or different from 1 or 0.';

     end if;  

    --IDNPADRAO NULO OU FORA DO PADRAO 

    if idnpadrao is null or idnpadrao not in (0,1) then 

        RAISE EXCEPTION 'idnpadrao = %', idnpadrao

            USING HINT = 'Field must not be null or different from 1 or 0.';

     end if;     

​

     --CODIGOERP NULO

     if externalid is null or externalid = '' then 

        RAISE EXCEPTION 'externalid = %', externalid

            USING HINT = 'Field externalid must be not null';

     end if; 

    --VALIDAÇÃO DE CODIGOERP JÁ EXISTENTE

    IF (select distinct 1 FROM TIPOLIMITECREDITO WHERE CODIGOERP = PostTipoLimiteCredito.externalid) = 1

        THEN RAISE EXCEPTION 'externalid = %', PostTipoLimiteCredito.externalid 

                USING HINT = 'The record (externalid = '|| PostTipoLimiteCredito.externalid ||') already exists, it was not possible to insert it.';

        ELSE insert into tipolimitecredito (idtipolimitecredito,descricao, idnativo, idnpadrao, sgltipolimitecredito, codigo, codigoerp) values (nextval('seqpktipolimitecredito'), descricao, idnativo, idnpadrao, externalid, externalid, externalid) returning idtipolimitecredito into internalid;  

     end if; 

    return query select internalid;

END;