-1

Olá!

Estou desenvolvendo uma função que recebe como parâmetro o cliente e o valor e verifica se o cliente tem limite de crédito para efetivar uma venda, porém ao chamar a função não está retornando corretamente o resultado.

    CREATE OR REPLACE FUNCTION F_LIMITE_CREDITO(
    P_NOME IN TB_CLIENTES.NOME%TYPE
) 
RETURN NUMBER
IS
    P_LIMITE NUMBER;
BEGIN

    SELECT LIMITE INTO P_LIMITE
    FROM TB_CLIENTES
    WHERE NOME = P_NOME;

    RETURN P_LIMITE;
END F_LIMITE_CREDITO;
/

DECLARE
C_NOME VARCHAR2 := TB_CLIENTES.NOME;
BEGIN
    IF F_LIMITE_CREDITO (C_NOME) < 10 THEN
        dbms_output.put_line("LIMITE INDISPONIVEL");
    END IF;
END;
/

gostaria da ajuda de vocês pois estou iniciando em PL.

4
  • Seu select retorna algum resultado? acredito que seria interessante buscar pelo ID do cliente ao invés do nome. 8/11/2019 às 14:58
  • Retorna a coluna nome e limite de credito porém com o valor zerado.
    – rdevenz
    8/11/2019 às 15:16
  • A tabela clientes tem as colunas cliente_id, nome e limite
    – rdevenz
    8/11/2019 às 15:18
  • Comparou e resultado da function com a execução avulsa do select ?
    – Motta
    8/11/2019 às 22:30

1 Resposta 1

2

Eu recomendo a você utilizar CLIENT_ID como parâmetro da função, e não NOME, pois caso haja duas pessoas com mesmo nome sua função vai dar erro (SELECT INTO só pode retornar uma linha).

Você tem também que colocar uma EXCEPTION para o caso onde o SELECT não encontrar o cliente.

Para o seu código tal como está hoje, faltou passar um nome válido para filtrar, por exemplo:

DECLARE
    C_NOME TB_CLIENTES.NOME%TYPE := 'Mario';
BEGIN
    IF F_LIMITE_CREDITO (C_NOME) < 10 THEN
        dbms_output.put_line('LIMITE INDISPONIVEL');
    END IF;
END;
/

E você também pode fazer assim direto no SELECT:

SELECT NOME,
           CASE WHEN F_LIMITE_CREDITO(NOME) < 10 THEN 'LIMITE INDISPONIVEL' 
                ELSE 'APROVADO'
           END AS SITUACAO_LIMITE
    FROM TB_CLIENTES;

Bom, eu re-escreveria sua função assim: [eu usei -1 para erro, mas você poderia substituir por RAISE_APPLICATION_ERROR (documentação neste link para tratar o erro na própria função)]:

CREATE OR REPLACE FUNCTION F_LIMITE_CREDITO
    ( P_ID IN TB_CLIENTES.CLIENTE_ID%TYPE ) 
RETURN NUMBER IS
     P_LIMITE NUMBER;
BEGIN

    IF P_ID IS NULL
    THEN
        RETURN -1;
    END IF;

    SELECT LIMITE INTO P_LIMITE
    FROM TB_CLIENTES
    WHERE CLIENTE_ID = P_ID;

    RETURN P_LIMITE;

    EXCEPTION WHEN NO_DATA_FOUND
    THEN
          RETURN -1;

END F_LIMITE_CREDITO;
/

Para chamar:

SELECT NOME,
       CASE WHEN F_LIMITE_CREDITO(CLIENTE_ID) = -1 THEN 'ERRO'
            WHEN F_LIMITE_CREDITO(CLIENTE_ID) < 10 THEN 'LIMITE INDISPONIVEL' 
            ELSE 'APROVADO'
       END AS SITUACAO_LIMITE
FROM TB_CLIENTES;
1
  • Fernando, usei seu exemplo e retornou corretamente. Obrigado pela ajuda.
    – rdevenz
    11/11/2019 às 11:45

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .