Dúvida com soma no stream

Discussão em 'Progress 4GL' iniciado por guilherme_angus, Junho 24, 2010.

  1. guilherme_angus

    guilherme_angus Sem Pontuação

    Eaee galera!

    Estou com um problema em um programa de NF ( resumi para ficar mais fácil ), conforme abaixo.

    Acontece que hoje ele está mostrando o stream de ítens primeiro e em seguida o cabeçalho. O que eu gostaria, era de poder inverter essa ordem, o problema é a soma do ICMS dentro do for each que está em negrito. Alguém teria alguma sugestão?


    [...]

    for each it-nota-fisc of nota-fiscal no-lock:

    assign sequencia = sequencia + 1.

    find first item
    where item.it-codigo = it-nota-fisc.it-codigo
    no-lock no-error.

    FIND FIRST item-cli WHERE item-cli.nome-abrev = nota-fiscal.nome-ab-cli
    AND item-cli.it-codigo = it-nota-fisc.it-codigo NO-LOCK NO-ERROR.


    put stream st-a
    "2" AT 01
    "87548814000143" AT 02
    loc-entr.cgc format "99999999999999" at 16

    [...]

    >>>>> it-nota-fisc.vl-icms-it * 100 format "999999999999999" at 161 <<<<<

    [...]

    skip.

    assign vl-total-icms = vl-total-icms + it-nota-fisc.vl-icms-it.

    end.

    /* HEADER - 1 */
    put stream st-b
    "1" at 01
    "87548814000143" AT 02
    loc-entr.cgc format "99999999999999" at 16

    [...]

    vl-total-icms * 100 FORMAT "999999999999999" AT 105

    [...]
  2. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Carrega primeiro os valores em uma temp-table e depois vc os exibe

Compartilhe esta Página