Árvore de páginas

Versões comparadas

Chave

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

...


def temp-table tt_pagtos_periodo no-undo
field tta_cod_estab as character format "x(5)" label "Estabelecimento" column-label "Estab"
field tta_cod_ser_docto as character format "x(3)" label "Série Documento" column-label "Série"
field tta_cod_espec_docto as character format "x(3)" label "Espécie Documento" column-label "Espécie"
field tta_cod_portador as character format "x(5)" label "Portador" column-label "Portador"
field tta_cdn_fornecedor as Integer format ">>>,>>>,>>9" initial 0 label "Fornecedor" column-label "Fornecedor"
field tta_nom_abrev as character format "x(15)" label "Nome Abreviado" column-label "Nome Abreviado"
field tta_num_id_movto_tit_ap as integer format "9999999999" initial 0 label "Token Movto Tít AP" column-label "Id Tít AP"
field tta_cod_tit_ap as character format "x(16)" label "Título" column-label "Título"
field tta_nom_pessoa as character format "x(40)" label "Nome" column-label "Nome"
field tta_cod_parcela as character format "x(02)" label "Parcela" column-label "Parcela"
field tta_dat_vencto_tit_ap as date format "99/99/9999" initial today label "Data Vencimento" column-label "Dt Vencto"
field tta_cod_refer as character format "x(10)" label "Referência" column-label "Referência"
field tta_dat_pagto as date format "99/99/9999" initial today label "Data Pagamento" column-label "Data Pagto"
field tta_cod_unid_negoc as character format "x(3)" label "Unid Negócio" column-label "Un Neg"
field tta_cod_indic_econ as character format "x(8)" label "Moeda" column-label "Moeda"
field ttv_val_pagto_apb as decimal format "->>,>>>,>>>,>>9.99" decimals 2 label "Valor Pagamento" column-label "Valor Pagamento"
field ttv_val_finalid_apres as decimal format "->>,>>>,>>>,>>9.99" decimals 2 label "Valor Finalid Apres" column-label "Valor Movto"
field ttv_cod_dwb_field_apb as character extent 5 format "x(32)" label "Campo" column-label "Campo"
field ttv_rec_compl_movto_pagto as recid format ">>>>>>9"
field tta_cod_contrat_cartcred as character format "x(10)" label "Contrato Cartão" column-label "Contrato Cartão"
field tta_cod_portad_cartcred as character format "x(10)" label "Portador Cartão" column-label "Portador Cartão"
field ttv_rec_movto_tit_ap as recid format ">>>>>>9"
field tta_cod_forma_pagto as character format "x(3)" label "Forma Pagamento" column-label "F Pagto"
field tta_val_despes_bcia as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Desp Banc" column-label "Vl Desp Banc"
field ttv_cod_indic_econ_des as character format "x(8)" label "Moeda" column-label "Moeda"
field tta_num_cheque as integer format ">>>>,>>>,>>9" initial ? label "Núm Cheque" column-label "Num Cheque"
field tta_num_talon_cheq as integer format ">>>,>>>,>>9" initial 0 label "Talonário Cheques" column-label "Talonário Cheques"
field tta_val_multa_tit_ap as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Multa" column-label "Valor Multa"
field tta_val_juros as decimal format ">>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Juros" column-label "Valor Juros"
field tta_val_cm_tit_ap as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Val Correção Monet" column-label "Val Corr Monet"
field tta_val_desc_tit_ap as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Desconto" column-label "Vl Desconto"
field tta_val_abat_tit_ap as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Abatimento" column-label "Vl Abatimento"
field ttv_val_multa_apres as decimal format ">>>>,>>>,>>9.99" decimals 2 label "Valor Multa" column-label "Valor Multa"
field ttv_val_juros_apres as decimal format ">>>>,>>>,>>9.99" decimals 2 label "Valor juros" column-label "Valor Juros"
field ttv_val_cm_apres as decimal format ">>>>,>>>,>>9.99" decimals 2 label "Valor Cor Monetaria" column-label "Val Corr Monet"
field ttv_val_desc_apres as decimal format ">>>>,>>>,>>9.99" decimals 2 label "Valor Desconto" column-label "Vl Desconto"
field ttv_val_abat_apres as decimal format ">>>>,>>>,>>9.99" decimals 2 label "Valor Abatimento" column-label "Vl Abatimento"
field tta_des_text_histor as character format "x(2000)" label "Histórico" column-label "Histórico"
field tta_num_bord_ap as integer format ">>>>>9" initial 0 label "Número Borderô" column-label "Borderô"
field tta_des_forma_pagto as character format "x(40)" label "Descr Forma Pagto" column-label "Descr Forma Pagto"
field ttv_rec_tit_ap as recid format ">>>>>>9" initial ?
field ttv_cod_banco as character format "x(8)" label "Banco" column-label "Banco"
field ttv_cod_agenc_bcia as character format "x(10)" label "Agência Bancária" column-label "Agência Bancária"
field ttv_cod_digito_agenc as character format "x(2)" label "Dígito Agência" column-label "Dígito Agência"
field ttv_cod_cta_corren_bco_pagto as character format "x(20)" label "Conta Corrente" column-label "Conta Corrente"
field ttv_cod_digito_cta_corren_pagto as character format "x(2)" label "Dígito Cta Corrente" column-label "Dígito Cta Corrente"
field tta_ind_trans_ap as character format "X(26)" initial "Implantação" label "Transação" column-label "Transação"
field tta_cod_empresa as character format "x(3)" label "Empresa" column-label "Empresa"
field ttv_val_original as decimal format "->>>>>,>>>,>>9.99" decimals 4 initial 0 label "Valor Original" column-label "Valor Original"
field tta_cod_safra as character format "9999/9999" label "Safra" column-label "Safra"
field tta_cod_contrat_graos as character format "x(20)" label "Contrato Grãos" column-label "Contr Grãos"
index tt_estab_un
tta_cod_estab ascending
tta_cod_unid_negoc ascending
index tt_fornecedor
tta_cdn_fornecedor ascending
index tt_id is primary unique
tta_cod_estab ascending
tta_num_id_movto_tit_ap ascending
tta_cod_unid_negoc ascending
index tt_id_tit_ap
tta_cod_estab ascending
tta_cdn_fornecedor ascending
tta_cod_espec_docto ascending
tta_cod_tit_ap ascending
tta_cod_parcela ascending
tta_dat_pagto ascending 



Tabela Temporária

Descrição

Entrada/Saída

tt_pagtos_periodo_new

Pagamentos Efetuados no Período novo

Saída

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

tta_cod_estab

Character

x(5)

Estabelecimento

Sim


tta_cod_ser_docto

Character

X(3)

Série Documento

Sim


tta_cod_espec_docto

Character

x(3)

Espécie Documento

Sim


tta_cod_portadorCharacterx(5)PortadorSim
tta_cdn_fornecedorInteger>>>,>>>,>>9FornecedorSim
tta_nom_abrevCharacterx(15)Nome AbreviadoSim
tta_num_id_movto_tit_apInteger9999999999Id Tít APSim
tta_cod_tit_apCharacterx(16)TítuloSim
tta_nom_pessoaCharacterx(40)NomeSim
tta_cod_parcelaCharacterx(02)ParcelaSim
tta_dat_vencto_tit_apDate99/99/9999Data VencimentoSim
tta_cod_referCharacterx(10)ReferênciaSim
tta_dat_pagtoDate99/99/9999Data pagamentoSim
tta_cod_unid_negocCharacterx(3)Unid NegócioSim
tta_cod_indic_econCharacterx(8)MoedaSim
ttv_val_pagto_apbDecimal->>,>>>,>>>,>>9.99Valor PagamentoSim
ttv_val_finalid_apresDecimal->>,>>>,>>>,>>9.99Valor Finalid ApresSim
ttv_cod_dwb_field_apbCharacterx(32)CampoSim
ttv_row_compl_movto_pagtoInteger>>>>>>9ROWID Compl_movto_pagtoSim
tta_cod_contrat_cartcredCharacterx(10)Contrato CartãoSim
tta_cod_portad_cartcredCharacterx(10)Portador CartãoSim
ttv_row_movto_tit_apInteger>>>>>>9Rowid movto_tit_apSim
tta_cod_forma_pagtoCharacterx(3)Forma PagamentoSim
tta_val_despes_bcia Decimal->>>,>>>,>>9.99Valor Despesa BancáriaSim
ttv_cod_indic_econ_desCharacterx(8)MoedaSim
tta_num_chequeInteger>>>>,>>>,>>9Numero ChequeSim
tta_num_talon_cheq Integer>>>,>>>,>>9Talonário ChequesSim
tta_val_multa_tit_apDecimal->>>,>>>,>>9.99Valor MultaSim
tta_val_jurosDecimal>>>>,>>>,>>9.99Valor JurosSim
tta_val_cm_tit_apDecimal->>>,>>>,>>9.99Valor Correção MonetáriaSim
tta_val_desc_tit_apDecimal->>>,>>>,>>9.99Valor DescontoSim
tta_val_abat_tit_apDecimal->>>,>>>,>>9.99Valor AbatimentoSim
ttv_val_multa_apresDecimal>>>>,>>>,>>9.99Valor MultaSim
ttv_val_juros_apresDecimal>>>>,>>>,>>9.99Valor JurosSim
ttv_val_cm_apresDecimal>>>>,>>>,>>9.99Valor Correção MonetáriaSim
ttv_val_desc_apresDecimal>>>>,>>>,>>9.99Valor DescontoSim
ttv_val_abat_apresDecimal>>>>,>>>,>>9.99Valor AbatimentoSim
tta_des_text_historCharacterx(2000)HistóricoSim
tta_num_bord_ap Integer>>>>>9Número BorderôSim
tta_des_forma_pagtoCharacterx(40)Descrição Forma PagamentoSim
ttv_row_tit_apInteger>>>>>>9Rowid tit_apSim
ttv_cod_bancoCharacterx(8)BancoSim
ttv_cod_agenc_bciaCharacterx(10)Agência BancáriaSim
ttv_cod_digito_agenc Characterx(2)Dígito AgênciaSim
ttv_cod_cta_corren_bco_pagto Characterx(20)Conta CorrenteSim
ttv_cod_digito_cta_corren_pagtoCharacterx(2)Dígito Conta CorrenteSim
tta_ind_trans_apCharacterx(26)TransaçãoSim
tta_cod_empresaCharacterx(3)EmpresaSim
ttv_val_originalDecimal->>>>>,>>>,>>9.99Valor OriginalSim
tta_cod_safraCharacter9999/9999SafraSim
tta_cod_contrat_graosCharacterx(20)Contrato GrãosSim


def temp-table tt_pagtos_periodo_new no-undo
field tta_cod_estab as character format "x(5)" label "Estabelecimento" column-label "Estab"
field tta_cod_ser_docto as character format "x(3)" label "Série Documento" column-label "Série"
field tta_cod_espec_docto as character format "x(3)" label "Espécie Documento" column-label "Espécie"
field tta_cod_portador as character format "x(5)" label "Portador" column-label "Portador"
field tta_cdn_fornecedor as Integer format ">>>,>>>,>>9" initial 0 label "Fornecedor" column-label "Fornecedor"
field tta_nom_abrev as character format "x(15)" label "Nome Abreviado" column-label "Nome Abreviado"
field tta_num_id_movto_tit_ap as integer format "9999999999" initial 0 label "Token Movto Tít AP" column-label "Id Tít AP"
field tta_cod_tit_ap as character format "x(16)" label "Título" column-label "Título"
field tta_nom_pessoa as character format "x(40)" label "Nome" column-label "Nome"
field tta_cod_parcela as character format "x(02)" label "Parcela" column-label "Parcela"
field tta_dat_vencto_tit_ap as date format "99/99/9999" initial today label "Data Vencimento" column-label "Dt Vencto"
field tta_cod_refer as character format "x(10)" label "Referência" column-label "Referência"
field tta_dat_pagto as date format "99/99/9999" initial today label "Data Pagamento" column-label "Data Pagto"
field tta_cod_unid_negoc as character format "x(3)" label "Unid Negócio" column-label "Un Neg"
field tta_cod_indic_econ as character format "x(8)" label "Moeda" column-label "Moeda"
field ttv_val_pagto_apb as decimal format "->>,>>>,>>>,>>9.99" decimals 2 label "Valor Pagamento" column-label "Valor Pagamento"
field ttv_val_finalid_apres as decimal format "->>,>>>,>>>,>>9.99" decimals 2 label "Valor Finalid Apres" column-label "Valor Movto"
field ttv_cod_dwb_field_apb as character extent 5 format "x(32)" label "Campo" column-label "Campo"
field ttv_rec_compl_movto_pagto as recid format ">>>>>>9"
field tta_cod_contrat_cartcred as character format "x(10)" label "Contrato Cartão" column-label "Contrato Cartão"
field tta_cod_portad_cartcred as character format "x(10)" label "Portador Cartão" column-label "Portador Cartão"
field ttv_rec_movto_tit_ap as recid format ">>>>>>9"
field tta_cod_forma_pagto as character format "x(3)" label "Forma Pagamento" column-label "F Pagto"
field tta_val_despes_bcia as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Desp Banc" column-label "Vl Desp Banc"
field ttv_cod_indic_econ_des as character format "x(8)" label "Moeda" column-label "Moeda"
field tta_num_cheque as integer format ">>>>,>>>,>>9" initial ? label "Núm Cheque" column-label "Num Cheque"
field tta_num_talon_cheq as integer format ">>>,>>>,>>9" initial 0 label "Talonário Cheques" column-label "Talonário Cheques"
field tta_val_multa_tit_ap as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Multa" column-label "Valor Multa"
field tta_val_juros as decimal format ">>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Juros" column-label "Valor Juros"
field tta_val_cm_tit_ap as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Val Correção Monet" column-label "Val Corr Monet"
field tta_val_desc_tit_ap as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Desconto" column-label "Vl Desconto"
field tta_val_abat_tit_ap as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Abatimento" column-label "Vl Abatimento"
field ttv_val_multa_apres as decimal format ">>>>,>>>,>>9.99" decimals 2 label "Valor Multa" column-label "Valor Multa"
field ttv_val_juros_apres as decimal format ">>>>,>>>,>>9.99" decimals 2 label "Valor juros" column-label "Valor Juros"
field ttv_val_cm_apres as decimal format ">>>>,>>>,>>9.99" decimals 2 label "Valor Cor Monetaria" column-label "Val Corr Monet"
field ttv_val_desc_apres as decimal format ">>>>,>>>,>>9.99" decimals 2 label "Valor Desconto" column-label "Vl Desconto"
field ttv_val_abat_apres as decimal format ">>>>,>>>,>>9.99" decimals 2 label "Valor Abatimento" column-label "Vl Abatimento"
field tta_des_text_histor as character format "x(2000)" label "Histórico" column-label "Histórico"
field tta_num_bord_ap as integer format ">>>>>9" initial 0 label "Número Borderô" column-label "Borderô"
field tta_des_forma_pagto as character format "x(40)" label "Descr Forma Pagto" column-label "Descr Forma Pagto"
field ttv_rec_tit_ap as recid format ">>>>>>9" initial ?
field ttv_cod_banco as character format "x(8)" label "Banco" column-label "Banco"
field ttv_cod_agenc_bcia as character format "x(10)" label "Agência Bancária" column-label "Agência Bancária"
field ttv_cod_digito_agenc as character format "x(2)" label "Dígito Agência" column-label "Dígito Agência"
field ttv_cod_cta_corren_bco_pagto as character format "x(20)" label "Conta Corrente" column-label "Conta Corrente"
field ttv_cod_digito_cta_corren_pagto as character format "x(2)" label "Dígito Cta Corrente" column-label "Dígito Cta Corrente"
field tta_ind_trans_ap as character format "X(26)" initial "Implantação" label "Transação" column-label "Transação"
field tta_cod_empresa as character format "x(3)" label "Empresa" column-label "Empresa"
field ttv_val_original as decimal format "->>>>>,>>>,>>9.99" decimals 4 initial 0 label "Valor Original" column-label "Valor Original"
field tta_cod_safra as character format "9999/9999" label "Safra" column-label "Safra"
field tta_cod_contrat_graos as character format "x(20)" label "Contrato Grãos" column-label "Contr Grãos"
index tt_estab_un
tta_cod_estab ascending
tta_cod_unid_negoc ascending
index tt_fornecedor
tta_cdn_fornecedor ascending
index tt_id is primary unique
tta_cod_estab ascending
tta_num_id_movto_tit_ap ascending
tta_cod_unid_negoc ascending

...

run pi_criar_tt_relacto_tit_ap_aux in v_handle_apb731za (input table tt_param_relacto_tit_ap,
output table tt_relacto_tit_ap). /*titulos originais relacionado ao pagamento*/

end.


Exemplo Utilização da API 2

...