Funcion Equivalente de SQL a Oracle

[fernandoraveloarcos]

Hola a todos,

estoy iniciando en Oracle y la verdad tengo un problema para pasar una funcion de SQL Server a Oracle. Si alguien me podria ayudar estaria muy agradecido.

Código SQL:

ALTER FUNCTION [dbo].[FSECVER_TuberiaConexion] (@TubCodi VARCHAR(12))
RETURNS INT
AS
BEGIN
DECLARE @VerId INT
DECLARE @Contador INT
DECLARE @Rpta INT
DECLARE verCursor CURSOR FOR
 
--select * from verTuberiaConexion order by TubCodi, VerId
 
    SELECT VertId
    FROM verTramoGasoducto
    WHERE TraCodi = @TubCodi
    ORDER BY VertId
 
    OPEN verCursor
    SELECT @Contador=0
    SELECT @Rpta=1
 
    FETCH NEXT FROM verCursor INTO @VerId
    WHILE @@FETCH_STATUS = 0
    BEGIN
        IF @Contador <> @VerId
        SELECT @Rpta = 0
 
        FETCH NEXT FROM verCursor INTO @VerId
        SELECT @Contador = @Contador + 1
    END
 
    CLOSE verCursor
    DEALLOCATE verCursor
 
RETURN @Rpta
END
 

[matanga]

A simple vista debería ser algo así:

Código SQL:

CREATE OR REPLACE FUNCTION FSECVER_TuberiaConexion (TubCodi VARCHAR2)
RETURN NUMBER
IS
 VerId NUMBER;
 Contador NUMBER:=0;
 Rpta NUMBER:=1;
BEGIN
    FOR verCursor IN (
        SELECT VerId
            FROM verTramoGasoducto
            WHERE TraCodi = TubCodi
            ORDER BY VerId ) LOOP
        IF Contador <> verCursor.VerId THEN
         Rpta := 0;
        END IF;
        Contador := Contador + 1;
    END LOOP;
RETURN Rpta;
END;
/
 

Saludos