Difference between revisions of "RPC HELP Hash Encrypt"
From VistApedia
(Created page with "<h2>Encryption Functions</h2> Kernel and the RPC Broker provide encryption functions that can be used to encrypt messages sent between the client and the server. <H3<In Delp...") |
|||
| (2 intermediate revisions by the same user not shown) | |||
| Line 1: | Line 1: | ||
| + | [[RPC_Broker_Help| RPC Broker Help Home]] | ||
<h2>Encryption Functions</h2> | <h2>Encryption Functions</h2> | ||
Kernel and the RPC Broker provide encryption functions that can be used to encrypt messages sent between the client and the server. | Kernel and the RPC Broker provide encryption functions that can be used to encrypt messages sent between the client and the server. | ||
| − | < | + | <h3>In Delphi</h3> |
Include HASH in the "uses" clause of the unit in which you'll be encrypting or decrypting. | Include HASH in the "uses" clause of the unit in which you'll be encrypting or decrypting. | ||
| Line 10: | Line 11: | ||
function Encrypt(NormalText: string): string; | function Encrypt(NormalText: string): string; | ||
| − | < | + | <h3>On the VistA M Server</h3> |
To encrypt: | To encrypt: | ||
Latest revision as of 22:42, 5 July 2015
Encryption Functions
Kernel and the RPC Broker provide encryption functions that can be used to encrypt messages sent between the client and the server.
In Delphi
Include HASH in the "uses" clause of the unit in which you'll be encrypting or decrypting.
Function prototypes are as follows:
function Decrypt(EncryptedText: string): string; function Encrypt(NormalText: string): string;
On the VistA M Server
To encrypt:
>SET CIPHER=$$ENCRYP^XUSRB1("Hello world!") W CIPHER
/U'llTG~TVl&f-
To decrypt:
>SET PLAIN=$$DECRYP^XUSRB1(CIPHER) W PLAIN Hello world!
These encryption functions can be used for any communication between the client and the server where encryption is desired.
