Pular para o conteúdo

Fóruns Developer,Designer e Discoverer Função contar caracteres Função contar caracteres

#74962
toadpunk
Participante

    Voc? cria a seguinte fun??o:


    --RETORNA QUANTAS VEZES FIND_TXT APARECE DENTRO DE SEQ_TXT

    FUNCTION CONTA_CHAR(SEQ_TXT IN VARCHAR2, FIND_TXT IN VARCHAR2) RETURN NUMBER IS

    V_NUMBER NUMBER;
    TAM NUMBER;
    POS NUMBER;

    BEGIN

    V_NUMBER := 0; POS := 0;
    TAM := LENGTH(SEQ_TXT);
    IF TAM > 0 THEN

    LOOP
    POS := INSTR(SEQ_TXT,FIND_TXT,POS + 1);

        IF POS > 0 THEN
           V_NUMBER := V_NUMBER + 1;
        ELSE
           EXIT;
        END IF;
    

    END LOOP;

    END IF;
    RETURN V_NUMBER;
    END;

    E pode aplicar assim, por exemplo:

    :block.resultado := to_char(conta_char(:block.nome,:block.nomefind));

    Eu n?o tinha testado. Agora sim, e t? corrigido.
    Abra?os.