Árvore de páginas

Versões comparadas

Chave

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

...

    def temp-table tmp-cpc-bosau-invoice-ge-entrada no-undo
    field nm-ponto-chamada-cpc         as char format "x(15)"
    field in-evento-programa           as char
    field dt-ano-mes-ini               as char
    field dt-ano-mes-fim               as char
    field ix-nota                      as int
    field in-demap                     as int
    field in-indicador                 as int
    field lg-demap                     as log
    field h-convenio                   as handle
    field cd-contratante               like notaserv.cd-contratante
    field cd-contratante-origem        like notaserv.cd-contratante-origem
    field nr-ter-adesao                like notaserv.nr-ter-adesao
    field cd-modalidade                like notaserv.cd-modalidade
    field cd-modalidade-ini            like notaserv.cd-modalidade
    field cd-modalidade-fim            like notaserv.cd-modalidade
    field ep-codigo-ini                like notaserv.ep-codigo
    field ep-codigo-fim                like notaserv.ep-codigo
    field cd-estabel-ini               like notaserv.cod-estabel
    field cd-estabel-fim               like notaserv.cod-estabel
    field cd-tipo-venc-ini             like notaserv.cd-tipo-vencimento
    field cd-tipo-venc-fim             like notaserv.cd-tipo-vencimento
    field nr-ter-ade-ini               like notaserv.nr-ter-adesao
    field nr-ter-ade-fim               like notaserv.nr-ter-adesao
    field dt-emissao-ini               like notaserv.dt-emissao
    field dt-emissao-fim               like notaserv.dt-emissao
    field dt-vencimento-ini            like notaserv.dt-vencimento
    field dt-vencimento-fim            like notaserv.dt-vencimento
    field cd-especie-ini               like notaserv.cd-especie
    field cd-especie-fim               like notaserv.cd-especie
    field cd-plano-ini                 like propost.cd-plano
    field cd-plano-fim                 like propost.cd-plano
    field cd-tipo-plano-ini            like propost.cd-tipo-plano
    field cd-tipo-plano-fim            like propost.cd-tipo-plano
    field cd-tab-preco-ini             like propost.cd-tab-preco
    field cd-tab-preco-fim             like propost.cd-tab-preco
    field aa-reajuste-ini              like propost.aa-ult-reajuste
    field mm-reajuste-ini              like propost.mm-ult-reajuste
    field aa-reajuste-fim              like propost.aa-ult-reajuste
    field mm-reajuste-fim              like propost.mm-ult-reajuste
    field nr-fatura                    like fatura.nr-fatura
    field aa-referencia                like fatura.aa-referencia
    field mm-referencia                like fatura.mm-referencia
    field cd-especie                   like fatura.cd-especie
    field vl-total                     like fatura.vl-total
    field nr-sequencia                 like notaserv.nr-sequencia
    field h-temp-erro                  as handle
    field nm-arq                       as char
    field nm-arq-erro                  as char.

...