Histórico da Página

...

Nos atributos das tabelas temporárias de entrada e saída:

def temp-table tt_api_acr_lote_impl no-undo
    field ttv_cod_id_lote_impl_tit_acr     as character format "x(80)"
    field tta_cod_empresa                  as character format "x(3)" label "Empresa" column-label "Empresa"
    field ttv_cod_empresa_ext              as character format "x(3)" label "Código Empresa Ext" column-label "Cód Emp Ext"
    field tta_cod_estab                    as character format "x(5)" label "Estabelecimento" column-label "Estab"
    field tta_cod_estab_ext                as character format "x(8)" label "Estabelecimento Exte" column-label "Estabelecimento Ext"
    field tta_cod_refer                    as character format "x(10)" label "Referência" column-label "Referência"
    field tta_cod_indic_econ               as character format "x(8)" label "Moeda" column-label "Moeda"
    field tta_cod_finalid_econ_ext         as character format "x(8)" label "Finalid Econ Externa" column-label "Finalidade Externa"
    field tta_cod_espec_docto              as character format "x(3)" label "Espécie Documento" column-label "Espécie"
    field tta_dat_transacao                as date format "99/99/9999" initial today label "Data Transação" column-label "Dat Transac"
    field tta_ind_tip_espec_docto          as character format "X(17)" initial "Normal" label "Tipo Espécie" column-label "Tipo Espécie"
    field tta_ind_orig_tit_acr             as character format "X(8)" initial "ACREMS50" label "Origem Tit Cta Rec" column-label "Origem Tit Cta Rec"
    field tta_val_tot_lote_impl_tit_acr    as decimal format ">>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Total Movimento" column-label "Total Movimento"
    field tta_val_tot_lote_infor_tit_acr   as decimal format ">>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Total Informado" column-label "Total Informado"
    field tta_ind_tip_cobr_acr             as character format "X(10)" initial "Normal" label "Tipo Cobrança" column-label "Tipo Cobrança"
    field ttv_log_lote_impl_ok             as logical format "Sim/Não" initial no label "Lote imp. OK" column-label "Lote Imp. OK"
    field tta_log_liquidac_autom           as logical format "Sim/Não" initial no label "Liquidac Automática" column-label "Liquidac Automática"
    index tt_id                            is primary unique
          tta_cod_estab                    ascending
          tta_cod_estab_ext                ascending
          tta_cod_refer                    ascending
    index tt_id_lote                       is unique
          ttv_cod_id_lote_impl_tit_acr     ascending.
    

Considerações 

• Segue abaixo os atributos que deverão receber valor na temp-table:

ttv_cod_id_lote_impl_tit_acr

tt_integr_acr_lote_impl.tta_cod_empresa

tt_integr_acr_lote_impl.tta_cod_estab

tt_integr_acr_lote_impl.tta_cod_refer

tt_integr_acr_lote_impl.tta_dat_transacao

def temp-table tt_api_acr_item_lote_impl no-undo
    field ttv_cod_id_lote_impl_tit_acr     as character format "x(80)"
    field tta_num_seq_refer                as integer format ">>>9" initial 0 label "Sequência" column-label "Seq"
    field tta_cdn_cliente                  as Integer format ">>>,>>>,>>9" initial 0 label "Cliente" column-label "Cliente"
    field tta_cod_espec_docto              as character format "x(3)" label "Espécie Documento" column-label "Espécie"
    field tta_cod_ser_docto                as character format "x(5)" label "Série Documento" column-label "Série"
    field tta_cod_tit_acr                  as character format "x(16)" label "Título" column-label "Título"
    field tta_cod_parcela                  as character format "x(02)" label "Parcela" column-label "Parcela"
    field tta_cod_indic_econ               as character format "x(8)" label "Moeda" column-label "Moeda"
    field tta_cod_finalid_econ_ext         as character format "x(8)" label "Finalid Econ Externa" column-label "Finalidade Externa"
    field tta_cod_portador                 as character format "x(5)" label "Portador" column-label "Portador"
    field tta_cod_portad_ext               as character format "x(8)" label "Portador Externo" column-label "Portador Externo"
    field tta_cod_cart_bcia                as character format "x(3)" label "Carteira" column-label "Carteira"
    field tta_cod_modalid_ext              as character format "x(8)" label "Modalidade Externa" column-label "Modalidade Externa"
    field tta_cod_cond_cobr                as character format "x(8)" label "Condição Cobrança" column-label "Cond Cobrança"
    field tta_cod_motiv_movto_tit_acr      as character format "x(8)" label "Motivo Movimento" column-label "Motivo Movimento"
    field tta_cod_histor_padr              as character format "x(8)" label "Histórico Padrão" column-label "Histórico Padrão"
    field tta_cdn_repres                   as Integer format ">>>,>>9" initial 0 label "Representante" column-label "Representante"
    field tta_dat_vencto_tit_acr           as date format "99/99/9999" initial ? label "Vencimento" column-label "Vencimento"
    field tta_dat_prev_liquidac            as date format "99/99/9999" initial ? label "Prev Liquidação" column-label "Prev Liquidação"
    field tta_dat_desconto                 as date format "99/99/9999" initial ? label "Data Desconto" column-label "Dt Descto"
    field tta_dat_emis_docto               as date format "99/99/9999" initial today label "Data  Emissão" column-label "Dt Emissão"
    field tta_val_tit_acr                  as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Valor" column-label "Valor"
    field tta_val_desconto                 as decimal format "->>>,>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Desconto" column-label "Valor Desconto"
    field tta_val_perc_desc                as decimal format ">9.9999" decimals 4 initial 0 label "Percentual Desconto" column-label "Perc Descto"
    field tta_val_perc_juros_dia_atraso    as decimal format ">9.999999" decimals 6 initial 00.00 label "Perc Jur Dia Atraso" column-label "Perc Dia"
    field tta_val_perc_multa_atraso        as decimal format ">9.99" decimals 2 initial 00.00 label "Perc Multa Atraso" column-label "Multa Atr"
    field tta_val_base_calc_comis          as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Base Calc Comis" column-label "Base Calc Comis"
    field tta_des_text_histor              as character format "x(2000)" label "Histórico" column-label "Histórico"
    field tta_qtd_dias_carenc_multa_acr    as decimal format ">>9" initial 0 label "Dias Carenc Multa" column-label "Dias Carenc Multa"
    field tta_cod_banco                    as character format "x(8)" label "Banco" column-label "Banco"
    field tta_cod_agenc_bcia               as character format "x(10)" label "Agência Bancária" column-label "Agência Bancária"
    field tta_cod_cta_corren_bco           as character format "x(20)" label "Conta Corrente Banco" column-label "Conta Corrente Banco"
    field tta_cod_digito_cta_corren        as character format "x(2)" label "Dígito Cta Corrente" column-label "Dígito Cta Corrente"
    field tta_cod_instruc_bcia_1_movto     as character format "x(4)" label "Instr Bancária 1" column-label "Instr Banc 1"
    field tta_cod_instruc_bcia_2_movto     as character format "x(4)" label "Instr Bancária 2" column-label "Instr Banc 2"
    field tta_qtd_dias_carenc_juros_acr    as decimal format ">>9" initial 0 label "Dias Carenc Juros" column-label "Dias Juros"
    field tta_val_liq_tit_acr              as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Líquido" column-label "Vl Líquido"
    field tta_ind_tip_espec_docto          as character format "X(17)" initial "Normal" label "Tipo Espécie" column-label "Tipo Espécie"
    field tta_cod_cond_pagto               as character format "x(8)" label "Condição Pagamento" column-label "Condição Pagamento"
    field ttv_cdn_agenc_fp                 as Integer format ">>>9" label "Agência"
    field tta_ind_sit_tit_acr              as character format "X(13)" initial "Normal" label "Situação Título" column-label "Situação Título"
    field tta_log_liquidac_autom           as logical format "Sim/Não" initial no label "Liquidac Automática" column-label "Liquidac Automática"
    field tta_num_id_tit_acr               as integer format "999999999" initial 0 label "Token Cta Receber" column-label "Token Cta Receber"
    field tta_num_id_movto_tit_acr         as integer format "999999999" initial 0 label "Token Movto Tit  ACR" column-label "Token Movto Tit  ACR"
    field tta_num_id_movto_cta_corren      as integer format "999999999" initial 0 label "ID Movto Conta" column-label "ID Movto Conta"
    field tta_cod_admdra_cartao_cr         as character format "x(5)" label "Administradora" column-label "Administradora"
    field tta_cod_cartcred                 as character format "x(20)" label "Código Cartão" column-label "Código Cartão"
    field tta_cod_mes_ano_valid_cartao     as character format "XX/XXXX" label "Validade Cartão" column-label "Validade Cartão"
    field tta_cod_autoriz_cartao_cr        as character format "x(6)" label "Cód Pré-Autorização" column-label "Cód Pré-Autorização"
    field tta_dat_compra_cartao_cr         as date format "99/99/9999" initial ? label "Data Efetiv Venda" column-label "Data Efetiv Venda"
    field tta_cod_conces_telef             as character format "x(5)" label "Concessionária" column-label "Concessionária"
    field tta_num_ddd_localid_conces       as integer format "999" initial 0 label "DDD" column-label "DDD"
    field tta_num_prefix_localid_conces    as integer format ">>>9" initial 0 label "Prefixo" column-label "Prefixo"
    field tta_num_milhar_localid_conces    as integer format "9999" initial 0 label "Milhar" column-label "Milhar"
    field tta_log_tip_cr_perda_dedut_tit   as logical format "Sim/Não" initial no label "Credito com Garantia" column-label "Cred Garant"
    field tta_cod_refer                    as character format "x(10)" label "Referência" column-label "Referência"
    field tta_ind_ender_cobr               as character format "X(15)" initial "Cliente" label "Endereço Cobrança" column-label "Endereço Cobrança"
    field tta_nom_abrev_contat             as character format "x(15)" label "Abreviado Contato" column-label "Abreviado Contato"
    field tta_log_db_autom                 as logical format "Sim/Não" initial no label "Débito Automático" column-label "Débito Automático"
    field tta_log_destinac_cobr            as logical format "Sim/Não" initial no label "Destin Cobrança" column-label "Destin Cobrança"
    field tta_ind_sit_bcia_tit_acr         as character format "X(12)" initial "Liberado" label "Sit Bancária" column-label "Sit Bancária"
    field tta_cod_tit_acr_bco              as character format "x(20)" label "Num Título Banco" column-label "Num Título Banco"
    field tta_cod_agenc_cobr_bcia          as character format "x(10)" label "Agência Cobrança" column-label "Agência Cobr"
    field tta_dat_abat_tit_acr             as date format "99/99/9999" initial ? label "Abat" column-label "Abat"
    field tta_val_perc_abat_acr            as decimal format ">>9.9999" decimals 4 initial 0 label "Perc Abatimento" column-label "Abatimento"
    field tta_val_abat_tit_acr             as decimal format ">>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Abatimento" column-label "Vl Abatimento"
    field tta_des_obs_cobr                 as character format "x(40)" label "Obs Cobrança" column-label "Obs Cobrança"
    field tta_val_cotac_indic_econ         as decimal format ">>>>,>>9.9999999999" decimals 10 initial 0 label "Cotação" column-label "Cotação"
    field ttv_cod_id_item_lote_impl_tit    as character format "x(80)"
    field tta_ind_tip_calc_juros           as character format "x(10)" initial "Simples" label "Tipo Cálculo Juros" column-label "Tipo Cálculo Juros"
    field ttv_cod_comprov_vda_aux          as character format "x(12)"
    field ttv_num_parc_cartcred            as integer format ">9" label "Quantidade Parcelas" column-label "Quantidade Parcelas"
    field ttv_cod_autoriz_bco_emissor      as character format "x(6)" label "Codigo Autorização" column-label "Codigo Autorização"
    field ttv_cod_lote_origin              as character format "x(7)" label "Lote Orig Venda" column-label "Lote Orig Venda"
    field ttv_cod_estab_vendor             as character format "x(5)" label "Estabelecimento" column-label "Estabelecimento"
    field ttv_num_planilha_vendor          as integer format ">>>,>>>,>>9" initial 0 label "Planilha Vendor" column-label "Planilha Vendor"
    field ttv_cod_cond_pagto_vendor        as character format "x(3)" initial "0" label "Condição Pagto" column-label "Condição Pagto"
    field ttv_val_cotac_tax_vendor_clien   as decimal format ">>9.9999999999" decimals 10 label "Taxa Vendor Cliente" column-label "Taxa Vendor Cliente"
    field ttv_dat_base_fechto_vendor       as date format "99/99/9999" initial today label "Data Base" column-label "Data Base"
    field ttv_qti_dias_carenc_fechto       as Integer format "->>9" label "Dias Carência" column-label "Dias Carência"
    field ttv_log_assume_tax_bco           as logical format "Sim/Não" initial no label "Assume Taxa Banco" column-label "Assume Taxa Banco"
    field ttv_log_vendor                   as logical format "Sim/Não" initial no
    field ttv_cod_estab_portad             as character format "x(8)"
    field tta_cod_proces_export            as character format "x(12)" label "Processo Exportação" column-label "Processo Exportação"
    field ttv_val_cr_pis                   as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Crédito PIS" column-label "Vl Cred PIS/PASEP"
    field ttv_val_cr_cofins                as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Crédito COFINS" column-label "Credito COFINS"
    field ttv_val_cr_csll                  as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Crédito CSLL" column-label "Credito CSLL"
    field tta_cod_indic_econ_desemb        as character format "x(8)" label "Moeda Desembolso" column-label "Moeda Desembolso"
    field tta_val_base_calc_impto          as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Base Calculo Impto" column-label "Base Calculo Impto"
    field tta_log_retenc_impto_impl        as logical format "Sim/Não" initial no label "Ret Imposto Impl" column-label "Ret Imposto Impl"
    field ttv_cod_nota_fisc_faturam        as character format "x(16)"
    field tta_cod_band                     as character format "x(10)" label "Bandeira" column-label "Bandeira"
    field tta_cod_tid                      as character format "x(10)" label "TID" column-label "TID"
    field tta_cod_terminal                 as character format "x(8)" label "Nr Terminal" column-label "Nr Terminal"
    field tta_val_tot_pagto_cartcred       as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Total Pagamento CC" column-label "Total Pagamento CC"
    index tt_id                            is primary unique
          ttv_cod_id_lote_impl_tit_acr     ascending
          tta_num_seq_refer                ascending
    .

Considerações -

• O atributo ttv_cod_id_lote_impl_tit_acr é o identificador do item com o lote, deve receber o atributo tt_api_acr_lote_impl.ttv_cod_id_lote_impl_tit_acr da temp-table de lote;

...

• O atributo ttv_cod_id_item_lote_impl_tit é o identificador do item, que poderá ser atualizado com string(rowid(tt_api_acr_item_lote_impl)).

...

• Esse atributo que será utilizado para o relacionamento entre a Temp table do item com as suas temp table relacionadas, ex: tt_api_acr_aprop_ctbl_pend , tt_api_acr_abat_antecip, etc.

• O atributos chaves para o título devem ser informados:

tta_cod_estab;

tta_cdn_cliente;

tta_num_seq_refer

tta_cod_espec_docto;

tta_cod_ser_docto;

tta_cod_tit_acr;

tta_cod_parcela.

           -

• O atributo tta_cod_finalid_econ_ext somente será informado, quando a finalidade econômica usada for de um sistema externo.

...

• O atributo tta_cod_portador deve receber valor quando o portador do EMS 5.0;

...

• O atributo tta_cod_portad_ext somente será informado, quando o portador usado for de um sistema externo.

Deve ser informado apenas um dos atributos (tta_cod_portador ou tta_cod_portad_ext).

...

• O atributo tta_cod_cart_bcia deve receber o valor, quando a carteira bancária for a do EMS 5.0;

...

• O atributo tta_cod_modalid_ext somente será informado, quando a carteira bancária for de um sistema externo. Deve ser informado apenas um dos atributos (tta_cod_cart_bcia ou tta_cod_modalid_ext)

...

• O atributo tta_val_cotac_indic_econ deverá ser informado quando se deseja que a conversão para a moeda corrente do usuário seja feita utilizando-se essa cotação e não a cotação existente no Cadastro de Cotações. Caso deseje-se que o sistema utilize o valor da cotação existente no cadastro, deve-se informar 0 (zero) no valor da cotação – tta_val_cotac_indic_econ = 0.

...

• O atributo tta_ind_tip_calc_juros não é obrigatório. Quando não for informado assumirá por default “Simples”.

...

• O atributo ttv_cod_comprov_vda não é obrigatório. Quando informado, será gerado um lote de liquidação e comissão para administradora do cartão de crédito, ou seja, é considerado que a venda está autorizada pela administradora.

...

• O atributo ttv_num_parc_cartcred não é obrigatório. Quando informado, serão criados títulos de cobrança especial conforme o número de parcelas. Obs: estes títulos não são agrupados e o valor informado será dividido conforme número de parcelas.

...

• O atributo ttv_cod_autoriz_bco_emissor não é obrigatório. Quando informado irá atualizar o código de autorização do Banco Emissor da Venda Autorizada.

...

• O atributo ttv_cod_lote_origin não é obrigatório. Quando informado irá atualizar o código do Lote Original da Venda Autorizada.

...

• O atributo ttv_log_vendor não é obrigatório. Utilizado para indicar se haverá atualização das informações para o vendor através do documento.

...

• O atributo ttv_cod_estab_vendor não é obrigatório. Quando for um documento vendor, e estiver implantando uma antecipação, deve ser preenchido com o estabelecimento da planilha.

...

• O atributo ttv_num_planilha_vendor não é obrigatório. Quando for um documento vendor, e estiver implantando uma antecipação, deve ser preenchido com o número da planilha.

...

• O atributo ttv_cod_cond_pagto_vendor não é obrigatório. Quando for um documento vendor, e estiver implantando um documento normal, deve ser preenchido.

...

• O atributo ttv_val_cotac_tax_vendor_clien não é obrigatório. Quando for um documento vendor, e estiver implantando um documento normal, deve ser preenchido, sendo seu valor inicial igual a zero.

...

• O atributo ttv_dat_base_fechto_vendor não é obrigatório. Quando for um documento vendor, e estiver implantando um documento normal, deve ser preenchido.

...

• O atributo ttv_qti_dias_carenc_fechto não é obrigatório. Quando for um documento vendor, e estiver implantando um documento normal, deve ser preenchido, sendo seu valor inicial igual a zero.

...

• O atributo ttv_log_assume_tax_bco não é obrigatório. Quando for um documento vendor, e estiver implantando um documento normal, quando marcado, ignora valor informado para a taxa do cliente.

...

• O atributo tta_val_base_calc_impto somente será informado quando os valores de PIS/COFINS/CSSL forem informados.

...

• O atributo tta_log_retenc_impto_impl será informado para identificar se o titulo sofreu retenção na implantação

...

• O atributo ttv_cod_nota_fisc_faturam será informado quando o título for de origem faturamento.

• Segue abaixo outros atributos além dos citados anteriormente que deverão receber valor na temp-table:

tt_api_acr_item_lote_impl.ttv_cod_id_lote_impl_tit_acr

tt_api_acr_item_lote_impl.ttv_cod_id_item_lote_impl_tit

tt_api_acr_item_lote_impl.tta_num_seq_refer

tt_api_acr_item_lote_impl.tta_cdn_cliente

tt_api_acr_item_lote_impl.tta_cod_espec_docto

tt_api_acr_item_lote_impl.tta_cod_ser_docto

tt_api_acr_item_lote_impl.tta_cod_tit_acr

tt_api_acr_item_lote_impl.tta_cod_parcela

tt_api_acr_item_lote_impl.tta_cod_indic_econ

tt_api_acr_item_lote_impl.tta_cdn_repres

tt_api_acr_item_lote_impl.tta_dat_vencto_tit_acr

tt_api_acr_item_lote_impl.tta_dat_prev_liquidac

tt_api_acr_item_lote_impl.tta_dat_emis_docto

tt_api_acr_item_lote_impl.tta_val_tit_acr

tt_api_acr_item_lote_impl.tta_val_liq_tit_acr

tt_api_acr_item_lote_impl.tta_ind_tip_espec_docto

(*) A partir da 5.07A o estabelecimento passa a ter cinco dígitos.

...

  def new shared temp-table tt_integrapi_acr_abat_antecip no-undo
        field ttv_cod_recid_item_lote_impl_tit _acr   as recid    as character format ">>>>>>9x(80)"
        field ttv_cod_recid_abat_antecip_acr         as recid acr      as character format ">>>>>>9x(80)"
        field tta_cod_estab                    as estab                    as character format "x(5)" label "Estabelecimento" column-label "Estab"
        field tta_cod_estab_ext                as ext                as character format "x(8)" label "Estabelecimento Exte" column-label "Estabelecimento Ext"
        field tta_cod_espec_docto              as docto              as character format "x(3)" label "Espécie Documento" column-label "Espécie"
        field tta_cod_ser_docto                as docto                as character format "x(35)" label "Série Documento" column-label "Série"
        field tta_cod_tit_acr                  as acr                  as character format "x(1016)" label "Título" column-label "Título"
        field tta_cod_parcela                  as parcela                  as character format "x(02)" label "Parcela" column-label "ParcParcela"
        field tta_val_abtdo_antecip_tit_abat   abat   as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Abtdo" column-label "Vl Abtdo"
        index tt_id                            is id                            is primary unique
                    ttv_reccod_id_item_lote_impl_tit _acr   ascending             ascending
          tta_cod_estab                    ascending          estab                    ascending
          tta_cod_estab_ext                ascending          ext                ascending
          tta_cod_espec_docto              ascending          docto              ascending
          tta_cod_ser_docto                ascending          docto                ascending
          tta_cod_tit_acr                  ascending          acr                  ascending
          tta_cod_parcela                  ascending.parcela                  ascending
    .

Considerações

• Segue abaixo os atributos que deverão receber valor na temp-table:

...

ttv_

...

cod_id_item_lote_impl_tit

...

...

ttv_

...

cod_

...

id_abat_antecip

...

_

...

acr

...

tta_cod_estab

...

tta_cod_espec_docto

...

tta_cod_ser_docto

...

tta_cod_tit_acr

...

tta_cod_parcela

...

tta_val_abtdo_antecip_tit_abat

...

• O atributo ttv_rec_item_lote_impl_tit_acr deve receber o  recid da tt_integr_acr_item_lote_impl_9

...

• O atributo ttv_rec_abat_antecip_acr deve receber o  recid da tt_integr_acr_abat_antecip

...