This is how I remove the char(10) from the encrypted data:
LN = LEN(RESULT)
IF RESULT[LN,1] = CHAR(10) THEN
RESULT=RESULT[1,LN-1]
END
To decrypt this data, I add CHAR(10) before passing it to the ENCRYPT
function.
DATA = DATA:CHAR(10)
HTH
Rajesh
> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:owner-u2-
> [EMAIL PROTECTED] On Behalf Of Baker Hughes
> Sent: Thursday, August 24, 2006 9:35 AM
> To: u2-users@listserver.u2ug.org
> Subject: [U2] Encrypt issue 8088
>
> Hi,
>
> Can anyone share a code fragment for removing the extra Char(10)
> characters from the Encrypt function.
>
> I've studied the IBM articles (2) on U2 Encryption, and read the
> previous posts on this list. I've tried to remove the extra LF with
> less than sterling results. I can't find the char(10), whether I do or
> don't encode. If I add an extra char(10) for Decrypt it overruns the
> expected length and craters.
>
> Before I resort to shelling out to Unix and running Openssl I'd like to
> exhaust the native U2 Encrypt possibility.
>
> We are on UniVerse 10.0 - the articles by Nik Kesic speculate that the
> Encrypt patch will arrive in 10.2, but I'm not certain when/if we'll
> load 10.2 anyway.
>
> Always enlightening reading this list. I'm thankful for you guys (in the
> NY sense of the word, inclusive of gals)[Y'all, for other Southerners.]
>
> TIA,
> -Baker
>
>
> R. Baker Hughes
> UniVerse Programming
> Mouser Electronics, Inc.
> (817) 804-3598 *
> [EMAIL PROTECTED] *
> -------
> u2-users mailing list
> u2-users@listserver.u2ug.org
> To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
