Histórico da Página

API de Integração entre PROGRESS e Microsoft Excel (002)

Considerações Gerais

• A API recebe como parâmetros valores para construção de planilhas e, também, gráficos. Caso não seja possível criar o arquivo, será retornado uma Temp-Table com os, possíveis, erros;
• A include {utp/utapi003.i} contém as definições das Temp-Table´s que devem ser passadas como parâmetros à API utp/utapi003.p. Sendo que a chamada desta include, como a inclusão de valores, deve ser feita antes da chamada da API utp/utapi003.p;
• A criação do arquivo é feita através da execução da API utp/utapi003.p.

Parâmetros de Entrada 

Temp-table tt-dados: possui as definições, gerais, do arquivo a ser criado.

Temp-Table tt-planilha: possui as definições, gerais, sobre cada uma das planilhas a serem criadas.

Temp-Table tt-dados: possui as definições das propriedades das células a serem inseridas nas planilhas.

Temp-Table tt-grafico: possui as definições, gerais, sobre cada um dos gráficos a serem criados.

Temp-table tt-erros: possui todos os erros encontrados pela API.

Execução

 A API utp/utapi003.p  irá executar 2 validações básicas:

Parâmetros de Saída

No retorno da execução da API utp/utapi003.p, será retornado um dos valores abaixo (via RETURN-VALUE):

Outras Informações

A seguir encontram-se as definições das Temp-Table´s a serem utilizadas pela API utp/utapi003.p.

A seguir encontram-se as principais validações a serem executadas em cada uma das Temp-Table´s de entrada utilizadas pela API utp/utapi003.p.

A seguir encontram-se um exemplo de Macro que retorna a uma fórmula de uma célula em idioma de macro:

A seguir encontram-se referências sobre os valores que alguns campos podem assumir :

Programa exemplo:

{utp/utapi003.i}
os-delete value("c:\tmp\teste_utapi003.xls").
CREATE tt-configuracao.
ASSIGN tt-configuracao.versao-integracao   = 2
       tt-configuracao.arquivo-num         = 1
       tt-configuracao.arquivo             = "c:\tmp\teste_utapi003.xls"
       tt-configuracao.total-planilha      = 2
       tt-configuracao.exibir-construcao   = yes
       tt-configuracao.abrir-excel-termino = no.
       
CREATE tt-planilha.
ASSIGN tt-planilha.arquivo-num   = 1
       tt-planilha.planilha-num  = 1
       tt-planilha.planilha-nome = "Plan 1 - Grafico 1"
       tt-planilha.linhas-grade  = no
       largura-coluna            = 8.50
       formatar-planilha         = yes.

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 1
       tt-dados.celula-linha  = 1
       tt-dados.celula-valor  = "Região".

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 1
       tt-dados.celula-linha  = 2
       tt-dados.celula-valor  = "Norte".

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 1
       tt-dados.celula-linha  = 3
       tt-dados.celula-valor  = "Nordeste".

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 1
       tt-dados.celula-linha  = 4
       tt-dados.celula-valor  = "Sul".

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 1
       tt-dados.celula-linha  = 5
       tt-dados.celula-valor  = "Sudeste".

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 1
       tt-dados.celula-linha  = 6
       tt-dados.celula-valor  = "Centro-Oeste".

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 2
       tt-dados.celula-linha  = 1
       tt-dados.celula-valor  = "Valor 1".

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 2
       tt-dados.celula-linha  = 2
       tt-dados.celula-valor  = "10".

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 2
       tt-dados.celula-linha  = 3
       tt-dados.celula-valor  = "20".

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 2
       tt-dados.celula-linha  = 4
       tt-dados.celula-valor  = "30".

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 2
       tt-dados.celula-linha  = 5
       tt-dados.celula-valor  = "40".

CREATE tt-dados.
ASSIGN tt-dados.arquivo-num   = 1
       tt-dados.planilha-num  = 1
       tt-dados.celula-coluna = 2
       tt-dados.celula-linha  = 6
       tt-dados.celula-valor  = "50".

CREATE tt-grafico.
ASSIGN tt-grafico.arquivo-num = 1
       tt-grafico.planilha-num = 1
       tt-grafico.grafico-nome = "Graf 1"
       tt-grafico.grafico-titulo = "Valores (Plan 1)"
       tt-grafico.grafico-tipo = 4
       tt-grafico.intervalo-linha-ini = 1
       tt-grafico.intervalo-linha-fin = 6
       tt-grafico.intervalo-coluna-ini = 1
       tt-grafico.intervalo-coluna-fin = 2.

RUN utp/utapi003.p (INPUT-OUTPUT TABLE tt-configuracao,
                    INPUT-OUTPUT TABLE tt-planilha,
                    INPUT-OUTPUT TABLE tt-dados,
                    INPUT-OUTPUT TABLE tt-grafico,
                    INPUT-OUTPUT TABLE tt-erros).

if return-value = "nok" then do: 
    for each tt-erros: 
        disp tt-erros with 1 col width 500. 
    end.
end.