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 Quebra de linha no For Each

Discussão em 'Progress 4GL' iniciado por lm1979, Julho 30, 2014.

  1. lm1979

    lm1979 Membro Participativo

    Bom dia pessoal,
    Eu estou desenvolvendo um relatório onde os dados do for each são gravados em uma temp-table.
    Minha necessidade é: Na impressão dos dados da temp-table, sempre que for a última linha do campo (Natureza de Operação) eu quero que a próxima linha some mais quatro linhas.

    Exemplo: a primeira linha do relatório é a linha 10.

    Num. da linha - item - descrição - natureza de operação
    10 - 001 - item teste - 5111
    11 - 001 - item teste - 5111
    12 - 001 - item teste - 5111
    13
    14
    15
    16
    17 - 002 - item teste - 5112
    18
    19
    20
    21
    22 - 003 - item teste - 5113
    23 - 003 - item teste - 5113
    24 - 003 - item teste - 5113

    Abraço.

    Att,
    Leandro.
  2. valdir_fantin

    valdir_fantin Membro Participativo

    Segue...

    def var i-linha as int init 10.
    def var i-vez as int.
    for each tt-item no-lock
    break by tt-item.nat-operacao:

    disp i-linha tt-item.nat-operacao.

    assign i-linha = i-linha + 1.

    if last-of (tt-item.nat-operacao) then do:
    repeat i-vez = 1 to 4:
    disp i-linha.
    assign i-linha = i-linha + 1.
    end.
    end.
    end.
  3. SAC

    SAC Membro Participativo

    acho mais "simples", na mesma idéia da seguinte forma, sem variáveis:
    if last-of (tt-item.nat-operacao) then
    down 4 with frame <nome frame>.
  4. lm1979

    lm1979 Membro Participativo

    Boa tarde Valdir,
    Era justamente o que eu precisava.
    Muito obrigado.

    Att,
    Leandro.

  5. lm1979

    lm1979 Membro Participativo

    Boa tarde SAC,
    No meu caso o exemplo que o Valdir passou se encaixa melhor, pois estou gerando uma planilha em Excel.
    Muito obrigado pela ajuda.

    Att,
    Leandro.

Compartilhe esta Página