Histórico da Página
Documento de API
Produto: | Datasul |
Ocorrência: | Documentação de API |
Nome Físico | prgfin/acr/ |
acr741zb |
Objetivo
Efetuar a importação de ocorrência bancária para títulos do Contas a Receber que já tiveram entrada confirmada no banco. A API aceita as ocorrências bancárias de "Pedido de Baixa", "Baixa cobrança sem título", "Protestar imediatamente", "Cancelar protesto", "Não cobrar juros mora" e "Pedido de Devolução".
Funcionamento
Na forma padrão, realiza-se a chamada do programa em modo persistente, sem a passagem de parâmetros, e em seguida, através de um comando RUN normal, executa-se seu método padrão passando-se os parâmetros com as informações necessárias.
def var v_hdl_program as Handle format ">>>>>>9":U no-undo.Executar o programa API(utilizar o nome externo), da seguinte forma:
run prgfin/acr/
...
acr741zb.py persistent set v_hdl_program.
run pi_main_api_integr_ocor_bcia_2 in v_hdl_program (input
...
2,
input table tt_integr_ocor_bcia,
...
input table tt_integr_item_ocor_bcia,
...
output table tt_log_erros_ocor_bcia).
if valid-handle(v_hdl_program) then
delete procedure v_hdl_program.
Parâmetro Entrada API Alteração Títulos/Contas a Receber:
num_vers_integr_api: será utilizado para determinar se o programa que está chamando está íntegro com as definições correntes da API;
...
tt_log_erros_estorn_cancel_apb: conterá os dados dos erros ocorridos durante a execusão execução do programa.
Tabelas Temporárias
...
Tabela Temporária | Descrição | Entrada/Saída |
tt_integr_item_ocor_bcia | Conterá as informações do título. | Entrada |
(*) A partir da 5.07A o estabelecimento passa a ter cinco dígitos.
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
tta_cod_estab | character | x(3) / x(5)* | Estabelecimento |
tta_num_id_tit_acr | integer | 9999999999 | Token Cta Receber |
ttv_ |
cod_id_ocor_bcia |
recid
>>>>>>9
character | x(80) | string(rowid(tt_integr_item_ocor_bcia)) | ||
tta_cod_portador | character | x(5) | Portador |
tta_cod_cart_bcia | character | x(3) | Carteira |
...
def temp-table tt_integr_item_ocor_bcia no-undo
field tta_cod_estab as estab as character format "x(3)" label "Estabelecimento" column-label "Estab"
field tta_num_id_tit_acr acr as integer format "9999999999" initial 0 label "Token Cta Receber" column-label "Token Cta Receber"
field ttv_cod_recid_ocor_bcia as recid format ">>>>>>9"bcia as character format "x(80)"
field tta_cod_portador portador as character format "x(5)" label "Portador" column-label "Portador"
field tta_cod_cart_bcia as bcia as character format "x(3)" label "Carteira" column-label "Carteira"
index tt_id_item item is primary unique
tta_cod_estab ascendingestab ascending
tta_num_id_tit_acr acr ascending
.
Tabela Temporária | Descrição | Entrada/Saída |
tt_integr_ocor_bcia | Conterá as informações da ocorrência bancária em geral. | Entrada |
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
ttv_cod_tip_ocor_bcia | character | x(8) |
ttv_dat_movto | date | 99/99/9999 | Data Movimento |
ttv_log_tit_sdo | logical | Sim/NÆo | Títulos com Saldo |
ttv_ |
cod_id_ocor_ |
bcia |
recid
>>>>>>9
character | x(80) | Mesmo conteúdo da tt_integr_item_ocor_bcia.ttv_cod_id_ocor_bcia | ||
ttv_log_bloq_tit_envdo_bcia | logical | Sim/Não |
def temp-table tt_integr_ocor_bcia no-undo
field field ttv_cod_tip_ocor_bcia as bcia as character format "x(8)"
field field ttv_dat_movto as movto as date format "99/99/9999" label "Data Movimento" column-label "Data Movimento"
field field ttv_log_tit_sdo as sdo as logical format "Sim/NÆoNão" initial no label "T¡tulos Títulos com Saldo"
field field ttv_cod_recid_ocor_bcia as recid format ">>>>>>9"bcia as character format "x(80)"
field field ttv_log_bloq_tit_envdo_bcia as bcia as logical format "Sim/NÆoNão" initial yes
index index tt_id_ocor_bcia is bcia is primary unique
ttv_cod_tip_ocor_bcia ascending
ttv_rec_ocor_bcia ascending
.
bcia ascending
ttv_cod_id_ocor_bcia ascending
.
Tabela Temporária | Descrição | Entrada/Saída |
tt_log_erros_ocor_bcia | Conterá as informações de erro que poderão ocorrer na execução do programa | Entrada |
(*) A partir da 5.07A o estabelecimento passa a ter cinco dígitos.
(**) Liberado o número de documento com 16 posições e série com 5, a partir de maio/2011.
Atributo | Tipo | Formato | Descrição | Obrig. | Evol. |
ttv_cod_ocor_bcia | character | x(30) | Ocorrência Bcia |
tta_cod_estab | character | x(3) / x(5)* | Estabelecimento |
tta_cod_espec_docto | character | x(3) | Espécie Documento |
tta_cod_ser_docto | character | x(3)/x(5)** | Série Documento |
tta_cod_tit_acr | character | x(10)/x(16)** | Título |
tta_cod_parcela | character | x(02) | Parcela |
tta_num_mensagem | integer | >>,>>>,>>9 | Mensagem |
ttv_des_msg | character | x(40) |
ttv_des_ajuda | character | x(50) | Ajuda |
def temp-table tt_log_erros_ocor_bcia no-undo
field ttv_cod_ocor_bcia as character format "x(30)" label "Ocorrˆncia Ocorrência Bcia" column-label "Ocorrˆncia Ocorrência Bcia"
field tta_cod_estab as estab as character format "x(35)" label "Estabelecimento" column-label "Estab"
field tta_cod_espec_docto as character format "x(3)" label "Esp‚cie Espécie Documento" column-label "Esp‚cieEspécie"
field tta_cod_ser_docto as character format "x(3)" label "S‚rie Série Documento" column-label "S‚rieSérie"
field tta_cod_tit_acr as character format "x(10)" label "T¡tuloTítulo" column-label "T¡tuloTítulo"
field tta_cod_parcela as character format "x(02)" label "Parcela" column-label "Parc"
...
field ttv_des_msg as character format "x(40)"
field ttv_des_ajuda as ajuda as character format "x(50)" label "Ajuda" column-label "Ajuda" .