M
MarkT
Guest
Hi All, Has anyone had any problems using the Encrypt / Decrypt keywords within OpenEdge 10.2b (patch 8)? (Code cut down to bare minimum - I'm working with longchars) For encrypt I have something like this: ASSIGN c_ip_w_algo = "AES_CBC_128". r_w_key = GENERATE-PBE-KEY(c_ip_key). r_w_cipher_data = ENCRYPT(c_ip_inp_long, r_w_key, ?, c_ip_w_algo) NO-ERROR. IF NOT ERROR-STATUS:ERROR THEN DO: ASSIGN c_op_enc_long = BASE64-ENCODE(r_w_cipher_data). END. For decrypt I have something like this: ASSIGN bkey = GENERATE-PBE-KEY(c_ip_key) c_ip_w_algo = "AES_CBC_128" r_w_cipher_data = DECRYPT(BASE64-DECODE(c_ip_enc_data), bKey, ?, c_ip_w_algo) NO-ERROR. IF NOT ERROR-STATUS:ERROR THEN DO: COPY-LOB FROM r_w_cipher_data TO c_op_dec_data NO-ERROR. END. I have found "AES_CBC_128" is the only type that comes back without an error - and I'm not 100% sure this is working as it should be. Any advice would be useful.. Thanks, Mark
Continue reading...
Continue reading...