1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

Duvida for first e find first

Discussão em 'Progress 4GL' iniciado por brunoowr, Julho 23, 2018.

  1. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Só não entendo pq vcs estão fazendo FOR FIRST sem nada dentro...a meu ver é código inútil visto que após o END o registro não fica mais disponível pois o progress encerra a query
  2. brunoowr

    brunoowr Membro Participativo

    Este último trecho que postei foi exatamente o que eu encontrei aqui e que me gerou esta dúvida.
    Foi o primeiro relatório que fiz em progress com a ajuda de consultor da Totvs me ensinando rsrsrs
    Só agora que estou ensinando outras pessoas que estou me perguntando o porque de diversas coisas.
    rafael.andrade curtiu isso.
  3. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Então corrige pq tá rodando e consumindo recursos inutilmente
    brunoowr curtiu isso.
  4. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

  5. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    opa, eu dei de exemplo o for first e for last vazio porque não ia ficar colocando codigo aqui no forum a toa, com certeza, eu coloco codigo dentro, nunca faço um for ..... vazio, igual estava no codigo do bruno.
    brunoowr e rafael.andrade curtiram isso.
  6. brunoowr

    brunoowr Membro Participativo

    Outra dúvida que me surgiu enquanto eu ensinava o pessoal foi a seguinte:
    Qual a diferença de usar essas duas formas de find dentro de um for each?

    Código:
    for each nota-fiscal
       where nota-fiscal.nr-nota-fis = "0087072" no-lock,
        each it-nota-fisc of nota-fiscal no-lock.
    
        find first item
             where item.it-codigo = it-nota-fisc.it-codigo no-lock.
    
        find first emitente
             where emitente.cod-emitente = nota-fiscal.cod-emitente no-lock.
    
        MESSAGE item.it-codigo
            VIEW-AS ALERT-BOX INFO BUTTONS OK.
    
        MESSAGE emitente.nome-abrev
            VIEW-AS ALERT-BOX INFO BUTTONS OK.
    end.
    Código:
    for each nota-fiscal
       where nota-fiscal.nr-nota-fis = "0087072" no-lock,
        each it-nota-fisc of nota-fiscal no-lock,
       first item
       where item.it-codigo = it-nota-fisc.it-codigo no-lock,
       first emitente
       where emitente.cod-emitente = nota-fiscal.cod-emitente no-lock.
    
        MESSAGE item.it-codigo
            VIEW-AS ALERT-BOX INFO BUTTONS OK.
    
        MESSAGE emitente.nome-abrev
            VIEW-AS ALERT-BOX INFO BUTTONS OK.
    end.

Compartilhe esta Página