Histórico da Página
Documento de API
Produto: | Datasul |
Ocorrência: | Documentação de API |
| Nome Físico | prgfin/acr/ |
| acr718zb |
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/
...
acr718zb.py
...
persistent set v_hdl_program.
run pi_main_fnc_renegoc_acr_estorno_api in v_hdl_program (input p_row_renegoc_acr
...
,
input p_dat_estorno,
...
input p_cod_refer,
...
input p_des_text_histor,
...
output table tt_log_erros_estorn_cancel).
if valid-handle(v_hdl_program) then
delete procedure v_hdl_program.
for each tt_log_erros_estorn_cancel:
message ' Estabelecimento:' tt_log_erros_estorn_cancel.tta_cod_estab skip
' Token Cta Receber:' tt_log_erros_estorn_cancel.tta_num_id_tit_acr skip
'Token Movto Tit ACR:' tt_log_erros_estorn_cancel.tta_num_id_movto_tit_acr skip
' Número:' tt_log_erros_estorn_cancel.ttv_num_mensagem skip
' Mensagem Erro:' tt_log_erros_estorn_cancel.ttv_des_msg_erro skip
' Mensagem Ajuda: ' tt_log_erros_estorn_cancel.ttv_des_msg_ajuda
view-as alert-box info buttons ok.
end.
Parâmetros de Entrada
p_recrow_renegoc_acr acr - Corresponde ao rowid da renegociação que se deseja estornar - Exemplo: rowid(renegoc_acr).
p_dat_transacaoestorno
p_cod_refer
p_des_text_histor
p_ tt_log_erros_estorn_cancel
Tabelas Temporárias
Tabela Temporária | Descrição | Entrada/Saída |
tt_log_erros_estorn_cancel |
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 |
tta_num_id_movto_tit_acr | integer | 9999999999 | Token Movto Tit ACR |
ttv_num_mensagem | integer | >>>>,>>9 | Número |
ttv_des_msg_erro | character | x(60) | Mensagem Erro |
ttv_des_msg_ajuda | character | x(40) | Mensagem Ajuda |
def
...
temp-table
...
tt_log_erros_estorn_cancel
...
no-undo
...
field
...
tta_cod_estab
...
as
...
character
...
format
...
"x(
...
5)"
...
label
...
"Estabelecimento"
...
column-label
...
"Estab"
...
field
...
tta_num_id_tit_acr
...
as
...
integer
...
format
...
"9999999999"
...
initial
...
0
...
label
...
"Token
...
Cta
...
Receber"
...
column-label
...
"Token
...
Cta
...
Receber"
...
field
...
tta_num_id_movto_tit_acr
...
as
...
integer
...
format
...
"9999999999"
...
initial
...
0
...
label
...
"Token
...
Movto
...
Tit
...
ACR"
...
column-label
...
"Token
...
Movto
...
Tit
...
ACR"
...
field
...
ttv_num_mensagem
...
as
...
integer
...
format
...
">>>>,>>9"
...
label
...
"N£mero"
...
column-label
...
"N£mero
...
Mensagem"
...
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"
...
index
...
tt_relac_tit_acr
...
tta_cod_estab
...
ascending
...
tta_num_id_tit_
...
acr ascending
...
tta_num_id_movto_tit_acr
...
ascending
...
ttv_num_mensagem
...
ascending
...
.
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas