Encriptar campo numérico; Cómo?
Posted:
Wed Jan 10, 2018 1:11 pm
by FiveWiDi
Hola todos,
Tengo unas DBF que tienen algunos campos numéricos (normalmente sin decimales).
¿Cómo los encriptarían ustedes?
Muchas gracias,
Re: Encriptar campo numérico; Cómo?
Posted:
Wed Jan 10, 2018 4:54 pm
by FiveWiDi
karinha wrote:Talvéz:
- Code: Select all Expand view
nRetCLAVE := ( DbEmpresa:cAlias )->NCGCCLAVE // numerico
nSequencial := ( nRetCLAVE ) * 3 + 87654321
cCLAVE := STR( nSequencial )
cCampoClave := ENCRYPT( ALLTRIM( cCLAVE ), "*+-." )
? cCampoClave
TRABAREG(0)
REPLACE SEQUENCIA WITH cCampoClave
DESTRABA(0)
Saludos.
Muchas gracias Karinha,
Es simple, pero no se me había ocurrido, me servirá; haré algo parecido.
Gracias de nuevo.