STANDARD DATA DICTIONARY #394.72 -- VAQ - ENCRYPTION METHOD FILE 3/24/25 PAGE 1 STORED IN ^VAT(394.72, (1 ENTRY) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 1.5) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file defines each encryption method currently supported by PDX. Methods must use the following parameters: STRING - String to encrypt/decrypt KEY1 - Name of primary encryption/decryption key KEY2 - Name of secondary encryption/decryption key (if required) Methods must return the following: string - Encrypted or decrypted form of STRING NULL - Error Sample methods: $$ECR^VAQZZZ(STRING,KEY1,KEY2) - Encrypts STRING using the encryption keys KEY1 & KEY2 $$DCR^VAQZZZ(STRING,KEY1,KEY2) - Decrypts STRING using the decryption keys KEY1 & KEY2 Sample use: S IFN=internal file number for encryption method S STRING="TEST" S KEY1="ABCD1234" S KEY2="ZYXW0987" X ("S X="_^VAT(394.72,IFN,"ECR")) The variable X is now set to the encrypted format of STRING DD ACCESS: @ RD ACCESS: @ WR ACCESS: @ DEL ACCESS: @ LAYGO ACCESS: @ AUDIT ACCESS: @ POINTED TO BY: Encryption Method field (#41) of the VAQ - TRANSACTION File (#394.61) Encryption Method field (#21) of the VAQ - PARAMETER File (#394.81) CROSS REFERENCED BY: Encryption Type(B) 394.72,.01 Encryption Type 0;1 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>30!($L(X)<1)!'(X'?1P.E) X LAST EDITED: NOV 30, 1992 HELP-PROMPT: Answer must be 1-30 characters in length. DESCRIPTION: Type of encryption (name). CROSS-REFERENCE: 394.72^B 1)= S ^VAT(394.72,"B",$E(X,1,30),DA)="" 2)= K ^VAT(394.72,"B",$E(X,1,30),DA) 394.72,10 Encryption Method ECR;E1,240 FREE TEXT INPUT TRANSFORM: K:$L(X)>240!($L(X)<1) X LAST EDITED: NOV 30, 1992 HELP-PROMPT: Answer must be 1-240 characters in length. DESCRIPTION: Function call to encrypt a line of data. 394.72,20 Decryption Method DCR;E1,240 FREE TEXT INPUT TRANSFORM: K:$L(X)>240!($L(X)<1) X LAST EDITED: NOV 30, 1992 HELP-PROMPT: Answer must be 1-240 characters in length. DESCRIPTION: Function call to decrypt a line of data. INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):