[RESOLVIDO] Dataviewer - Nome nas Colunas (Excel)

Boa tarde,

Estou utilizando o Dataviewer, onde pretendo gerar um export para CSV (excel), visto que o programa funciona corretamente e tras todas as informações solicitadas, necessito saber como inserir o nome da coluna para cada uma das colunas.

Não sei como aplicar para o comando PUT conforme o modelo abaixo:

Código:

for each preco-item no-lock
         where preco-item.nr-tabpre >= c-nr-tabpre-ini and 
               preco-item.nr-tabpre <= c-nr-tabpre-fim,
    each item no-lock
         where item.it-codigo = preco-item.it-codigo,
    each familia no-lock
         where familia.fm-codigo = item.fm-codigo and
               familia.fm-codigo >= c-fm-codigo-ini and 
               familia.fm-codigo <= c-fm-codigo-fim,
    each saldo-estoq no-lock
         where saldo-estoq.it-codigo = item.it-codigo and
               saldo-estoq.qtidade-atu  <> 0:
    assign v-num-reg-lidos = v-num-reg-lidos + 1.
    run pi-acompanhar in h-acomp(input string(v-num-reg-lidos)).

    assign VlTotalDispon = saldo-estoq.qtidade-atu - ( saldo-estoq.qt-aloc-ped + saldo-estoq.qt-aloc-prod + saldo-estoq.qt-alocada).
    assign VlcomIPI = preco-item.preco-venda + preco-item.preco-venda * item.aliquota-ipi / 100.
    assign vltotal = saldo-estoq.qtidade-atu * VLcomIPI.
    assign l-imprime = yes.
    
    put stream str-rp unformatted familia.fm-codigo ";"
            item.it-codigo ";"
            item.desc-item ";"
            saldo-estoq.lote ";"
            VlTotalDispon ";"
            saldo-estoq.qtidade-atu ";"
            VlcomIPI ";"
            vltotal skip.
    
end.

Alguém teria alguma idéia?

Obrigado,

Tente usando o comando export:

Código:

output to value('c:\temp\relatorio.csc').
for each preco-item no-lock
         where preco-item.nr-tabpre >= c-nr-tabpre-ini and 
               preco-item.nr-tabpre <= c-nr-tabpre-fim,
    each item no-lock
         where item.it-codigo = preco-item.it-codigo,
    each familia no-lock
         where familia.fm-codigo = item.fm-codigo and
               familia.fm-codigo >= c-fm-codigo-ini and 
               familia.fm-codigo <= c-fm-codigo-fim,
    each saldo-estoq no-lock
         where saldo-estoq.it-codigo = item.it-codigo and
               saldo-estoq.qtidade-atu  <> 0:
    assign v-num-reg-lidos = v-num-reg-lidos + 1.
    run pi-acompanhar in h-acomp(input string(v-num-reg-lidos)).

    assign VlTotalDispon = saldo-estoq.qtidade-atu - ( saldo-estoq.qt-aloc-ped + saldo-estoq.qt-aloc-prod + saldo-estoq.qt-alocada).
    assign VlcomIPI = preco-item.preco-venda + preco-item.preco-venda * item.aliquota-ipi / 100.
    assign vltotal = saldo-estoq.qtidade-atu * VLcomIPI.
    assign l-imprime = yes.

    export delimiter ";" familia.fm-codigo 
                                  item.it-codigo
                                  item.desc-item
                                  saldo-estoq.lote
                                  VlTotalDispon
                                  saldo-estoq.qtidade-atu
                                  VlcomIPI
                                 vltotal.
    
end.
output close.

Você pode salvar em formato txt ao invés de csv que também funciona.

Depois de gerar o arquivo abra o excel e vá em abrir arquivo. Selecione o txt e clique em abrir.
Será aberta uma tela onde você deverá selecionar o tipo de arquivo "delimitado".
Na próxima tela selecione ";", o excel já abre ele nas colunas sequencias.

Normalmente utilizo este comando quando vou abrir depois no excel e roda tudo certinho.

Espero que ajude.

Jonas, Obrigado pela resposta.

Isso faz com que eu consiga exportar o arquivo, porém eu necessito incrementar o arquivo e na minha primeira linha devera trazer o nome dos campos (colunas). Quanto a exportação delimitada esta funcionando certinho! =)

Obrigado,

Você pode criar uma linha de cabeçalho:

Código:

output to value('c:\temp\relatorio.csc').

export delimiter ";"  "Familia" "Cod. Item" "Descr. Item" "Saldo" "Tot. Disp." "Qtd. Atu" "Vlr. c/IPI" "Vlr. Total";
/* lógica do for each */
for each preco-item no-lock...
end.
output close.