Documento de API

Produto:	Datasul
Ocorrência:	Documentação de API
Nome Físico	prgfin/acr/acr262za

Objetivo

Retorna os movimentos de liquidações de títulos por período, a apropriação contábil e o título original relacionado a cada movimento.

...

run prgfin/acr/acr262za.r persistent persistent set v_handle_acr262za.
Utilizar o procedimento principal para execução da api, run pi_main_con_movtos_liquid_period.

Tabelas Temporárias

...

Tabela Temporária

...

Descrição

...

Entrada/Saída

_2 in v_handle_acr262za (Input 1,
INPUT TABLE tt_param_api_con_liquid_Acr,
OUTPUT TABLE tt_tit_acr_liquid_un,
OUTPUT TABLE tt_param_relacto_tit_acr,
OUTPUT TABLE tt_aprop_ctbl_acr,
OUTPUT TABLE tt_erro_msg) .

Utilizar o procedimento principal para execução da api, pi_main_con_movtos_liquid_period_2.

Tabelas Temporárias

Tabela Temporária	Descrição	Entrada/Saída
tt_param_api_con_liquid_Acr	Parâmetros se seleção para a consulta de movimentos de liquidação por período	Entrada

Parâmetros se seleção para a consulta de movimentos de liquidação por período

Entrada

Atributo

Tipo

Formato

Descrição

Obrig.

Evol.

ttv_log_pagto_cheq

Logical

yes/no

Pagamento Cheque

Sim

ttv_log_cta_ctbl

Character

X(40)

Valor do Parâmetro

Sim

ttv_log_con_cta_ctbl

Logical

yes/no

Consulta conta contábil

Sim

ttv_log_pagto_bordLogicalyes/noPagamento BorderôSim ttv_log_pagto_especLogicalyes/noPagamento dinheiroSim ttv_log_pagto_escrit Logicalyes/noPagamento EscrituralSim ttv_cod_estab_iniCharacterX(5)Estabelecimento InicialSim ttv_cod_estab_fimCharacterx(5)Estabelecimento finalSim ttv_cod_refer_iniCharacterx(10)Referencia InicialSim ttv_cod_refer_fimCharacterx(10)Referencia FinalSim ttv_log_mostra_docto_apbLogicalyes/noPagamento Extra Fornecedor CRSim ttv_log_mostra_pagto_estordoLogicalyes/noPagamento EstornadoSim ttv_log_mostra_docto_apb_pef Logicalyes/noPagamento Extra FornecedorSim ttv_log_mostra_docto_apb_enctroLogicalyes/noPagamento Encontro de ContasSim ttv_log_pagto_cartcredLogicalyes/noPagamento Cartão CréditoSim ttv_dat_pagto_inicialDate99/99/9999Data Pagamento InicialSim ttv_dat_pagto_finalDate99/99/9999Data Pagamento FinalSim

Atributo	Tipo	Formato	Descrição	Obrig.	Evol.
ttv_cod_estab_ini	Character	x(5)	Estabelecimento inicial	Sim
ttv_cod_estab_fim	Character	x(5)	Estabelecimento final	Sim

ttv_cod_espec_docto_ini

Character

x(3)

Código Espécie Inicial

Sim


ttv_cod_espec_docto_fim	Character	x(3)	Código Espécie Final	Sim

ttv_cdn_

fornecedor

cliente_ini

Integer

>>>,>>>,>>9

Código Fornecedor Inicial

Cliente inicial

Sim

ttv_cdn_

fornecedor

cliente_fim

Integer

>>>,>>>,

>>9Código Fornecedor

>>9	Cliente final	Sim
ttv_cod_indic_econ_ini	Character	x(8)	Moeda Inicial	Sim
ttv_cod_indic_econ_fim	Character	x(8)	Moeda Final	Sim


ttv_cod_portador_ini	Character	x(5)

Código

Portador Inicial

Sim

ttv_cod_portador_

fim

Character

x(5)

Código Fornecedor

Portador Final

Sim


ttv_dat_transacao_ini	Date	99/99/9999	Data Transação inicial	Sim
ttv_dat_transacao_fim	Date	99/99/9999	Data transação final	Sim
ttv_dat_liquidac_ini	Date	99/99/9999	Data Liquidação inicial	Sim
ttv_dat_liquidac_fim	Date	99/99/9999	Data Liquidação final	Sim
ttv_cod_proces_export_ini

ttv_cod_indic_econ_iniCharacterx(8)Indicador Econômico InicialSim ttv_cod_indic_econ_fim

Character

x(

8

12)

Indicador Econômico FinalSim

Processo Exportação	sim
ttv_cod_

forma

proces_

pagto

export_

ini

fim

Character

x(

3

12)

Forma de Pagamento InicialSim

Processo Exportação	sim
ttv_log_mostra_liquidac_pagto	Logical	yes/no	Liquidação c/ Pagto	sim
ttv_log_mostra_liquidac_antecip	Logical	yes/no	Liquidação contra AN	sim
ttv_log_mostra_liquidac_estorn	Logical	yes/no	Liquid. Estornadas	Sim
ttv_cod_finalid_econ	Character	x(10)	Finalidade Econômica	sim
ttv_dat_cotac_indic_econ	Date	99/99/9999	Data Cotação	sim
ttv_log_mostra_normal

ttv_cod_forma_pagto_fimCharacterx(3)Forma de Pagamento FinalSim ttv_cod_grp_fornec_iniCharacterx(4)Grupo de Fornecedor InicialSim ttv_cod_grp_fornec_fimCharacterx(4)Grupo de Fornecedor FinalSim ttv_log_pagto_venctoLogicalyes/noPagamento no VencimentoSim ttv_log_pagto_antecipLogicalyes/noPagamento AntecipadoSim ttv_log_pagto_atraso

Logical

yes/no

Pagamento AtrasoSim

Mostra título normal	sim
ttv_log_mostra_

docto_apb_normal

antecip

Logical

yes/no

Mostra

documentos do Tipo Normal

título Antecipação

sim

Sim


ttv_log_mostra_

docto_apb_antecip

yes/no

Mostra

Títulos do tipo antecipação

Previsão	sim
ttv

Sim ttv

_log_mostra_

impto_retid

ndebito

Logical

yes/no

Mostra

títulos

nota de

imposto retido

débito

Sim

sim

ttv_log_mostra_

impto_taxado

cheq

Logical

yes/no

Mostra

títulos

título de

imposto taxado

cheque

Sim

sim

ttv_

ind

log_

visualiz

mostra_

tit

aviso_

ap_vert

db

Characterx(20)

Visualização de títulos:

Por Estabelecimento/Por Unidade Negócio

Sim ttv_cod_unid_negoc_iniCharacterx(3)Código Unidade Negócio IncialSim ttv_cod_unid_negoc_fimCharacterx(3)Código Unidade Negócio FinalSim ttv_ind_classif_pagto_periodCharacterx(55)

Classificação de títulos:

Por Estabelecimento/Fornecedor/Data Pagamento

Sim ttv_ind_dwb_run_modeCharacterx(7)Modo de Execução: On-line/BatchSim ttv_cod_finalid_econCharacterx(10)Finalidade EconômicaSim

def temp-table tt_param_api_con_liquid_Acr no-undo

Logical	yes/no	Mostra Aviso de débito	sim
ttv_log_mostra_docto_vendor	Logical	yes/no	Vendor	sim
ttv_log_mostra_liquidac	Logical	yes/no	Liquidação	sim
ttv_log_mostra_liquidac_renegoc	Logical	yes/no	Renegociação	sim
ttv_log_mostra_liq_enctro_cta	Logical	yes/no	Liquidação encontro de contas	sim
ttv_log_mostra_perda_dedut	Logical	yes/no	Perda dedutível	sim
ttv_log_mostra_transf_estab	Logical	yes/no	Transferência Estabelecimento	sim
ttv_log_mostra_acerto_val_cr	Logical	yes/no	Acerto Valor a CR	sim
ttv_log_mostra_acerto_val_menor	Logical	yes/no	Acerto Valor a Menor	sim
ttv_log_mostra_devol	Logical	yes/no	Devolução	sim
ttv_log_mostra_cta_ctbl	Logical	yes/no	Mostra Contas	sim
ttv_ind_visualiz_tit_acr_vert	character	x(20)	Visualiza Título	sim
ttv_ind_classif_tit_acr	Character	x(8)	Classificação título	sim
ttv_cod_finalid_econ_apres	Character	x(10)	Finalidade econômica apresentação	sim
ttv_log_mostra_tit_relac	Logical	yes/no	Mostra título relacionado	sim
ttv_log_mostra_ctbzdo	Logical	yes/no	Mostra movimento contabilizado	sim

def temp-table tt_param_api_con_liquid_Acr no-undo

field ttv_cod_estabfield ttv_cod_estab_ini as character format "x(3)" label "Estabelecimento" column-label "Estab Inicial"
field ttv_cod_estab_fim as character format "x(3)" label "até" column-label "Estab Final"
field ttv_cod_espec_inic as character format "x(3)" label "Espécie Inicial"
field ttv_cod_espec_fim as character format "x(3)" label "até"
field ttv_cdn_cliente_ini as Integer format ">>>,>>>,>>9" initial 0 label "Cliente" column-label "Cliente Inicial"
field ttv_cdn_cliente_fim as Integer format ">>>,>>>,>>9" initial 0 label "até" column-label "Cliente Final"
field ttv_cod_indic_econ_ini as character format "x(8)" label "Moeda" column-label "Inicial"
field ttv_cod_indic_econ_fim as character format "x(8)" label "até" column-label "Final"
field ttv_cod_portador_ini as character format "x(5)" label "PortadorEstabelecimento" column-label "Portador Estab Inicial"
field ttv_cod_portadorestab_fim as character format "x(5)" label "até" column-label "Portador Final"
field ttv_dat_transacao_ini as date format "99/99/9999" initial today label "Data Transação" column-label "Data Transação"
field ttv_dat_transacao_fim as date format "99/99/9999" initial today (5)" label "até" column-label "Estab Final"
field ttv_datcod_liquidacespec_inic as date character format "99/99/9999" label "Data de Liquidação" column-label "Liquidaçãox(3)" label "Espécie Inicial"
field ttv_cod_espec_fim as character format "x(3)" label "até"
field ttv_datcdn_liquidaccliente_fim ini as date format "99/99/9999" label "atéInteger format ">>>,>>>,>>9" initial 0 label "Cliente" column-label "Cliente Inicial"
field ttv_codcdn_procescliente_export_ini fim as character Integer format "x(12)" label "Processo Exportação>>>,>>>,>>9" initial 0 label "até" column-label "Proc Exp InicialCliente Final"
field ttv_cod_procesindic_exportecon_fim ini as character format "x(128)" label "atéMoeda" column-label "Proc Exp FinalInicial"
field ttv_logcod_mostraindic_liquidacecon_pagto fim as logical format "Sim/Não" initial no label "Liquidação c/ Pagto"
field ttv_log_mostra_liquidac_antecip as logical format "Sim/Não" initial no label "Liquidação contra ANcharacter format "x(8)" label "até" column-label "Final"
field ttv_logcod_mostraportador_liquidac_estorn ini as logical character format "Sim/Não" initial no label "Liquid. Estornadas"x(5)" label "Portador" column-label "Portador Inicial"
field ttv_cod_finalidportador_econ fim as character format "x(105)" label "Finalidade Econômicaaté" column-label "Finalidade EconômicaPortador Final"
field ttv_dat_cotactransacao_indic_econ ini as date format "99/99/9999" initial today label "Data CotaçãoTransação" column-label "Data CotaçãoTransação"
field ttv_logdat_mostratransacao_normal fim as logical format "Sim/Não" initial yes label "Normaldate format "99/99/9999" initial today label "até" column-label "Final"
field ttv_logdat_mostraliquidac_antecip inic as logical date format "Sim99/99/Não9999" initial no label "AntecipaçãoData de Liquidação" column-label "AntecipaçãoLiquidação"
field ttv_logdat_mostraliquidac_prev fim as logical date format "Sim99/99/Não9999" initial no label "Previsãoaté"
field ttv_cod_logproces_mostraexport_ndebito ini as logical format "Sim/Não" initial no label "Nota de Débitocharacter format "x(12)" label "Processo Exportação" column-label "Proc Exp Inicial"
field ttv_logcod_proces_mostraexport_cheq fim as logical character format "Sim/Não" initial yes x(12)" label "Chequeaté" column-label "ChequeProc Exp Final"
field ttv_log_mostra_avisoliquidac_db pagto as logical format "Sim/Não" initial yes no label "Aviso Débito" column-label "Aviso Débito"Liquidação c/ Pagto"
field ttv_log_mostra_doctoliquidac_vendor antecip as logical format "Sim/Não" initial yes no label "Vendor" column-label "VendorLiquidação contra AN"
field ttv_log_mostra_liquidac_estorn as logical format "Sim/Não" initial yes no label "LiquidaçãoLiquid. Estornadas"
field ttv_logcod_mostrafinalid_liquidac_renegoc econ as logical character format "Sim/Não" initial no label "Liquid Renegociaçãox(10)" label "Finalidade Econômica" column-label "Finalidade Econômica"
field ttv_logdat_mostracotac_liqindic_enctro_cta econ as logical date format "Sim99/99/Não9999" initial yes today label "Liq Encontro CtasData Cotação" column-label "Liq Encontro CtasData Cotação"
field ttv_log_mostra_perda_dedut normal as logical format "Sim/Não" initial no yes label "Liquid Perda Dedut" column-label "Liquid Perda DedutNormal"
field ttv_log_mostra_transf_estab antecip as logical format "Sim/Não" initial no label "Antecipação" column-label "Transf EstabelecAntecipação"
field ttv_log_mostra_acerto_val_cr prev as logical format "Sim/Não" initial no label "Acerto Valor a CRPrevisão"
field ttv_log_mostra_acerto_val_menor ndebito as logical format "Sim/Não" initial no label "Acerto Valor a MenorNota de Débito"
field ttv_log_mostra_devol cheq as logical format "Sim/Não" initial no yes label "Cheque" column-label "DevoluçãoCheque"
field ttv_log_mostra_ctaaviso_ctbl db as logical format "Sim/Não" initial yes label "Aviso Débito" column-label "Mostra ContasAviso Débito"
field ttv_indlog_visualizmostra_titdocto_acr_vert vendor as character logical format "X(20)Sim/Não" initial "Por Estabelecimento" yes label "Visualiza TítuloVendor" column-label "Visualiza TítuloVendor"
field ttv_indlog_classifmostra_tit_acr liquidac as character logical format "X(08)"Sim/Não" initial yes label "Liquidação"
field ttv_codlog_finalidmostra_econliquidac_apres renegoc as character logical format "x(10)Sim/Não" initial "Corrente" no label "Finalid Apresentação" column-label "Finalid ApresentaçãoLiquid Renegociação"
field ttv_log_mostra_titliq_enctro_relac cta as logical format "Sim/Não" initial yes label "Liq Encontro Ctas" column-label "Título relacionadoLiq Encontro Ctas"
field ttv_log_mostra_ctbzdo perda_dedut as logical format "Sim/Não" initial no .

Tabela Temporária	Descrição	Entrada/Saída
tt_tit_acr_liquid_un	Movimentos de liquidação por Periodo e unidade de negócio	Saída

label "Liquid Perda Dedut" column-label "Liquid Perda Dedut"
field ttv_log_mostra_transf_estab as logical format "Sim/Não" initial no label "Transf Estabelec"
field ttv_log_mostra_acerto_val_cr as logical format "Sim/Não" initial no label "Acerto Valor a CR"
field ttv_log_mostra_acerto_val_menor as logical format "Sim/Não" initial no label "Acerto Valor a Menor"
field ttv_log_mostra_devol as logical format "Sim/Não" initial no label "Devolução"
field ttv_log_mostra_cta_ctbl as logical format "Sim/Não" initial yes label "Mostra Contas"
field ttv_ind_visualiz_tit_acr_vert as character format "X(20)" initial "Por Estabelecimento" label "Visualiza Título" column-label "Visualiza Título"
field ttv_ind_classif_tit_acr as character format "X(08)"
field ttv_cod_finalid_econ_apres as character format "x(10)" initial "Corrente" label "Finalid Apresentação" column-label "Finalid Apresentação"
field ttv_log_mostra_tit_relac as logical format "Sim/Não" initial yes label "Título relacionado"
field ttv_log_mostra_ctbzdo as logical format "Sim/Não" initial no.

Tabela Temporária	Descrição	Entrada/Saída
tt_tit_acr_liquid_un	Movimentos de liquidação por Periodo e unidade de negócio	Saída

Atributo	Tipo	Formato	Descrição	Obrig.	Evol.
tta_cod_empresa

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_negoc

Character

x(3)

Unid Negócio

Empresa

Sim


tta_cod_

indic_econ

estab

Character

x(

8

5)

Moeda

Estabelecimento

Sim

ttv

tta_

val

cod_

pagto

ser_

apb

docto

Decimal->>,>>>,>>>,>>9.99

Character

x(5)

Série documento

Valor Pagamentottv

Sim

tta_

val

cod_

finalid

tit_

apres

acr

Decimal->>,>>>,>>>,>>9.99

Character

x(16)

Título

Valor Finalid Apresttv

Sim

tta_cod_

dwb

espec_

field_apb

docto

Character

x(

32

3)

Campottv

Espécie Documento

Sim

tta_

rec_compl_movto_pagtoInteger>>>>>>9RECID Compl_movto_pagtoSim

cod_parcela	Character	x(02)	Parcela	Sim
tta_cdn_cliente	Integer	>>>,>>>,>>9	Cliente	Sim
tta_ind_trans_acr_abrev

tta_cod_contrat_cartcredCharacterx(10)Contrato CartãoSim tta_cod_portad_cartcred

Character

x(

10

04)

Portador Cartãottv

Trans Abrev

Sim

tta_

rec

log_movto_

tit_ap

estordo

Integer

Logical

>>>>>>9

Yes/No

Movimento estornado

Recid movto_tit_ap

Sim

tta_log_

cod

liquidac_

forma

contra_

pagto

antecip

Characterx(3)Forma PagamentoSim

Logical

yes/no

Liquidação contra AN

Sim


tta_val_movto_

despes

tit_

bcia

acr

Decimal

->>>,>>>,>>9.99

Valor

Despesa Bancáriattv

Movimento

Sim

tta_

cod_indic_econ_desCharacterx(8)

dat_transacao

Date

99/99/9999

Data Transação

Moeda

Sim

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

dat_cr_movto_tit_acr	Date	99/99/9999	Crédito	Sim
ttv_row_movto_tit_acr	Rowid		Rowid Movimento	Sim
tta_num_id_movto_tit_acr	Integer	"999999999"	Token Movto Tit ACR	Sim
tta_nom_abrev	Character	x(15)	Nome Abreviado	Sim
tta_nom_pessoa	Character	x(40)	Nome	Sim
tta_cod_indic_econ	Character	x(8)	Moeda	Sim
tta_ind_espec_docto	Character	x(8)	Espécie Documento	Sim
tta_dat_liquidac_tit_acr	Date	99/99/9999	Liquidação	Sim
tta_dat_vencto_tit_acr	Date	99/99/9999	Data de vencimento	Sim
tta_val_desconto	decimal	->>>

>>>>

,>>>,>>9.99

Valor

Correção Monetáriattv

de desconto

Sim

tta_val_abat_

desc

tit_

apres

acr

Decimal

>>>>

->>>,>>>,>>9.99

Valor

Descontottv

abatimento

Sim

tta_val_

abat_apres

juros

Decimal

>>>>

->>>,>>>,>>9.99

Valor

Abatimento

Juros

Sim

tta_

des

val_

text_historCharacterx(2000)HistóricoSim

multa_tit_acr	Decimal	->>>,>>>,>>9.99	Valor multa	Sim
ttv_cod_proces_export	character	x(12)	Processo Exportação	Sim
tta_cod_unid_negoc	Character	x(3)	Unidade Negócio	sim
tta_cod_tip_fluxo_financ	Character	x(12)	Tipo Fluxo Financeiro	Sim
tta_cod_finalid_econ

tta_num_bord_ap Integer>>>>>9Número BorderôSim tta_des_forma_pagtoCharacterx(40)Descrição Forma PagamentoSim ttv_rec_tit_apInteger>>>>>>9Recid tit_apSim ttv_cod_bancoCharacterx(8)BancoSim ttv_cod_agenc_bcia

Character

x(10)

Agência Bancária

	Finalidade econômica	Sim
tta_num_id_tit_acr	Integer	999999999	Token Cta Receber	Sim

...

def temp-table tt_tit_acr_liquid_un no-undo
field tta_cod_empresa as character format "x(3)" label "Empresa" column-label "Empresa"
field tta_cod_estab as Character format "x(5)" label "Estabelecimento" column-label "Estab"
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_espec_docto as character format "x(3)" label "Espécie Documento" column-label "Espécie"
field tta_cod_parcela as character format "x(02)" label "Parcela" column-label "Parcela"
field tta_cdn_cliente as Integer format ">>>,>>>,>>9" initial 0 label "Cliente" column-label "Cliente"
field tta_ind_trans_acr_abrev as character format "X(04)" label "Trans Abrev" column-label "Trans Abrev"
field tta_log_movto_estordo as logical format "Sim/Não" initial no label "Estornado" column-label "Estornado"
field tta_log_liquidac_contra_antecip as logical format "Sim/Não" initial no label "Liquidac AN" column-label "Liquidac AN"
field tta_val_movto_tit_acr as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Movimento" column-label "Vl Movimento"
field tta_dat_transacao as date format "99/99/9999" initial today label "Data Transação" column-label "Dat Transac"
field tta_dat_cr_movto_tit_acr as date format "99/99/9999" initial ? label "Crédito" column-label "Crédito"
field ttv_row_movto_tit_acr as Rowid
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_nom_abrev as character format "x(15)" label "Nome Abreviado" column-label "Nome Abreviado"
field tta_nom_pessoa as character format "x(40)" label "Nome" column-label "Nome"
field tta_cod_indic_econ as character format "x(8)" label "Moeda" column-label "Moeda"
field tta_ind_espec_docto as character format "X(08)" label "Espécie Documento" column-label "Espécie Documento"
field tta_dat_liquidac_tit_acr

def temp-table tt_tit_acr_liquid_un no-undo
field tta_cod_empresa as character format "x(3)" label "Empresa" column-label "Empresa"
field tta_cod_estab as Character format "x(5)" label "Estabelecimento" column-label "Estab"
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_espec_docto as character format "x(3)" label "Espécie Documento" column-label "Espécie"
field tta_cod_parcela as character format "x(02)" label "Parcela" column-label "Parcela"
field tta_cdn_cliente as Integer format ">>>,>>>,>>9" initial 0 label "Cliente" column-label "Cliente"
field tta_ind_trans_acr_abrev as character format "X(04)" label "Trans Abrev" column-label "Trans Abrev"
field tta_log_movto_estordo as logical format "Sim/Não" initial no label "Estornado" column-label "Estornado"
field tta_log_liquidac_contra_antecip as logical format "Sim/Não" initial no label "Liquidac AN" column-label "Liquidac AN"
field tta_val_movto_tit_acr as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Movimento" column-label "Vl Movimento"
field tta_dat_transacao as date format "99/99/9999" initial today label "Data Transação" column-label "Dat Transac"
field tta_dat_cr_movto_tit_acr as date format "99/99/9999" initial ? label "CréditoLiquidação" column-label "CréditoLiquidação"
field ttv_rec_movto_tit_acr as recid format ">>>>>>9"
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_nom_abrev as character format "x(15)" label "Nome Abreviado field tta_dat_vencto_tit_acr as date format "99/99/9999" initial ? label "Vencimento" column-label "Nome AbreviadoVencimento"
field tta_nom_pessoa as character format "x(40)" label "Nomeval_desconto as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Desconto" column-label "NomeValor Desconto"
field tta_val_codabat_indic_econ as character format "x(8)" label "Moedatit_acr as decimal format ">>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Abatimento" column-label "MoedaVl Abatimento"
field tta_ind_espec_docto as character format "X(08)" label "Espécie Documentoval_juros as decimal format ">>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Juros" column-label "Espécie DocumentoValor Juros"
field tta_datval_liquidacmulta_tit_acr as date format "99/99/9999" initial ? label "Liquidação_acr as decimal format ">>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Multa" column-label "LiquidaçãoVl Multa"
field ttattv_datcod_vencto_tit_acr as date format "99/99/9999" initial ? label "Vencimentoproces_export as character format "x(12)" label "Processo Exportação" column-label "VencimentoProcesso Exportação"
field tta_val_desconto as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Descontocod_unid_negoc as character format "x(3)" label "Unid Negócio" column-label "Valor DescontoUn Neg"
field tta_valcod_abattip_tit_acr as decimal format ">>>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Abatimentofluxo_financ as character format "x(12)" label "Tipo Fluxo Financ" column-label "Vl AbatimentoTipo Fluxo Financ"
field tta_val_juros as decimal format ">>>>,>>>,>>9.99" decimals 2 initial 0 label "Valor Juroscod_finalid_econ as character format "x(10)" label "Finalidade" column-label "Valor JurosFinalidade"
field tta_valnum_multaid_tit_acr as decimal format ">>>>,>>>,>>9.99" decimals 2 as integer format "999999999" initial 0 label "Vl MultaToken Cta Receber" column-label "Vl Multa"
field ttv_cod_proces_export as character format "x(12)" label "Processo Exportação" column-label "Processo Exportação"
field tta_cod_unid_negoc as character format "x(3)" label "Unid Negócio" column-label "Un Neg"
field tta_cod_tip_fluxo_financ as character format "x(12)" label "Tipo Fluxo Financ" column-label "Tipo Fluxo Financ"
field tta_cod_finalid_econ as character format "x(10)" label "Finalidade" column-label "Finalidade"
field tta_num_id_tit_acr as integer format "999999999" initial 0 label "Token Cta Receber" column-label "Token Cta Receber"
index tt_estab_un
tta_cod_estab ascending
tta_cod_unid_negoc ascending
index tt_id is primary unique
tta_cod_estab ascending
tta_num_id_movto_tit_acr ascending
tta_cod_finalid_econ ascending
tta_cod_unid_negoc ascending
.

Tabela Temporária	Descrição	Entrada/Saída
tt_aprop_ctbl_acr	Apropriação Contábil	Saída

def temp-table tt_aprop_ctbl_acr no-undo like aprop_ctbl_acr
.

Tabela Temporária	Descrição	Entrada/Saída
tt_param_relacto_tit_acr	Títulos relacionados	Saída

Token Cta Receber"
index tt_estab_un
tta_cod_estab ascending
tta_cod_unid_negoc ascending
index tt_id is primary unique
tta_cod_estab ascending
tta_num_id_movto_tit_acr ascending
tta_cod_finalid_econ ascending
tta_cod_unid_negoc ascending
.

Tabela Temporária	Descrição	Entrada/Saída
tt_aprop_ctbl_acr	Apropriação Contábil	Saída

def temp-table tt_aprop_ctbl_acr no-undo like aprop_ctbl_acr
.

Tabela Temporária	Descrição	Entrada/Saída
tt_param_relacto_tit_acr	Títulos relacionados	Saída

Atributo	Tipo	Formato	Descrição	Obrig.	Evol.
tta_val_relacto_tit_acr	Decimal	->>>,>>>,>>9.99	Valor relacionado	Sim
tta_dat_gerac_movto	Date	99/99/9999	Data geração movimento	Sim
tta_hra_gerac_movto	Character	99:99:99	Hora geração	Sim
ttv_row_tit_acr	Rowid		Rowid do título	sim
tta_cod_estab_tit_acr_pai	character	x(5)	Estabelecimento título Pai	Sim
tta_num_id_tit_acr_pai	Integer	9999999999	Token título pai	Sim

...

def temp-table tt_param_relacto_tit_acr no-undo like tit_acr
field tta_val_relacto_tit_acr as as decimal format "->>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Relacto" column-label "Vl Relacto"
field tta_dat_gerac_movto as date format "99/99/9999" initial ? label "Data Geração Movto" column-label "Data Geração Movto"
field tta_hra_gerac_movto as Character format "99:99:99" label "Hora Geração Movto99" decimals 2 initial 0 label "Vl Relacto" column-label "Hora Geração MovtoVl Relacto"
field ttv_rec_tit_acr as recid format ">>>>>>9"
field tta_cod_estab_tit_acr_pai as Character format "x(5)" label "Estab Tit Pai field tta_dat_gerac_movto as date format "99/99/9999" initial ? label "Data Geração Movto" column-label "Estab Tit PaiData Geração Movto"
field tta_num_id_tithra_acr_pai as integer format "9999999999" initial 0 label "Token" column-label "Token"
.

Tabela Temporária	Descrição	Entrada/Saída
tt_erro_msg	Mensagens de erro	Saída

Atributo	Tipo	Formato	Descrição	Obrig.	Evol.
ttv_num_msg_erro	Integer	>>>>>>9	Mensagem	Sim
ttv_des_msg_erro	Character	X(40)	Mensagem Erro	Sim
ttv_des_help_erro	Character	x(200)	Descrição Ajuda Erro	Sim

...

gerac_movto as Character format "99:99:99" label "Hora Geração Movto" column-label "Hora Geração Movto"
field ttv_row_tit_acr as Rowid
field tta_cod_estab_tit_acr_pai as character format "x(5)" label "Estab Tit Pai" column-label "Estab Tit Pai"
field tta_num_id_tit_acr_pai as integer format "9999999999" initial 0 label "Token" column-label "Token"
.

Tabela Temporária	Descrição	Entrada/Saída
tt_erro_msg	Mensagens de erro	Saída

Atributo	Tipo	Formato	Descrição	Obrig.	Evol.
ttv_num_msg_erro

...

Integer

Exemplo de utilização da API

run prgfin/apb/apb431za.p persistent set v_handle_apb731za

create tt_param_api_con_pagtos_apb.

assign tt_param_api_con_pagtos_apb.ttv_log_pagto_cheq = yes

...

>>>>>>9	Mensagem	Sim
ttv_des_msg_erro	Character	X(40)	Mensagem Erro	Sim
ttv_des_help_erro	Character	x(200)	Descrição Ajuda Erro	Sim

def temp-table tt_erro_msg no-undo
field ttv_num_msg_erro as integer format ">>>>>>9" label "Mensagem" column-label "Mensagem"
field ttv_des_msg_erro as character format "x(60)" label "Mensagem Erro" column-label "Inconsistência"
field ttv_des_help_erro as character format "x(200)"
index tt_num_erro
ttv_num_msg_erro ascending
.

Exemplo de utilização da API

def var v_handle_acr262za as handle no-undo.

for each tt_tit_acr_liquid_un:
delete tt_tit_acr_liquid_un.
end.
for each tt_param_relacto_tit_acr:
delete tt_param_relacto_tit_acr.
end.
for each tt_aprop_ctbl_acr:
delete tt_aprop_ctbl_acr.
end.

create

...

tt_param_api_con_

...

liquid_

...

Acr.
assign tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

cod_

...

estab_

...

ini =

...

''
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

cod_

...

estab_

...

fim = 'ZZZZZ'
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

cod_

...

espec_inic = ''
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

cod_

...

espec_fim = 'ZZ'
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

cdn_

...

cliente_

...

ini =

...

0
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

cdn_

...

cliente_

...

fim = 99999999
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

cod_indic_

...

econ_

...

ini = ''
tt_param_api_con_

...

liquid_

...

Acr.ttv_cod_

...

indic_

...

econ_fim = '

...

ZZZZZ'
tt_param_api_con_

...

liquid_

...

Acr.ttv_cod_

...

portador_

...

ini =

...

''
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

cod_

...

portador_fim =

...

'ZZZZZZZZZ'
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

dat_

...

transacao_ini =

...

03/01/2016
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

dat_

...

transacao_fim =

...

03/31/2016
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

dat_

...

liquidac_

...

inic = 03/01/2016
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

dat_

...

liquidac_

...

fim = 03/31/2016
tt_param_api_con_

...

liquid_

...

Acr.ttv_cod_

...

proces_

...

export_

...

ini = ''
tt_param_api_con_

...

liquid_

...

Acr.ttv_cod_

...

proces_

...

export_

...

fim = 'ZZZZZZZZZZZ'
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

log_mostra_

...

liquidac_pagto

...

=

...

yes
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

log_

...

mostra_

...

liquidac_

...

antecip =

...

yes
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

log_

...

mostra_

...

liquidac_

...

estorn =

...

no
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

cod_

...

finalid_

...

econ =

...

'Corrente'
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

dat_cotac_

...

indic_

...

econ = 08/26/2016
tt_param_api_con_

...

liquid_

...

Acr.ttv_log_

...

mostra_

...

normal = yes
tt_param_api_con_

...

liquid_

...

Acr.ttv_log_mostra

...

_

...

antecip = yes
tt_param_api_con_

...

liquid_

...

Acr.ttv_log_mostra_

...

prev = no
tt_param_api_con_

...

liquid_

...

Acr.ttv_log_mostra_

...

ndebito = no
tt_param_api_con_

...

liquid_

...

Acr.ttv_log_mostra_

...

cheq =

...

yes
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

log_

...

mostra_

...

aviso_

...

db = no
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

log_

...

mostra_

...

docto_

...

vendor =

...

no
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

log_

...

mostra_

...

liquidac = yes
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

log_

...

mostra_

...

liquidac_

...

renegoc = yes
tt_param_api_con_

...

liquid_

...

Acr.ttv_

...

log_

...

mostra_

...

if valid-handle(v_handle_apb731za) then do:

run pi_main_con_movtos_pagto_period in v_handle_apb731za(input table liq_enctro_cta = no
tt_param_api_con_pagtos_apb,

output table tt_pagtos_periodo,
output table tt_erro_msg).

create liquid_Acr.ttv_log_mostra_perda_dedut = no
tt_param_relactoapi_con_titliquid_ap.

assign Acr.ttv_log_mostra_transf_estab = yes
tt_param_api_relactocon_titliquid_apAcr.ttattv_codlog_estab = tt_pagtos_periodo.tta_cod_estab

mostra_acerto_val_cr = no
tt_param_

...

api_con_

...

liquid_

...

Acr.ttv_log_mostra_acerto_val_menor = no
tt_param_api_con_liquid_Acr.ttv_log_mostra_devol = no
tt_param_

...

api_con_

...

liquid_

...

Acr.

...

ttv_log_

...

mostra_

...

cta_

...

ctbl = yes
tt_param_api_

...

con_

...

liquid_

...

Acr.

...

ttv_

...

ind_

...

visualiz_

...

tit_

...

acr_vert = ''
tt_param_

...

api_con_

...

liquid_

...

Acr.

...

ttv_ind_

...

classif_tit_

...

acr = ''
tt

...

_param_api_con_liquid_Acr.ttv_cod_

...

finalid_econ_apres = 'corrente'
tt_param

...

_api_con_liquid_Acr.ttv_log_mostra_tit_relac = no
tt_param_

...

api_con_

...

liquid_

...

Acr.ttv_log_mostra_

...

ctbzdo = no

...

/*mostra apenas os movimentos cntabilizados */.

run prgfin/acr/acr262za.r persistent set v_handle_acr262za /* prg_fnc_recuperar_variaveis_globais*/.

if valid-handle(v_handle_acr262za) then do:
run pi_main_con_movtos_liquid_period_2 in v_handle_acr262za (Input 1,
Input table tt_param_api_con_liquid_Acr,
output table tt_tit_acr_liquid_un,
output

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

Assunto

Produto:
Versões:
Ocorrência:
Ambiente:
Passo a passo:
Observações:

aprop_ctbl_acr,
output table tt_erro_msg) /*pi_main_con_movtos_pagto_period_1*/.

Árvore de páginas

Versões comparadas

Versão antiga 4

Nova versão Atual

Chave

Documento de API

Tabelas Temporárias

Tabelas Temporárias

run prgfin/apb/apb431za.p persistent set v_handle_apb731za

Assunto

Árvore de páginas

Histórico da Página

Versões comparadas

Versão antiga 4

Nova versão Atual

Chave

Documento de API

Tabelas Temporárias

Tabelas Temporárias

run prgfin/apb/apb431za.p persistent set v_handle_apb731za

Assunto