Documento de API

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:

...

        view-as alert-box info buttons ok.

end.

...

Parâmetros de Entrada

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

...

          ttv_num_mensagem                 ascending.