Preencher Tabela no WORD pelo Progress

Discussão em 'Progress 4GL' iniciado por cardosomauricio, Agosto 10, 2011.

  1. cardosomauricio

    cardosomauricio Sem Pontuação

    Já tenho o conhecimento de preencher um arquivo WORD (pré-formatado com campos fixos) através do Progress, porém, tenho a necessidade de preencher uma tabela pré-formatada no WORD.

    Exemplo: Tabela formatada no Word com 3 colunas: Item, Descrição e Quantidade, onde podem ocorrer "n" linhas (indeterminada).

    Alguém tem conhecimento desta situação.
  2. lvmor

    lvmor Sem Pontuação

    Cardoso Bom Dia,

    Eu trabalharia por substituição de marcadores - como é feito no Danfe, por ex. Assim, eu preencheria as linhas já pré-definidas e excluiria as não utilizadas.

    Att,

    Leonardo
  3. LFBuozi

    LFBuozi Membro Participativo

    Já vi isto, não me lembro exatamente como fazer, mas, após criar o Word modelo com uma tabela, tem os comando abaixo:

    Código:
    DEFINE VARIABLE chTable                 AS COM-HANDLE.
    DEFINE VARIABLE chCell                  AS COM-HANDLE.
    
    /*--- Aponta a primeira tabela encontrada no modelo ---*/
    chTable = ch-Documento:tables:Item(1).
    
    /*--- Aponta para a primeira célula da linha tal ---*/
    chCell = chTable:cell(i-linha,1).
    /*--- Define valor da célula ---*/
    chCell:Range:TEXT = STRING (i-linha - 1,'999').
    
    chCell = chTable:cell(i-linha,2).
    chCell:Range:TEXT = TRIM(ordem-compra.it-codigo).
    
    /*--- Cria nova linha para a tabela ---*/
    chTable:Rows:ADD().
  4. cardosomauricio

    cardosomauricio Sem Pontuação

    Perfeito, funciona.

    Agradeço pela dica.

Compartilhe esta Página