SKIP Menos na última linha

Discussão em 'Progress 4GL' iniciado por fasouza, Abril 27, 2011.

  1. fasouza

    fasouza Membro Participativo

    Pessoal,

    Tenho um programa simples que gera um relatório, usando o PUT e o SKIP no final, só que não posso gerar a última linha em branco e não consigo validar com o LAST-OF. Alguem tem alguma sugestão ?
  2. ueluis

    ueluis Membro Participativo

    Olá,

    posta o codigo para podermos analizar e te ajudar.

    abç
  3. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Tente da seguinte forma:

    Código:
    DEF VAR l-primeiro  AS LOG INIT YES.
    FOR EACH:
        IF l-primeiro THEN
            ASSIGN l-primeiro = no.
        ELSE
            PUT SKIP.
        PUT.
    END.
  4. jalegria

    jalegria Membro Participativo

    bom dia...

    da mesma forma que vc tem o last-of(), tem tb o last()
    o last-of diz se é o ultimo de uma quebra e o last diz se é o ultimo de todos

    tipo assim:
    Código:
    for each tabela break by campo:
      if last-of(campo) and not last(campo) then pula linha.
    end.
    

Compartilhe esta Página