Árvore de páginas

Versões comparadas

Chave

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

...

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

 

 

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_iniCharacterx(3)Código Espécie InicialSim 
ttv_cod_espec_docto_fimCharacterx(3)Código Espécie FinalSim 
ttv_cdn_cliente_iniInteger>>>,>>>,>>9Cliente inicialSim 
ttv_cdn_cliente_fimInteger>>>,>>>,>>9Cliente finalSim 
ttv_cod_indic_econ_iniCharacterx(8)Moeda InicialSim 
ttv_cod_indic_econ_fimCharacterx(8)Moeda FinalSim 
ttv_cod_portador_ini Characterx(5)Portador InicialSim 
ttv_cod_portador_fim Characterx(5)Portador FinalSim 
ttv_dat_transacao_ini Date99/99/9999Data Transação inicialSim 
ttv_dat_transacao_fimDate99/99/9999Data transação finalSim 
ttv_dat_liquidac_iniDate99/99/9999Data Liquidação inicialSim 
ttv_dat_liquidac_fimDate99/99/9999Data Liquidação finalSim 
ttv_cod_proces_export_ini Characterx(12)Processo Exportaçãosim 
ttv_cod_proces_export_fim Characterx(12)Processo Exportaçãosim 
ttv_log_mostra_liquidac_pagtoLogicalyes/noLiquidação c/ Pagtosim 
ttv_log_mostra_liquidac_antecipLogicalyes/noLiquidação contra ANsim 
ttv_log_mostra_liquidac_estornLogicalyes/noLiquid. EstornadasSim 
ttv_cod_finalid_econCharacterx(10)Finalidade Econômicasim 
ttv_dat_cotac_indic_econDate99/99/9999Data Cotaçãosim 
ttv_log_mostra_normalLogicalyes/noMostra título normalsim 
ttv_log_mostra_antecipLogicalyes/noMostra título Antecipaçãosim 
ttv_log_mostra_prevLogicalyes/noMostra Previsãosim 
ttv_log_mostra_ndebitoLogicalyes/noMostra nota de débitosim 
ttv_log_mostra_cheqLogicalyes/noMostra título de chequesim 
ttv_log_mostra_aviso_dbLogicalyes/noMostra Aviso de débitosim 
ttv_log_mostra_docto_vendorLogicalyes/noVendorsim 
ttv_log_mostra_liquidacLogicalyes/noLiquidaçãosim 
ttv_log_mostra_liquidac_renegocLogicalyes/noRenegociaçãosim 
ttv_log_mostra_liq_enctro_ctaLogicalyes/noLiquidação encontro de contassim 
ttv_log_mostra_perda_dedutLogicalyes/noPerda dedutívelsim 
ttv_log_mostra_transf_estabLogicalyes/noTransferência Estabelecimentosim 
ttv_log_mostra_acerto_val_crLogicalyes/noAcerto Valor a CRsim 
ttv_log_mostra_acerto_val_menorLogicalyes/noAcerto Valor a Menorsim 
ttv_log_mostra_devolLogicalyes/noDevoluçãosim 
ttv_log_mostra_cta_ctblLogicalyes/noMostra Contassim 
ttv_ind_visualiz_tit_acr_vert characterx(20)Visualiza Títulosim 
 ttv_ind_classif_tit_acrCharacterx(8)Classificação títulosim 
ttv_cod_finalid_econ_apresCharacterx(10)Finalidade econômica apresentaçãosim 
ttv_log_mostra_tit_relacLogicalyes/noMostra título relacionadosim 
ttv_log_mostra_ctbzdoLogicalyes/noMostra movimento contabilizadosim 

...

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_rec_tit_

...

acr Recid>>>>>>9Recid do títulosim 
tta_cod_estab_tit_acr_pai

...

characterx(5)

...

Estabelecimento título PaiSim 
tta_num_id_tit_acr_

...

pai Integer9999999999Token título paiSim 

 

def temp-table tt_param_relacto_tit_acr no-undo like tit_acr
field tta_val_relacto_tit_acr 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 Movto" column-label "Hora Geração Movto"
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" 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

>>>>>>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

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

 

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

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

...

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_

...

 

if valid-handle(v_handle_apb731za) then do:

 

run pi_main_con_movtos_pagto_period in v_handle_apb731za(input table mostra_liquidac = yes
tt_param_api_con_liquid_Acr.ttv_log_mostra_liquidac_renegoc = yes
tt_param_api_con_pagtos_apb,

 

output table tt_pagtos_periodo,
output table tt_erro_msg).

 

create tt_param_relacto_tit_ap.

 

assign tt_param_relacto_tit_ap.tta_cod_estab = tt_pagtos_periodo.tta_cod_estab 

 

tt_param_relacto_tit_ap.tta_cod_ser_docto = tt_pagtos_periodo.tta_cod_ser_docto
tt_param_relacto_tit_ap.tta_cod_espec_docto = tt_pagtos_periodo.tta_cod_espec_docto
tt_param_relacto_tit_ap.tta_cdn_fornecedor = tt_pagtos_periodo.tta_cdn_fornecedor
tt_param_relacto_tit_ap.tta_cod_tit_ap = tt_pagtos_periodo.tta_cod_tit_ap
tt_param_relacto_tit_ap.tta_cod_parcela = tt_pagtos_periodo.tta_cod_parcela
tt_param_relacto_tit_ap.ttv_log_mostra_impto_retid = no
tt_param_relacto_tit_ap.ttv_log_pagto_cartcred = yes 
tt_param_relacto_tit_ap.ttv_log_pagto_bxsb = yes
tt_param_relacto_tit_ap.ttv_log_an_relacto = no.

 

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*/

Assunto

Produto:

 

Versões:

 

Ocorrência:

 

Ambiente:

 

Passo a passo:

 

Observações:

 

 

 

_liquid_Acr.ttv_log_mostra_liq_enctro_cta = no
tt_param_api_con_liquid_Acr.ttv_log_mostra_perda_dedut = no
tt_param_api_con_liquid_Acr.ttv_log_mostra_transf_estab = yes
tt_param_api_con_liquid_Acr.ttv_log_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 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) /*pi_main_con_movtos_pagto_period_1*/.ttv_cod_portador_fimCharacterx(5)Portador FinalSim