Histórico da Página
...
tt_tit_acr_info: Caso ocorra ajuste relacionado ao imposto PIS/COFINS/CSLL, retorna os dados dos títulos alterados.
tt_params_generic_api: temp-table genérica de input de parâmetros diversos utilizada para que não se precise evoluir a API para implementar tratamentos pontuais
Funcionamento
A sintaxe para executar a API/BO em modo persistente é:
...
RUN pi_main_api_enctro_cta_apb_acr_ems5_3 4 IN v_hdl_aux(INPUT 34,
INPUT TABLE tt_dados_integr_apb_enc_ctas,
...
INPUT NO /* valor padrão de p_log_ajust_liquidac */ ).
A variável denominada v_hdl_aux irá receber o “handle” do programa, permitindo o acesso aos “métodos” internos da API.
Tabelas Temporárias
,
INPUT table tt_params_generic_api ).
A variável denominada v_hdl_aux irá receber o “handle” do programa, permitindo o acesso aos “métodos” internos da API.
Tabelas Temporárias
Tabela Temporária | Descrição | Entrada/Saída |
tt_dados_integr_apb_ | ||
Tabela Temporária | Descrição | Entrada/Saída |
tt_dados_integr_apb_enc_ctas | Conterá as informações do lote de Encontro de Contas.. | Entrada |
...
field ttv_val_abat as decimal format "->>>,>>>,>>9.99" decimals 2 label "Valor Abatimento" column-label "Valor Abatimento"
field tta_cod_indic_econ as character format "x(8)" label "Moeda" column-label "Moeda"
field tta_val_cotac_indic_econ as decimal format ">>>>,>>9.9999999999" decimals 10 initial 0 label "Cotação" column-label "Cotação"
field ttv_rec_integr_apb_enctro_cta as recid format ">>>>>>9"
field tta_cod_estab_ext as character format "x(8)" label "Estabelecimento Exte" column-label "Estabelecimento Ext"
field tta_cod_portad_ext as character format "x(8)" label "Portador Externo" column-label "Portador Externo"
field tta_cod_modalid_ext as character format "x(8)" label "Modalidade Externa" column-label "Modalidade Externa"
field ttv_cod_empresa_ext as character format "x(3)" label "Código Empresa Ext" column-label "Cód Emp Ext"
field tta_des_text_histor as character format "x(2000)" label "Histórico" column-label "Histórico"
field ttv_rec_table_child as recid format ">>>>>>9"
.
Tabela Temporária | Descrição | Entrada/Saída |
tt_cotac_lote_pagto | Conterá as informações das cotações que serão utilizados no Encontro de Contas | Entrada |
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
ttv_rec_integr_apb_enctro_cta | recid | >>>>>>9 | Recid da tabela-pai (tt_dados_integr_apb_enc_ctas) | x |
|
tta_cod_indic_econ | character | x(8) | Moeda | x |
|
tta_val_cotac_indic_econ | decimal | >>>>,>>9.9999999999 | Valor da cotação em relação ao lote. Se for informado com valor 0, considera a cotação do dia. Ex.: moeda do lote: real, moeda da cotação: dólar = valor da cotação: 3.38. | x |
|
def temp-table tt_cotac_lote_pagto no-undo
field ttv_rec_integr_apb_enctro_cta as recid format ">>>>>>9"
field tta_cod_indic_econ as character format "x(8)" label "Moeda" column-label "Moeda"
field tta_val_cotac_indic_econ as decimal format ">>>>,>>9.9999999999" decimals 10 initial 0 label "Cotação" column-label "Cotação"
index tt_id is primary unique
ttv_rec_integr_apb_enctro_cta ascending
tta_cod_indic_econ ascending
.
.
Tabela Temporária | Descrição | Entrada/Saída | ||||
tt_log_integr_apb_enc_ctas | Conterá as informações referentes aos erros encontrados durante as validações para a criação do Encontro de Contas. | Saída | ||||
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. | |
Tta_cod_estab_refer | character | X(03) | Estabelecimento |
|
| |
Tta_cod_refer | character | X(10) | Referência |
|
| |
Ttv_num_cod_erro | integer | >>>,>>9 | Número do Erro |
|
| |
Ttv_des_msg_erro | character | X(60) | Mensagem Erro |
|
| |
Ttv_des_msg_ajuda | character | X(40) | Mensagem Ajuda |
|
| |
def temp-table tt_log_integr_apb_enc_ctas no-undo
field tta_cod_estab_refer as character format "x(3)" initial ? label "Estabelecimento" column-label "Estab"
field tta_cod_refer as character format "x(10)" label "Referência" column-label "Referência"
field ttv_num_cod_erro as integer format ">>>>,>>9" label "Número" column-label "Número"
field ttv_des_msg_erro as character format "x(60)" label "Mensagem Erro" column-label "Inconsistência"
field ttv_des_msg_ajuda as character format "x(40)" label "Mensagem Ajuda" column-label "Mensagem Ajuda"
.
Tabela Temporária | Descrição | Entrada/Saída | ||||
tt_tit_acr_info | Caso ocorra ajuste relacionado ao imposto PIS/COFINS/CSLL, retorna os dados dos títulos alterados. | Saída | ||||
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. | |
tta_cod_estab | character | X(03) | Estabelecimento |
|
| |
tta_cod_espec_docto | character | x(3) | Espécie Documento |
|
| |
tta_cod_ser_docto | character | x(3) | Série Documento |
|
| |
tta_cod_tit_acr | character | x(10) | Título |
|
| |
tta_cod_parcela | character | X(02) | Parcela |
|
| |
| tta_val_sdo_tit_acr | decimal | >>>,>>>,>>9.99 | Saldo Título | |||
| tta_val_liquidac_tit_acr | decimal | >>>,>>>,>>9.99 | Valor Liquidação | |||
| ttv_val_sdo_real | decimal | ->>,>>>,>>>,>>9.99 | Valor Saldo Real | |||
Abatimento"
field tta_cod_indic_econ as character format "x(8)" label "Moeda" column-label "Moeda"
field tta_val_cotac_indic_econ as decimal format ">>>>,>>9.9999999999" decimals 10 initial 0 label "Cotação" column-label "Cotação"
field ttv_rec_integr_apb_enctro_cta as recid format ">>>>>>9"
field tta_cod_estab_ext as character format "x(8)" label "Estabelecimento Exte" column-label "Estabelecimento Ext"
field tta_cod_portad_ext as character format "x(8)" label "Portador Externo" column-label "Portador Externo"
field tta_cod_modalid_ext as character format "x(8)" label "Modalidade Externa" column-label "Modalidade Externa"
field ttv_cod_empresa_ext as character format "x(3)" label "Código Empresa Ext" column-label "Cód Emp Ext"
field tta_des_text_histor as character format "x(2000)" label "Histórico" column-label "Histórico"
field ttv_rec_table_child as recid format ">>>>>>9"
.
Tabela Temporária | Descrição | Entrada/Saída |
tt_cotac_lote_pagto | Conterá as informações das cotações que serão utilizados no Encontro de Contas | Entrada |
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
ttv_rec_integr_apb_enctro_cta | recid | >>>>>>9 | Recid da tabela-pai (tt_dados_integr_apb_enc_ctas) | x |
|
tta_cod_indic_econ | character | x(8) | Moeda | x |
|
tta_val_cotac_indic_econ | decimal | >>>>,>>9.9999999999 | Valor da cotação em relação ao lote. Se for informado com valor 0, considera a cotação do dia. Ex.: moeda do lote: real, moeda da cotação: dólar = valor da cotação: 3.38. | x |
|
def temp-table tt_cotac_lote_pagto no-undo
field ttv_rec_integr_apb_enctro_cta as recid format ">>>>>>9"
field tta_cod_indic_econ as character format "x(8)" label "Moeda" column-label "Moeda"
field tta_val_cotac_indic_econ as decimal format ">>>>,>>9.9999999999" decimals 10 initial 0 label "Cotação" column-label "Cotação"
index tt_id is primary unique
ttv_rec_integr_apb_enctro_cta ascending
tta_cod_indic_econ ascending
.
.
Tabela Temporária | Descrição | Entrada/Saída | ||||
tt_log_integr_apb_enc_ctas | Conterá as informações referentes aos erros encontrados durante as validações para a criação do Encontro de Contas. | Saída | ||||
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. | |
Tta_cod_estab_refer | character | X(03) | Estabelecimento |
|
| |
Tta_cod_refer | character | X(10) | Referência |
|
| |
Ttv_num_cod_erro | integer | >>>,>>9 | Número do Erro |
|
| |
Ttv_des_msg_erro | character | X(60) | Mensagem Erro |
|
| |
Ttv_des_msg_ajuda | character | X(40) | Mensagem Ajuda |
|
| |
def temp-table tt_log_integr_apb_enc_ctas no-undo
field tta_cod_estab_refer as character format "x(3)" initial ? label "Estabelecimento" column-label "Estab"
field tta_cod_refer as character format "x(10)" label "Referência" column-label "Referência"
field ttv_num_cod_erro as integer format ">>>>,>>9" label "Número" column-label "Número"
field ttv_des_msg_erro as character format "x(60)" label "Mensagem Erro" column-label "Inconsistência"
field ttv_des_msg_ajuda as character format "x(40)" label "Mensagem Ajuda" column-label "Mensagem Ajuda"
.
Tabela Temporária | Descrição | Entrada/Saída | ||||
tt_tit_acr_info | Caso ocorra ajuste relacionado ao imposto PIS/COFINS/CSLL, retorna os dados dos títulos alterados. | Saída | ||||
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. | |
tta_cod_estab | character | X(03) | Estabelecimento |
|
| |
tta_cod_espec_docto | character | x(3) | Espécie Documento |
|
| |
tta_cod_ser_docto | character | x(3) | Série Documento |
|
| |
tta_cod_tit_acr | character | x(10) | Título |
|
| |
tta_cod_parcela | character | X(02) | Parcela |
|
| |
| tta_val_sdo_tit_acr | decimal | >>>,>>>,>>9.99 | Saldo Título | |||
| tta_val_liquidac_tit_acr | decimal | >>>,>>>,>>9.99 | Valor Liquidação | |||
| ttv_val_sdo_real | decimal | ->>,>>>,>>>,>>9.99 | Valor Saldo Real | |||
def temp-table tt_tit_acr_info no-undo like tit_acr
field tta_cod_estab as character format "x(3)" label "Estabelecimento" column-label "Estab"
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(3)" label "Série Documento" column-label "Série"
field tta_cod_tit_acr as character format "x(10)" label "Título" column-label "Título"
field tta_cod_parcela as character format "x(02)" label "Parcela" column-label "Parc"
field tta_val_sdo_tit_acr as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Saldo Título" column-label "Saldo Título"
field tta_val_liquidac_tit_acr as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Liquidação" column-label "Vl Liquidação"
field ttv_val_sdo_real as decimal format "->>,>>>,>>>,>>9.99" decimals 2
.
Tabela Temporária | Descrição | Entrada/Saída |
tt_params_generic_api | Conterá parâmetros de input. Esta é uma temp-table genérica criada para que não seja necessário evoluir a API a cada nova implementação | Entrada |
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
ttv_rec_id | integer | ">>>>>>9" | ID da temp-table pai relacionada ao parâmetro |
|
|
ttv_cod_tabela | character | X(28) | Nome da temp-table pai |
|
|
ttv_cod_campo | character | x(35) | Nome do campo que será considerado como parâmetro. Ao invés de incluir o campo na temp-table pai será utilizada esta temp-table genérica |
|
|
ttv_cod_valor | character | x(8) | Valor do campo, ou seja, conteúdo que seria alimentado no campo da temp-table pai |
|
def temp-table tt_params_generic_api no-undo
field ttv_rec_id as recid format ">>>>>>9"
field ttv_cod_tabela as character format "x(28)" label "Tabela" column-label "Tabela"
field ttv_cod_campo as character format "x(35)" label "Campo" column-label "Campo"
field ttv_cod_valor as character format "x(8)" label "Valor" column-label "Valor"
index tt_idx_param_generic is primary unique
ttv_cod_tabela ascending
ttv_rec_id ascending
ttv_cod_campo ascending
.
Tratamentos previstos através da temp-table tt_params_generic_api para a API de Pagamento via Encontro de Contas:
1) Parâmetro para indicar se o lote de encontro de contas deve ser atualizado ou não. Exemplo de como deve ser criado o registro:
CREATE tt_params_generic_api.
ASSIGN tt_params_generic_api.ttv_rec_id = tt_dados_integr_apb_enc_ctas.ttv_rec_integr_apb_enctro_ct
tt_params_generic_api.ttv_cod_tabela = "tt_dados_integr_apb_enc_ctas"
tt_params_generic_api.ttv_cod_campo = "log_atualiz_lote"
tt_params_generic_api.ttv_cod_valor = "No".
Caso queria que o lote seja atualizado deve ser indicado "Yes" no valor do campo.
observação: por default a API manterá o comportamento antigo, ou seja, atualizar o lote. Portanto, caso não seja criado registro na temp-table genérica a API irá entender que é para atualizar o lotedef temp-table tt_tit_acr_info no-undo like tit_acr
field tta_cod_estab as character format "x(3)" label "Estabelecimento" column-label "Estab"
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(3)" label "Série Documento" column-label "Série"
field tta_cod_tit_acr as character format "x(10)" label "Título" column-label "Título"
field tta_cod_parcela as character format "x(02)" label "Parcela" column-label "Parc"
field tta_val_sdo_tit_acr as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Saldo Título" column-label "Saldo Título"
field tta_val_liquidac_tit_acr as decimal format ">>>,>>>,>>9.99" decimals 2 initial 0 label "Vl Liquidação" column-label "Vl Liquidação"
field ttv_val_sdo_real as decimal format "->>,>>>,>>>,>>9.99" decimals 2
.
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas