Function Última data de Negociação de Venda

CREATE OR REPLACE FUNCTION ULTIMA_COMPRA(P_CODPARC IN INTEGER) 
RETURN DATE
IS
DTULTNEG DATE;
BEGIN
    SELECT
/*
AUTOR: EDUARDO TAVARES
DT.CRIAÇÃO: 15/05/2018
BD: ORACLE
OBJETIVO: TRAZER A ULTIMA DATA DE NEGOCIAÇÃO DO TIPO VENDA
*/
        DTULTNEG INTO DTULTNEG
    FROM(
        SELECT
            DENSE_RANK() OVER(ORDER BY MAX(CAB.DTNEG) DESC) AS SEQ,
            MAX(CAB.DTNEG) AS DTULTNEG
        FROM
            TGFCAB CAB INNER JOIN TGFITE ITE ON CAB.NUNOTA = ITE.NUNOTA
            INNER JOIN TGFTOP TOPP ON CAB.CODTIPOPER = TOPP.CODTIPOPER AND CAB.DHTIPOPER = TOPP.DHALTER
        WHERE
            CAB.STATUSNOTA = 'L'
            AND TOPP.GRUPO IN('Venda')
            --PARAMETROS
            AND CAB.CODPARC = P_CODPARC
            )ULTCOMPRA
    WHERE
        SEQ IN (1);
  RETURN (DTULTNEG);
END;