1 package FND_CRYPT_PKG AUTHID CURRENT_USER as
2 /* $Header: AFCPCRYS.pls 115.1 99/07/16 23:09:59 porting sh $ */
3 /*
4 ** RC4-encrypt the DATASTRING using the KEYSTRING. The result
5 ** is a hexadecimal string representing the encrypted value of
6 ** up to NCHARS of the DATASTRING.
7 */
8 function ENCRYPT(KEYSTRING in varchar2, DATASTRING in varchar2,
9 NCHARS in number)
10 return varchar2;
11
12 /*
13 ** RC4-decrypt the hexadecimal DATAHEX string using the KEYSTRING.
14 ** The reverse of ENCRYPT. Trailing zeros are stripped from the
15 ** return value (on the assumption that they were added during the
16 ** ENCRYPT process).
17 */
18 function DECRYPT(KEYSTRING in varchar2, DATAHEX in varchar2,
19 NCHARS in number)
20 return varchar2;
21
22 end FND_CRYPT_PKG;