[RESOLVIDO] Senha Criptografada no Datasul11

Opa, maravilha!
Agora uma dúvida cruel: o "DECODE" dessa função é possível?
Não é que eu esteja tentando quebrar senha de ninguém, longe disso. É que temos aqui na empresa um produto de uma franquia Totvs que usa uma função "xDecode" (específica, cuja include onde ela está definida nós não temos o fonte), na qual a senha criptografada do usuário (através da função "encode") é decriptada, para que possa ser enviada como parâmetro de entrada à API de login no produto.
Como estamos migrando para o Totvs 11 aqui também, não queríamos depender dessa franquia para adaptar o funcionamento dessa função (e de todo o resto do sistema, rs). Alguma sugestão?

Valeu, obrigado gente!

SHA-1 é uma função criptográfica unidirecional, em teoria, não tem como obter o texto original da mensagem que gerou o cálculo.
Mais detalhes em http://en.wikipedia.org/wiki/SHA-1

Durante a criação do BTB959ZA - UNIFICAÇÃO DO FOUNDATION - haveria muito esforço, além de ser deselegante, obter a senha dos usuários através de DECODE qualquer, então optou-se criar a senha a partir do código do usuário, mas já expirada.

Abraço.

Show de bola, esclareceu a dúvida. Já achamos uma maneira diferente de tratar a questão por aqui e não vamos precisar fazer essa gambiarra

Valeu!

Boa tarde Yurifranzoni, qual foi o metodo utilizado para nao precisar de descriptografar?
Obrigado.

Tambem me ajudou.. Obrigado

Bom dia Srs.

Outro caminho possível, é utilizar a API de Login BTAPI910ZA, que tem como uma vantagem, também carregar as variáveis globais do sistema.
Segue código exemplo:

Define Temp-table tt-erros
Field cod-erro As Integer
Field desc-erro As Character Format "x(256)":U
Field desc-arq As Character.


Run btb/btapi910za.p ( Input "super",
Input "super",
Output Table tt-erros).

for each tt-erros:
message "Erro: "
string(tt-erros.cod-erro) + " - ":U +
tt-erros.desc-erro
view-as alert-box error.
end.