Fazer uma Busca do maior valor da Tabela

Discussão em 'Progress 4GL' iniciado por Lorena Coelho, Julho 7, 2010.

  1. Lorena Coelho

    Lorena Coelho Sem Pontuação

    Olá, boa tarde a Todos!

    Alguem poderia me ajudar? Nao conheco muito bem o progress.
    Preciso fazer uma busca do maior valor em uma tabela e preciso armazenar este valor.
    Ou seja, preciso ordenar os valores e procurar pelo maior valor.
    Minha maior dificuldade é como fazer esta busca pelo maior valor.

    Aguarda vossa ajuda!

    Obrigada.
  2. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Lorena você pode fazer das seguintes formas:

    1) se a tabela tiver um indice por esse campo basta voce fazer o seguinte:
    Código:
    FIND LAST <nome-da-tabela> USE-INDEX <indice> NO-LOCK NO-ERROR.
    assign v-maior-valor = <nome-da-tabela>.<nome-do-campo>.
    
    2)
    Código:
    DEF VAR d-aux as decimal INIT 0.
    
    FOR EACH <nome-da-tabela>:
        IF <nome-da-tabela>.<nome-do-campo> > d-aux THEN
            ASSIGN d-aux = <nome-da-tabela>.<nome-do-campo>.
    END.
    
    MESSAGE 'O maior valor é ' d-aux VIEW-AS ALERT-BOX INFO BUTTONS OK.
    
    Acho que é isso.
  3. Lorena Coelho

    Lorena Coelho Sem Pontuação

    Olá Rogério...

    Find last ira me retornar o ultimo valor e eu preciso do maior valor.

    Estava aqui pesquisando achei o MAXIMUM, será que funciona?

    Muito obrigada por enquanto...

    Aguardo retorno de vcs..

    Abracos
  4. Lorena Coelho

    Lorena Coelho Sem Pontuação

    Rogéiro, deu certo, muito obrigada....usei o segundo script que me passou.

    Obrigada e até Mais!

Compartilhe esta Página