Histórico da Página

...

    field tta_cod_modul_dtsul              as character format "x(3)" label "Módulo" column-label "Módulo"

    field tta_num_lote_ctbl                as ctbl                  as integer format ">>>,>>>,>>9" initial 1 label "Lote Contábil" column-label "Lote Contábil"

    field tta_des_lote_ctbl                ctbl                   as character format "x(40)" label "Descrição Lote" column-label "Descrição Lote"

    field tta_cod_empresa                  empresa                   as character format "x(3)" label "Empresa" column-label "Empresa"

    field tta_dat_lote_ctbl                ctbl                   as date format "99/99/9999" initial today label "Data Lote Contábil" column-label "Data Lote Contábil"

    field ttv_ind_erro_valid               as valid                  as character format "X(08)" initial "Não"

    field tta_log_integr_ctbl_online       as online      as logical format "Sim/Não" initial no label "Integração Online" column-label "Integr Online"

    field ttv_rec_integr_lote_ctbl         as recid ctbl          as recid format ">>>>>>9"

    index tt_recid                       

...

def temp-table tt_integr_lancto_ctbl_1 no-undo

    field tta_cod_cenar_ctbl               as ctbl                 as character format "x(8)" label "Cenário Contábil" column-label "Cenário Contábil"

    field tta_log_lancto_conver            conver             as logical format "Sim/Não" initial no label "Lançamento Conversão" column-label "Lançto Conv"

    field tta_log_lancto_apurac_restdo     as restdo  as logical format "Sim/Não" initial no label "Lançamento Apuração" column-label "Lancto Apuração"

    field tta_cod_rat_ctbl                 ctbl                     as character format "x(8)" label "Rateio Contábil" column-label "Rateio"

    field ttv_rec_integr_lote_ctbl         ctbl           as recid format ">>>>>>9"

    field tta_num_lancto_ctbl              as ctbl                as integer format ">>,>>>,>>9" initial 10 label "Lançamento Contábil" column-label "Lançamento Contábil"

    field ttv_ind_erro_valid               valid                   as character format "X(08)" initial "Não"

    field tta_dat_lancto_ctbl              ctbl                 as date format "99/99/9999" initial ? label "Data Lançamento" column-label "Data Lançto"

    field ttv_rec_integr_lancto_ctbl       as ctbl        as recid format ">>>>>>9"

    index tt_id                            is id                                    is primary unique

          ttv_rec_integr_lote_ctbl         ascendingctbl            ascending

          tta_num_lancto_ctbl              ctbl                 ascending

    index tt_recid                       

          ttv_rec_integr_lancto_ctbl       ctbl         ascending

    .

3) Temp-table de Itens de Lançamento Contábeis

...

    field ttv_rec_integr_lancto_ctbl       as recid ctbl             as recid format ">>>>>>9"

    field tta_num_seq_lancto_ctbl          as ctbl              as integer format ">>>>9" initial 0 label "Sequência Lançto" column-label "Sequência Lançto"

    field tta_ind_natur_lancto_ctbl        ctbl             as character format "X(02)" initial "DB" label "Natureza" column-label "Natureza"

    field tta_cod_plano_cta_ctbl           as ctbl                as character format "x(8)" label "Plano Contas" column-label "Plano Contas"

    field tta_cod_cta_ctbl                 ctbl                         as character format "x(20)" label "Conta Contábil" column-label "Conta Contábil"

    field tta_cod_plano_ccusto             as ccusto                  as character format "x(8)" label "Plano Centros Custo" column-label "Plano Centros Custo"

    field tta_cod_estab                    as character format estab                            as character format "x(3)" label "Estabelecimento" column-label "Estab"

    field tta_cod_unid_negoc               as negoc                    as character format "x(3)" label "Unid Negócio" column-label "Un Neg"

    field tta_cod_histor_padr              as padr                    as character format "x(8)" label "Histórico Padrão" column-label "Histórico Padrão"

    field tta_des_histor_lancto_ctbl       ctbl           as character format "x(2000)" label "Histórico Contábil" column-label "Histórico Contábil"

    field tta_cod_espec_docto              as docto                  as character format "x(3)" label "Espécie Documento" column-label "Espécie"

    field tta_dat_docto                    as date format "docto                             as date format "99/99/9999" initial ? label "Data Documento" column-label "Data Documento"

    field tta_des_docto                    as docto                            as character format "x(25)" label "Número Documento" column-label "Número Documento"

    field tta_cod_imagem                   imagem                         as character format "x(30)" label "Imagem" column-label "Imagem"

    field tta_cod_indic_econ               econ                     as character format "x(8)" label "Moeda" column-label "Moeda"

    field tta_dat_lancto_ctbl              ctbl                     as date format "99/99/9999" initial ? label "Data Lançamento" column-label "Data Lançto"

    field tta_qtd_unid_lancto_ctbl         ctbl             as decimal format ">>,>>>,>>9.99" decimals 2 initial 0 label "Quantidade" column-label "Quantidade"

    field tta_val_lancto_ctbl              ctbl                     as decimal format ">>>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Lançamento" column-label "Valor Lançamento"

    field tta_num_seq_lancto_ctbl_cpart    as integer format ">>>9" initial 0 label "Sequência CPartida" column-label "Sequência CP"

    field ttv_ind_erro_valid               valid                       as character format "X(08)" initial "Não"

    field tta_cod_ccusto                   ccusto                           as Character format "x(11)" label "Centro Custo" column-label "Centro Custo"

    field tta_cod_proj_financ              as financ                    as character format "x(20)" label "Projeto" column-label "Projeto"

    field ttv_rec_integr_item_lancto_ctbl  as ctbl    as recid format ">>>>>>9"

    index tt_id                            is id                                        is primary unique

          ttv_rec_integr_lancto_ctbl       ctbl             ascending

          tta_num_seq_lancto_ctbl          ascendingctbl              ascending

    index tt_recid                       

          ttv_rec_integr_item_lancto_ctbl  ascendingctbl      ascending

    .

4) Temp-table de Apropriações Contábeis

...

    field tta_cod_finalid_econ                  as character format "x(10)" label "Finalidade" column-label "Finalidade"

    field tta_cod_unid_negoc                   as character format "x(3)" label "Unid Negócio" column-label "Un Neg"

    field tta_cod_plano_ccusto                 as character format "x(8)" label "Plano Centros Custo" column-label "Plano Centros Custo"

    field tta_qtd_unid_lancto_ctbl         ctbl             as decimal format ">>,>>>,>>9.99" decimals 2 initial 0 label "Quantidade" column-label "Quantidade"

    field tta_val_lancto_ctbl              as decimal format "ctbl                     as decimal format ">>>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Lançamento" column-label "Valor Lançamento"

    field tta_num_id_aprop_lancto_ctbl     ctbl     as integer format "9999999999" initial 0 label "Apropriacao Lançto" column-label "Apropriacao Lançto"

    field ttv_rec_integr_item_lancto_ctbl  as ctbl    as recid format ">>>>>>9"

    field tta_dat_cotac_indic_econ         as econ            as date format "99/99/9999" initial ? label "Data Cotação" column-label "Data Cotação"

    field tta_val_cotac_indic_econ         as econ            as decimal format ">>>>,>>9.9999999999" decimals 10 initial 0 label "Cotação" column-label "Cotação"

    field ttv_ind_erro_valid               valid                       as character format "X(08)" initial "Não"

    field tta_ind_orig_val_lancto_ctbl     as ctbl        as character format "X(10)" initial "Informado" label "Origem Valor" column-label "Origem Valor"

    field tta_cod_ccusto                   as Character format "xccusto                          as Character format "x(11)" label "Centro Custo" column-label "Centro Custo"

    field ttv_rec_integr_aprop_lancto_ctbl as  as recid format ">>>>>>9"

    index tt_id                            is id                                        is primary unique

          ttv_rec_integr_item_lancto_ctbl  ctbl     ascending

          tta_cod_finalid_econ             econ                   ascending

          tta_cod_unid_negoc               ascendingnegoc                    ascending

          tta_cod_plano_ccusto             ascendingccusto                  ascending

          tta_cod_ccusto                   ccusto                           ascending

    index tt_recid                       

...

    field ttv_rec_integr_ctbl              ctbl                 as recid format ">>>>>>9"

    field ttv_num_mensagem                 mensagem               as integer format ">>>>,>>9" label "Número" column-label "Número Mensagem"

    field ttv_ind_pos_erro                 erro                   as character format "X(08)" label "Posição"

    index tt_id                            id                                   is primary unique

          ttv_rec_integr_ctbl              ascendingctbl                  ascending

          ttv_num_mensagem                 ascendingmensagem                ascending

    .

Relacionamento entre as tabelas temporárias:

...