Avalados por :
MÉTODOS:
get_hash_value_for_itab
IMPORTAÇÃO
it_table TIPO QUALQUER TABELA
EXPORTAÇÃO
ev_hash TIPO hash160.
MÉTODO get_hash_value_for_itab.
DADOS: lv_string TIPO xstring,
lv_xbuffer TIPO xstring.
" Limpar o valor hash
CLEAR ev_hash.
" Percorrer a tabela linha por linha
LOOP EM it_table ATRIBUINDO SÍMBOLO-DE-CAMPO(<ls_line>).
DADOS(lv_index) = 0.
CLEAR lv_string.
" Concatenar todas as colunas da linha em uma única cadeia
FAZER.
ATRIBUIR COMPONENTE lv_index DE ESTRUTURA <ls_line> A SÍMBOLO-DE-CAMPO(<lv_field>) CONVERTER PARA TIPO X.
SE sy-subrc EQ 0.
CONCATENAR lv_string <lv_field> EM lv_string NO MODO BYTE MODE.
ADICIONAR 1 A lv_index.
SENÃO.
SAIR.
FIM-SE.
FIM-FAZER.
" Adicionar a cadeia da linha ao nosso buffer
CONCATENAR lv_xbuffer lv_string NO lv_xbuffer NO MODO BYTE MODE.
FIM-LOOP.
" Calcular o valor hash para todo o buffer/tabela
CHAMAR FUNÇÃO 'CALCULAR_HASH_PARA_BRUTO'
EXPORTAÇÃO
dados = lv_xbuffer
IMPORTAÇÃO
hash = ev_hash
EXCEÇÕES
unknown_alg = 1
param_error
contacto@primeinstitute.com
(+51) 1641 9379
(+57) 1489 6964
© 2024 Copyright. Todos los derechos reservados.
Desarrollado por Prime Institute