postfinanceirotitulo(character varying, character varying, character varying, character varying, character varying, character varying, character varying, integer, character varying, numeric, numeric, numeric, numeric, integer, character varying, integer, character varying, integer, character varying, character varying, character varying)

declare 

    internalid integer;

begin

​

     --DATAVENCIMENTO NULA

     if datavencimento is null then 

        RAISE EXCEPTION 'datavencimento = %', datavencimento

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

     end if; 

     --SGLTIPOTITULO NULO

     if sgltipotitulo is null then 

        RAISE EXCEPTION 'sgltipotitulo = %', sgltipotitulo

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

     end if; 

     --VALORORIGINAL NULO

     if valororiginal is null then 

        RAISE EXCEPTION 'valororiginal = %', valororiginal

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

     end if; 

     --VALORPAGOPARCIAL NULO

     if valorpagoparcial is null then 

        RAISE EXCEPTION 'valorpagoparcial = %', valorpagoparcial

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

     end if;    

​

     --VALORDESCONTO NULO

     if valordesconto is null then 

        RAISE EXCEPTION 'valordesconto = %', valordesconto

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

     end if;         

​

     --VALORJUROS NULO

     if valorjuros is null then 

        RAISE EXCEPTION 'valorjuros = %', valorjuros

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

     end if;    

​

    --LOOKUP CLIENTE

    if idcliente is null and idcliente_externalid is not null then 

        idcliente = (SELECT parceiro.idparceiro FROM parceiro WHERE parceiro.codigoerp = PostFinanceiroTitulo.idcliente_externalid);

     end if; 

     --CLIENTE NULO

    if idcliente is null then 

        RAISE EXCEPTION 'idcliente = %', idcliente

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

     end if;

     --LOOKUP FILIAL

    if idfiliallocal is null and idfiliallocal_externalid is not null then 

        idfiliallocal = (SELECT LOCAL.IDLOCAL FROM LOCAL WHERE LOCAL.codigoerp = PostFinanceiroTitulo.idfiliallocal_externalid);

    end if;

     --LOOKUP USUARIO

    if idusuario is null and idusuario_externalid is not null then 

        idusuario = (SELECT usuario.idusuario FROM usuario WHERE usuario.codigoerp = PostFinanceiroTitulo.idusuario_externalid);

    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 FINANCEIROTITULO WHERE CODIGOERP = PostFinanceiroTitulo.externalid) = 1

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

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

        ELSE insert into financeirotitulo (idfinanceirotitulo, descricao, sgltipotitulo, numerodocumento, numeroparcela, datamovimento, datavencimento, datapagamento, idnpago, portador, valororiginal, valorpagoparcial, valordesconto, valorjuros, idusuario, idparceiro, idlocalfilial, observacao, codigoerp) values (nextval('seqpkfinanceirotitulo'),descricao, sgltipotitulo, numerodocumento, numeroparcela, TO_DATE(datamovimento,'YYYY-MM-DD'), TO_DATE(datavencimento,'YYYY-MM-DD'), TO_DATE(datapagamento,'YYYY-MM-DD'), idnpago, portador, valororiginal, valorpagoparcial, valordesconto, valorjuros, idusuario, idcliente, idfiliallocal, observacao, externalid) returning idfinanceirotitulo into internalid;

    end if;

    return query select internalid;

​

END;