[Progress Communities] [Progress OpenEdge ABL] Forum Post: RE: How to encrypt/decrypt character strings and store them as character strings in databas

  • Thread starter Thread starter PeterWokke
  • Start date Start date
Status
Not open for further replies.
P

PeterWokke

Guest
encryptCharacter.p define input parameter pcToEncrypt as character no-undo. define output parameter pcEncrypted as character no-undo. define variable rKey as raw no-undo. define variable lcEncoded as longchar no-undo. rKey = generate-pbe-key("Progress"). lcEncoded = base64-encode( encrypt( pcToEncrypt, rkey ) ). pcEncrypted = string(lcEncoded).

Continue reading...
 
Status
Not open for further replies.
Back
Top