Calculo Hash MD5

Discussão em 'Progress 4GL' iniciado por asbahr, Agosto 17, 2012.

  1. asbahr

    asbahr Membro Participativo

    Boa Tarde Pessoa!
    Estou tentando calcular o hash de um conteudo de um arquivo utilizando o codigo abaixo, porém a informação dentro
    do meu arquivo é bastante extensa e codigo a variavel m-Texto declarada abaixo não está conseguindo carregar toda a informação.
    Tentei declarar como longchar porém ai esse formato não é aceito pelo comando import. Alguém já realizou calculo de hash para grande quantidade de informação? Poderia me auxiliar?

    Grato

    DEFINE VARIABLE m-Texto AS CHARACTER NO-UNDO.
    DEFINE VARIABLE m-Hash AS CHARACTER NO-UNDO.
    INPUT FROM "C:\spool\pessoas.txt" NO-CONVERT.
    REPEAT:
    IMPORT UNFORMATTED m-Texto.
    m-Hash = HEX-ENCODE(MD5-DIGEST(m-Texto)).
    MESSAGE "HASH MD5: " m-Hash
    VIEW-AS ALERT-BOX INFO BUTTONS OK.
    END.
    INPUT CLOSE.
  2. LFBuozi

    LFBuozi Membro Participativo

    Tente definir o m-Texto como LONGCHAR.
  3. asbahr

    asbahr Membro Participativo

    Tentei com Longchar porém ele não aceita importação com esse tipo de variavel, exibindo a mensagem:
    Invalid source for IMPORT of LONGCHAR variable.

Compartilhe esta Página