Histórico da Página
...
run prgfin/acr/acr718za.py (Input recid recid(renegoc_acr),
Input v v_dat_estorno,
Input v v_cod_refer,
Input v v_des_text_histor,
output table tt_log_erros_estorn_cancel).
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_rec_renegoc_acr
...
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
...
.