STANDARD DATA DICTIONARY #58.64 -- PADE USER FILE 3/24/25 PAGE 1
STORED IN ^PS(58.64, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file is used to link Pharmacy Automated Dispensing Equipment (PADE) users with VistA users. When a PADE Inbound HL7 message is
received, this file is checked for the user ID and PADE Inbound System combination from the incoming HL7 message. If the user ID
and PADE Inbound System combination is not on file, it is filed. If the user ID and PADE Inbound System combination does exist in
this file, the VISTA USER (#2) field is checked to determine if the PADE user has been linked to a VistA user, and if it has, the
VistA user information is filed in the PADE INBOUND TRANSACTION (#58.6) file, along with the PADE user information in the incoming
HL7 message.
Linking PADE users to VistA users is not required for the PADE interface or reports to function, it is intended to improve
readability of PADE reports and obviate the need for cross checking user ID's with the external PADE database.
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS:
AUDIT ACCESS: @
PRIMARY KEY: A (#126)
Uniqueness Index: C (#1386)
File, Field: 1) PADE INBOUND SYSTEM (58.64,1.1) 2) PADE ID (58.64,1)
CROSS
REFERENCED BY: NAME(B)
INDEXED BY: PADE INBOUND SYSTEM & PADE ID (C), VISTA USER & PADE INBOUND SYSTEM & PADE ID (DUZ), PADE INBOUND SYSTEM & PADE ID
(KEY), PADE ID & NAME (PID)
LAST MODIFIED: OCT 6,2016@13:01:38
58.64,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K XLFNC K:($L(X,",")'=2) X I $D(X) S XLFNC=X,(X,XLFNC)=$$FORMAT^XLFNAME7(.XLFNC,3,35,,,,,2) K:$L(X)
>35!($L(X)<3)!($L(X,",")'=2)!(X'?1.E1","1.E) X,XLFNC K:'$G(XUITNAME) XLFNC
HELP-PROMPT: Answer must be 3-35 upper-case characters in length, and be in the format Family(Last),Given(First)
Middle Suffix. Enter '??' for more help.
DESCRIPTION: The PADE USER name as defined on the PADE vendor system. Enter only data that is actually part of
the person's name. Do not include extra titles, identification, flags, local information, etc.
Enter the person's name in 'LAST,FIRST MIDDLE SUFFIX' format. This value must be 3-35 characters
in length and may contain only uppercase alpha characters, spaces, apostrophes, hyphens and one
comma. All other characters and parenthetical text will be removed.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 58.64^B
1)= S ^PS(58.64,"B",$E(X,1,30),DA)=""
2)= K ^PS(58.64,"B",$E(X,1,30),DA)
RECORD INDEXES: PID (#1389)
58.64,1 PADE ID 0;2 FREE TEXT (Required) (Key field)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<2) X
LAST EDITED: NOV 23, 2015
HELP-PROMPT: Answer must be 2-30 characters in length.
DESCRIPTION:
The PADE identifier for this user.
RECORD INDEXES: C (#1386), DUZ (#1387), KEY (#1388), PID (#1389)
58.64,1.1 PADE INBOUND SYSTEM 0;4 POINTER TO PADE INVENTORY SYSTEM FILE (#58.601) (Required) (Key field)
LAST EDITED: NOV 23, 2015
HELP-PROMPT: Select the PADE INVENTORY SYSTEM associated with this PADE USER.
DESCRIPTION:
The PADE INVENTORY SYSTEM from which the PADE user was originally received.
RECORD INDEXES: C (#1386), DUZ (#1387), KEY (#1388)
58.64,2 VISTA USER 0;3 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: NOV 23, 2015
HELP-PROMPT: Select a user from the NEW PERSON (#200) file.
DESCRIPTION:
The VistA user associated with this PADE USER entry.
RECORD INDEXES: DUZ (#1387)
FILES POINTED TO FIELDS
NEW PERSON (#200) VISTA USER (#2)
PADE INVENTORY SYSTEM (#58.601) PADE INBOUND SYSTEM (#1.1)
File #58.64
Record Indexes:
C (#1386) RECORD REGULAR IR LOOKUP & SORTING
Unique for: Key A (#126), File #58.64
Short Descr: PADE ID by PADE Inbound System
Description: This cross reference groups PADE user ID by PADE Inbound System to optimize lookups and reports run for a
specific PADE INVENTORY SYSTEM (#58.601) file entry.
Set Logic: S ^PS(58.64,"C",X(1),X(2),DA)=""
Kill Logic: K ^PS(58.64,"C",X(1),X(2),DA)
Whole Kill: K ^PS(58.64,"C")
X(1): PADE INBOUND SYSTEM (58.64,1.1) (Subscr 1)
X(2): PADE ID (58.64,1) (Subscr 2)
DUZ (#1387) RECORD REGULAR IR LOOKUP & SORTING
Short Descr: User DUZ to PADE ID
Description: This cross reference groups all of a PADE user's external PADE ID's together by their VistA user ID, when the
linkage between PADE ID and VistA ID has been established. The VistA user may have different PADE ID's for each
PADE Inbound System; this cross reference optimizes lookups focused on a specific PADE user, across multiple
PADE Inbound Systems.
Set Logic: S ^PS(58.64,"DUZ",X(1),X(2),$E(X(3),1,30),DA)=""
Kill Logic: K ^PS(58.64,"DUZ",X(1),X(2),$E(X(3),1,30),DA)
Whole Kill: K ^PS(58.64,"DUZ")
X(1): VISTA USER (58.64,2) (Subscr 1) (forwards)
X(2): PADE INBOUND SYSTEM (58.64,1.1) (Subscr 2) (forwards)
X(3): PADE ID (58.64,1) (Subscr 3) (Len 30) (forwards)
KEY (#1388) RECORD REGULAR IR LOOKUP & SORTING
Short Descr: PADE ID by PADE INBOUND SYSTEM
Description: This cross reference is the primary Key for this file, enforcing the uniqueness of each PADE user ID by linking
it to a PADE Inbound System. Duplicate PADE user ID's may exist for different (or the same) PADE users in
different PADE Inbound Systems; duplicate PADE user ID's are not permitted within a single PADE Inbound System.
Set Logic: S ^PS(58.64,"KEY",X(1),$E(X(2),1,30),DA)=""
Kill Logic: K ^PS(58.64,"KEY",X(1),$E(X(2),1,30),DA)
Whole Kill: K ^PS(58.64,"KEY")
X(1): PADE INBOUND SYSTEM (58.64,1.1) (Subscr 1) (forwards)
X(2): PADE ID (58.64,1) (Subscr 2) (Len 30) (forwards)
PID (#1389) RECORD REGULAR IR LOOKUP & SORTING
Short Descr: PADE User to PADE ID
Description: This cross reference groups PADE user names by PADE user ID, to optimize PADE lookups and reports by quickly
determining if there are multiple PADE users with the same PADE ID associated with different PADE Inbound
Systems. This information may be used to find all PADE user ID's for the same user across multiple PADE Inbound
Systems, when the user is not linked to a VistA user ID.
Set Logic: S ^PS(58.64,"PID",$E(X(1),1,30),$E(X(2),1,30),DA)=""
Kill Logic: K ^PS(58.64,"PID",$E(X(1),1,30),$E(X(2),1,30),DA)
Whole Kill: K ^PS(58.64,"PID")
X(1): PADE ID (58.64,1) (Subscr 1) (Len 30) (forwards)
X(2): NAME (58.64,.01) (Subscr 2) (Len 30) (forwards)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):