All source and programs@ version V5R3 saved library called encrypt to savf.
Code:
** Qc3DecryptData Decrypt data Restores encrypted data to a ** clear (intelligible) form. ** ** Qc3EncryptData Encrypt data Scrambles clear data into an ** unintelligible form. ** ** Qc3GenPRNs Generate Generates a pseudorandom binary ** pseudorandom stream. The pseudorandom number ** numbers generation is performed using the ** FIPS 186-1 algorithm. ** ** C library function: ** cvthc Convert hex to Converts a character string to ** character its hexadecimal representation ** in the form of 4-bit sequences ** also known as nibbles. ** ** cvtch Convert character Converts a string of nibbles to ** to hex its character representation. ** Nibbles are specified by digits ** 0 to 9 and letters A to F. **