Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Para que seja possível implementar um tratamento via EPC para as literais das variáveis específicas a serem substituídas em tempo de impressão do relatório, elas deverão seguir um padrão, obrigatoriamente iniciar com “#lit-<prefixo_variável_layout>-var-espec”.

Variáveis Específicas:

...

No arquivo de layout padrão, no bloco de informações referentes ao Processo de importação, inserir nova coluna e na linha referente às literais, inserir a variável #lit-pi-var-espec-cod-estabel e a variável correspondente ao valor que será substituído #var#pi-var-espec-cod-estabel.

O tratamento das variáveis “#lit-var-espec-cod-estabel” e “#var-espec-cod-estabel” deverá ser realizado no programa customizado desenvolvido pelo cliente e chamado pelo ponto EPC correspondente ao bloco de Informações do Processo de importação, assim como tratamento das literais desta variável.

...

EventoParâmetroValor do Parâmetro
Custom-Fields-tt-processo-improwid-processo-improwid(processo-imp)

Variável literal específica deve iniciar com: #lit-pi-var-espec<variável>

Variável de conteúdo deve iniciar com: #pi-var-espec<variável>

  • Layout Pedido de Compra
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-pedido-compr
rowid-pedido-comprrowid(pedido-compr)

Variável literal específica deve iniciar com: #lit-pc-var-espec<variável>

Variável de conteúdo deve iniciar com: #pc-var-espec<variável>

  • Layout Fornecedor
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-emitente
rowid-emitenterowid(emitente)

Variável literal específica deve iniciar com: #lit-for-var-espec<variável>

Variável de conteúdo deve iniciar com: #for-var-espec<variável>

  • Layout Ordem de Compra
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-ordem-compra
rowid-ordem-comprarowid(ordem-compra)

Variável literal específica deve iniciar com: #lit-oc-var-espec<variável>

Variável de conteúdo deve iniciar com: #oc-var-espec<variável>

  • Layout Item
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-item
rowid-itemrowid(item)

Variável literal específica deve iniciar com: #lit-it-var-espec<variável>

Variável de conteúdo deve iniciar com: #for-it-espec<variável>

  • Layout Embarque de Importação
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-embarque-imp
rowid-embarque-improwid(embarque-imp)

Variável literal específica deve iniciar com: #lit-emb-var-espec<variável>

Variável de conteúdo deve iniciar com: #for-emb-espec<variável>

  • Layout Parcelas/Ordens do Embarque
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-prazo-compra
rowid-prazo-comprarowid(prazo-compra)

Variável literal específica deve iniciar com: #lit-par-var-espec<variável>

Variável de conteúdo deve iniciar com: #for-par-espec<variável>

  • Layout Acompanhamento do Embarque
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-historico-embarque
rowid-historico-embarquerowid(historico-embarque)

Variável literal específica deve iniciar com: #lit-he-var-espec<variável>

Variável de conteúdo deve iniciar com: #he-var-espec<variável>

  • Layout Despesas do Embarque
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-desp-embarque
rowid-desp-embarquerowid(desp-embarque)

Variável literal específica deve iniciar com: #lit-de-var-espec<variável>

Variável de conteúdo deve iniciar com: #de-var-espec<variável>

  • Layout Declaração de Importação
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-declar-import
rowid-declar-importrowid(declar-import)

Variável literal específica deve iniciar com: #lit-di-var-espec<variável>

Variável de conteúdo deve iniciar com: #di-var-espec<variável>

  • Layout Adições da DI
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-declar-import-adic
rowid-declar-import-adicrowid(declar-import-adic

Variável literal específica deve iniciar com: #lit-adi-var-espec<variável>

Variável de conteúdo deve iniciar com: #adi-var-espec<variável>

  • Layout Ordens da DI
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-declar-import-ord
rowid-declar-import-ordrowid(declar-import-ord)

Variável literal específica deve iniciar com: #lit-odi-var-espec<variável>

Variável de conteúdo deve iniciar com: #odi-var-espec<variável>

  • Layout Acompanhamento da DI
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-histor-decla-import
rowid-histor-decla-importrowid(histor-decla-import)

Variável literal específica deve iniciar com: #lit-hdi-var-espec<variável>

Variável de conteúdo deve iniciar com: #hdi-var-espec<variável>

  • Layout Despesas da DI
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-despes-decla-import
rowid-despes-decla-importrowid(despes-decla-import)

Variável literal específica deve iniciar com: #lit-ddi-var-espec<variável>

Variável de conteúdo deve iniciar com: #ddi-var-espec<variável>

  • Layout Documentos de Entrada
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-docum-est
rowid-docum-estrowid(docum-est)

Variável literal específica deve iniciar com: #lit-doc-var-espec<variável>

Variável de conteúdo deve iniciar com: #doc-var-espec<variável>

  • Layout Itens do Documento
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-item-doc-est
rowid-item-doc-estrowid(item-doc-est)

Variável literal específica deve iniciar com: #lit-itd-var-espec<variável>

Variável de conteúdo deve iniciar com: #itd-var-espec<variável>

  • Layout Despesas Item Documento
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-item-doc-est-cex
rowid-item-doc-est-cexrowid(item-doc-est-cex)

Variável literal específica deve iniciar com: #lit-did-var-espec<variável>

Variável de conteúdo deve iniciar com: #did-var-espec<variável>

  • Layout Movimentações de Estoque
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-rat-lote
rowid-rat-loterowid(rat-lote)

Variável literal específica deve iniciar com: #lit-lot-var-espec<variável>

Variável de conteúdo deve iniciar com: #lot-var-espec<variável>

  • Layout Despesas do Documento
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-docum-est-cex
rowid-docum-est-cexrowid(docum-est-cex)

Variável literal específica deve iniciar com: #lit-des-var-espec<variável>

Variável de conteúdo deve iniciar com: #des-var-espec<variável>

  • Layout Duplicatas Fornecedor Mercadoria
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-dupli-apagar
rowid-dupli-apagarrowid(dupli-apagar)

Variável literal específica deve iniciar com: #lit-dup-var-espec<variável>

Variável de conteúdo deve iniciar com: #dup-var-espec<variável>

  • Layout Duplicatas de Despesas
EventoParâmetroValor do Parâmetro
Custom-Fields-tt-dupli-apagar-cex
rowid-dupli-apagar-cexrowid(dupli-apagar-cex)

Variável literal específica deve iniciar com: #lit-dpd-var-espec<variável>

Variável de conteúdo deve iniciar com: #dpd-var-espec<variável>


Exemplo de EPC para utilização no Relatório Gerencial de Importação:

Bloco de código
titleVeja aqui o código fonte de exemplo
collapsetrue
{include/i-epc200.i1} /* Definição tt-epc         */
DEFINE INPUT        PARAM p-ind-event  AS CHAR NO-UNDO.
DEFINE INPUT-OUTPUT PARAM TABLE for tt-epc.

DEFINE VARIABLE c-literal AS CHARACTER   NO-UNDO.

IF p-ind-event = "Custom-literals":U THEN DO:

    FOR EACH tt-epc 
        WHERE tt-epc.cod-event = "Custom-literals":U
          AND tt-epc.cod-parameter = "literal":U:

        IF tt-epc.val-parameter = "#lit-doc-var-espec-teste1" THEN
            ASSIGN c-literal = "Literal Teste":U.

    END.
    IF c-literal <> "":U THEN DO:
        CREATE tt-epc.
        ASSIGN tt-epc.cod-event     = p-ind-event
                      tt-epc.cod-parameter = "#lit-doc-var-espec-teste1"
                      tt-epc.val-parameter = c-literal.
    END.
END.

IF p-ind-event = "Custom-Fields-tt-docum-est" THEN DO:

    FIND FIRST tt-epc
         WHERE tt-epc.cod-event = p-ind-event
           AND tt-epc.cod-parameter = "rowid-docum-est" NO-LOCK NO-ERROR.
    IF AVAIL tt-epc THEN DO:
        FIND FIRST docum-est
            WHERE ROWID(docum-est) = TO-ROWID(tt-epc.val-parameter) NO-LOCK NO-ERROR.
        IF AVAIL docum-est THEN DO:
            CREATE tt-epc.
            ASSIGN tt-epc.cod-event     = p-ind-event
                          tt-epc.cod-parameter = "#var#doc-var-espec-teste1"
                          tt-epc.val-parameter = "VAR teste 1".
        END.
    END.
END.

RETURN "OK":U.

...