STANDARD DATA DICTIONARY #409.3 -- SD WAIT LIST FILE 3/24/25 PAGE 1 STORED IN ^SDWL(409.3, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file contains the Wait List entries for the Wait List (Sch/PCMM) package. Each entry represents a unique wait list entry. DD ACCESS: @ RD ACCESS: WR ACCESS: D DEL ACCESS: @ LAYGO ACCESS: D AUDIT ACCESS: @ IDENTIFIED BY: ORIGINATING DATE (#1), INSTITUTION (#2)[R], WAIT LIST TYPE (#4)[R], CURRENT STATUS (#23) POINTED TO BY: CHANGED CLINIC PARENT POINTER field (#37) of the SD WAIT LIST File (#409.3) WAIT LIST ENTRY field (#.01) of the SDWL TRANSFER REQUEST File (#409.35) SD WAIT LIST ENTRY field (#409.3) of the SDWL TRANSFER ACCEPT File (#409.36) APPT REQUEST TYPE field (#.22) of the SDEC APPOINTMENT File (#409.84) CROSS REFERENCED BY: WL SPECIFIC HOSPITAL LOCATION(AE), PATIENT(B), INSTITUTION(C), WL SPECIFIC TEAM(D), CURRENT STATUS(E), ORIGINATING DATE(ETOO), WL SPECIFIC CLINIC(SC), WL SPECIFIC CLINIC(SCC), WL SPECIFIC POSITION(SP), WL SERVICE/SPECIALTY(SS), WL SPECIFIC TEAM(ST) INDEXED BY: DATE/TIME ENTERED & ORIGINATING USER (AC), PATIENT & WL SPECIFIC HOSPITAL LOCATION (AD), DATE ENTERED & ENTERED BY USER (AF), ORIGINATING DATE (GC), DESIRED DATE OF APPOINTMENT (GCC), ORIGINATING DATE (GS), ORIGINATING DATE (GSA), SERVICE CONNECTED PRIORITY & ORIGINATING DATE (GSB), DESIRED DATE OF APPOINTMENT (GSC), ORIGINATING DATE (GSP) LAST MODIFIED: OCT 1,2020@12:59:55 409.3,.01 PATIENT 0;1 POINTER TO PATIENT FILE (#2) (Required) LAST EDITED: OCT 22, 2002 HELP-PROMPT: Enter the name of the patient from the Patient file #2 that is to be on the Sch/PCMM Wait List. DESCRIPTION: Enter the name of the patient from the Patient file #2 that is to be on the Sch/PCMM Wait List. CROSS-REFERENCE: 409.3^B 1)= S ^SDWL(409.3,"B",$E(X,1,30),DA)="" 2)= K ^SDWL(409.3,"B",$E(X,1,30),DA) RECORD INDEXES: AD (#1357) 409.3,1 ORIGINATING DATE 0;2 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: APR 03, 2015 DESCRIPTION: Date the patient was placed on the Wait List (Sch/PCMM) CROSS-REFERENCE: 409.3^ETOO^MUMPS 1)= S:$P(^SDWL(409.3,DA,0),U,17)'="" ^SDWL(409.3,"E",$P(^SDWL(409.3,DA,0),U,17),X,DA)="" 2)= K:$P(^SDWL(409.3,DA,0),U,17)'="" ^SDWL(409.3,"E",$P(^SDWL(409.3,DA,0),U,17),X,DA) This xref actually updates the "E" xref for CURRENT STATUS in the event that the ORIGINATING DATE is changed. This xref is used to speed up the lookup of open or closed wait list entries for a given time range. FIELD INDEX: GC (#1446) REGULAR IR LOOKUP & SORTING Short Descr: SORT BY CLINIC AND ORIGINATING DATE Description: This xref is used to sort Wait List entries by the Clinic ID and the ORIGINATING DATE field (#1). The Clinic ID comes from the CLINIC field (#.01) of the SD WL CLINIC LOCATION file (#409.32). The SD WL CLINIC LOCATION pointer is in the WL SPECIFIC CLINIC field (#8) of the SD WAIT LIST file (#409.3). Set Logic: S ^SDWL(409.3,"GC",X(1),X(2),DA)="" Kill Logic: K ^SDWL(409.3,"GC",X(1),X(2),DA) Whole Kill: K ^SDWL(409.3,"GC") X(1): Computed Code: S X=$P($G(^SDWL(409.32,+$P($G(^SDWL(409.3,DA,0)),U,9),0)),U,1) (Subscr 1) (forwards) X(2): ORIGINATING DATE (409.3,1) (Subscr 2) (forwards) RECORD INDEXES: GS (#1441), GSA (#1444), GSB (#1445), GSP (#1443) 409.3,2 INSTITUTION 0;3 POINTER TO INSTITUTION FILE (#4) (Required) INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,11)=""N"",$$TF^XUAF4(+Y)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: MAR 04, 2003 HELP-PROMPT: Enter the INSTITUTION that the patient is to be placed for the waiting list. INSTITUTION must be NATIONAL and a treating facility. DESCRIPTION: The Institution the patient is on the Wait List (Sch/PCMM) SCREEN: S DIC("S")="I $P(^(0),U,11)=""N"",$$TF^XUAF4(+Y)" EXPLANATION: Enter a National/Medical Institution AUDIT: CROSS-REFERENCE: 409.3^C 1)= S ^SDWL(409.3,"C",$E(X,1,30),DA)="" 2)= K ^SDWL(409.3,"C",$E(X,1,30),DA) 409.3,3 TRANMISSION STATUS TO ACC 0;4 SET '0' FOR NOT TRANSMITTED; '1' FOR TRANSMITTED; LAST EDITED: AUG 08, 2002 DESCRIPTION: Reflects the current transmission status (transmitted/not transmitted) of the wait list entry 409.3,3.1 DATE OF TRANSMISSION ACCDATE;0 DATE Multiple #409.33 DESCRIPTION: Wait List Transmission date information - multiple 409.33,.01 DATE OF TRANSMISSION 0;1 DATE (Multiply asked) INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:Y<1 X LAST EDITED: AUG 08, 2002 DESCRIPTION: Date of Wait List transmission CROSS-REFERENCE: 409.33^B 1)= S ^SDWL(409.3,DA(1),"ACCDATE","B",$E(X,1,30),DA)="" 2)= K ^SDWL(409.3,DA(1),"ACCDATE","B",$E(X,1,30),DA) 409.3,4 WAIT LIST TYPE 0;5 SET (Required) '1' FOR PCMM TEAM ASSIGNMENT; '2' FOR PCMM POSITION ASSIGNMENT; '3' FOR SERVICE/SPECIALITY; '4' FOR SPECIFIC CLINIC; LAST EDITED: OCT 12, 2004 HELP-PROMPT: Select one Wait List Type. DESCRIPTION: The type of wait list the patient is assigned. UNEDITABLE 409.3,5 WL SPECIFIC TEAM 0;6 POINTER TO TEAM FILE (#404.51) INPUT TRANSFORM: S DIC("S")="I $D(SDWLIN),$P(^SCTM(404.51,+Y,0),U,7)=SDWLIN" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: SEP 30, 2002 HELP-PROMPT: Enter the team that the patient is waiting to be assigned. The team must be an active team at the selected institution and must be over capacity. Patient can be assigned to multiple Teams. DESCRIPTION: If the patient is waiting for a PCMM Team Assignment, the team that the patient is waiting to be assigned is to be entered here. The team must be active at the designated institution, must be above capacity.Patients can be assigned to multiple PCMM Teams. SCREEN: S DIC("S")="I $D(SDWLIN),$P(^SCTM(404.51,+Y,0),U,7)=SDWLIN" EXPLANATION: Entry's for this Institution. CROSS-REFERENCE: 409.3^D 1)= S ^SDWL(409.3,"D",$E(X,1,30),DA)="" 2)= K ^SDWL(409.3,"D",$E(X,1,30),DA) CROSS-REFERENCE: 409.3^ST^MUMPS 1)= I $D(X) S ^SDWL(409.3,"ST",DA,X)="" 2)= K ^SDWL(409.3,"ST",DA,X) 409.3,6 WL SPECIFIC POSITION 0;7 POINTER TO TEAM POSITION FILE (#404.57) LAST EDITED: SEP 30, 2002 HELP-PROMPT: Enter the position the patient is waiting to be assigned. Only active, over capacity positions assigned to the patient's primary care team are selectable. DESCRIPTION: If the patient is waiting for a PCMM Position, the position that the patient is waiting to be assigned is entered here. The position must be active, assigned to the team the patient is currently assigned and the position must be above capacity. The patient can have multiple open Position Wait List assignments. CROSS-REFERENCE: 409.3^SP^MUMPS 1)= I $D(X) S ^SDWL(409.3,"SP",DA,X)="" 2)= K ^SDWL(409.3,"SP",DA,X) 409.3,7 WL SERVICE/SPECIALTY 0;8 POINTER TO SD WL SERVICE/SPECIALTY FILE (#409.31) LAST EDITED: FEB 05, 2007 HELP-PROMPT: Enter the Service/Specialty (DSS ID) allowed by this institution in the wait list parameters, that this patient is waiting for an appointment. DESCRIPTION: If the patient has been assigned to the Service/Specialty Wait List, enter the DSS ID that represents the service/specialty the patient is waiting for an appointment. This DSS ID must be active in file 409.31. CROSS-REFERENCE: 409.3^SS^MUMPS 1)= I $D(X) S ^SDWL(409.3,"SS",$P(^SDWL(409.3,DA,0),U,1),$P(^SDWL(409.31,X,0),U,1),DA)="" 2)= I $D(^SDWL(409.31,X,0)) K ^SDWL(409.3,"SS",$P(^SDWL(409.3,DA,0),U,1),$P(^SDWL(409.31,X,0),U,1), DA) 409.3,8 WL SPECIFIC CLINIC 0;9 POINTER TO SD WL CLINIC LOCATION FILE (#409.32) (Required) LAST EDITED: SEP 30, 2002 HELP-PROMPT: Select clinic from approved wait list clinics DESCRIPTION: If the patient has been assigned to the Specific Clinic Wait List, enter the clinic that the patient is waiting for an appointment. The clinic must be active and must be assigned to the institution designated. It must be an active clinic in file 409.32. CROSS-REFERENCE: 409.3^SC^MUMPS 1)= I $D(X) S ^SDWL(409.3,"SC",$P(^SDWL(409.32,X,0),U,1),DA)="" 2)= K ^SDWL(409.3,"SC",$P(^SDWL(409.32,X,0),U,1),DA) CROSS-REFERENCE: 409.3^SCC^MUMPS 1)= I $D(X) S ^SDWL(409.3,"SCC",$P(^SDWL(409.3,DA,0),U,1),X,DA)="" 2)= K ^SDWL(409.3,"SCC",$P(^SDWL(409.3,DA,0),U,1),X,DA) 409.3,8.5 WL SPECIFIC HOSPITAL LOCATION 0;24 POINTER TO HOSPITAL LOCATION FILE (#44) LAST EDITED: APR 30, 2015 HELP-PROMPT: Select a hospital location DESCRIPTION: This is the HOSPITAL LOCATION in which the WL SPECIFIC CLINIC points to. CROSS-REFERENCE: 409.3^AE 1)= S ^SDWL(409.3,"AE",$E(X,1,30),DA)="" 2)= K ^SDWL(409.3,"AE",$E(X,1,30),DA) This xref is used to find entries associated with a particular HOSPITAL LOCATION. RECORD INDEXES: AD (#1357) 409.3,8.7 WL APPOINTMENT TYPE 0;26 POINTER TO APPOINTMENT TYPE FILE (#409.1) (audited) LAST EDITED: NOV 02, 2016 HELP-PROMPT: Select an appointment type. DESCRIPTION: This field represents the appointment type for the appointment that is to be associated with this wait list request. AUDIT: YES, ALWAYS 409.3,9 ORIGINATING USER 0;10 POINTER TO NEW PERSON FILE (#200) LAST EDITED: APR 03, 2015 DESCRIPTION: User that enters the patient to the wait list. RECORD INDEXES: AC (#1356) 409.3,9.5 DATE/TIME ENTERED 3;4 DATE INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X LAST EDITED: OCT 27, 2014 HELP-PROMPT: Enter a date. Time is optional. DESCRIPTION: This is the Date and optional Time that this Wait List entry was entered. RECORD INDEXES: AC (#1356) 409.3,10 PRIORITY 0;11 SET (Required) 'A' FOR ASAP; 'F' FOR FUTURE; LAST EDITED: AUG 05, 2002 HELP-PROMPT: Select either ASAP which will set the desired date for the appointment as the current date or select Future which will allow you to enter a desired date (example: T+6M) DESCRIPTION: If the patient is assigned to either the Service/Specialty or Specific Clinic Wait List, a priority of Future or ASAP (as soon as possible) must be entered. Future indicates that the patient needs an appointment in the future and a desired will be entered by the user. ASAP indicates that the patient needs an appointment before the currently next available appointment (as soon as a slot opens). The desired date for ASAP will be set by the system as the current date. 409.3,10.5 ENROLLMENT PRIORITY 0;25 SET '1' FOR GROUP 1; '2' FOR GROUP 2; '3' FOR GROUP 3; '4' FOR GROUP 4; '5' FOR GROUP 5; '6' FOR GROUP 6; '7' FOR GROUP 7; '8' FOR GROUP 8; LAST EDITED: SEP 23, 2014 HELP-PROMPT: Select an enrollment priority DESCRIPTION: The ENROLLMENT PRIORITY field represents the Wait List Enrollment Priority. 409.3,11 REQUEST BY 0;12 SET (Required) (audited) '1' FOR PROVIDER; '2' FOR PATIENT; LAST EDITED: NOV 02, 2016 HELP-PROMPT: Enter who requested the appointment - the patient or a provider DESCRIPTION: If the patient is placed on a Service/Specialty or Specific Clinic Wait List type, the user must enter who requested the appointment - the patient or a provider. AUDIT: YES, ALWAYS 409.3,12 PROVIDER 0;13 POINTER TO NEW PERSON FILE (#200) (audited) LAST EDITED: NOV 02, 2016 HELP-PROMPT: This is the provider that requested the patient's appointment. Must be an active provider in file 200. DESCRIPTION: If the patient's appointment was requested by a provider, this is the provider that requested the patient's appointment. Must be an active provider in file 200. AUDIT: YES, ALWAYS 409.3,13 SCHEDULED DATE OF APPT 0;23 DATE INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X LAST EDITED: APR 26, 2005 HELP-PROMPT: Enter date/time of the scheduled appointment for this request DESCRIPTION: The Appointment date scheduled for a patient. This appointment may be used as a reason for closing Electronic Wait List entry. TECHNICAL DESCR: This is a date/time of the scheduled appointment related to this entry. 409.3,13.1 DATE APPT. MADE SDAPT;1 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: MAY 05, 2005 HELP-PROMPT: (No range limit on date) DESCRIPTION: This is the date the appointment was created. TECHNICAL DESCR: The Appointment Creation Date. It corresponds to the DATE APPT. MADE field (#20) of the APPOINTMENT multiple (#1900) in the Patient file (#2). 409.3,13.2 APPT CLINIC SDAPT;2 POINTER TO HOSPITAL LOCATION FILE (#44) LAST EDITED: JAN 04, 2005 HELP-PROMPT: Hospital Location the appointment is scheduled for. DESCRIPTION: This is a clinic the appointment was created for. TECHNICAL DESCR: Pointer to the HOSPITAL LOCATION file (#44) of the related appointment. 409.3,13.3 APPT INSTITUTION SDAPT;3 POINTER TO INSTITUTION FILE (#4) LAST EDITED: JAN 04, 2005 DESCRIPTION: The institution the clinic appointment belongs to. TECHNICAL DESCR: A pointer from the Hospital Location file of the scheduled appointment to the Institution file (#4). 409.3,13.4 APPT STOP CODE SDAPT;4 POINTER TO CLINIC STOP FILE (#40.7) LAST EDITED: MAY 06, 2005 DESCRIPTION: The stop code/specialty of a clinic associated with the patient appointment. TECHNICAL DESCR: This is the primary Stop Code Number pointer to the Stop Code file (#40.7). 409.3,13.5 APPT CREDIT STOP CODE SDAPT;5 POINTER TO CLINIC STOP FILE (#40.7) LAST EDITED: JAN 04, 2005 DESCRIPTION: The credit stop code optionally assigned to the Hospital Location file associated with the scheduled appointment. TECHNICAL DESCR: This is the secondary (optional) Stop Code Number pointer to the Stop Code file (#40.7). This stop code is assigned to the Hospital Location file associated with the scheduled appointment. 409.3,13.6 APPT STATION NUMBER SDAPT;6 FREE TEXT INPUT TRANSFORM: K:$L(X)>6!($L(X)<3)!'(X?3N.E) X LAST EDITED: APR 28, 2005 HELP-PROMPT: Answer must be 3-6 characters in length. DESCRIPTION: This is the 3 digit station number assigned to the facility plus optional modifiers. TECHNICAL DESCR: This is the Station Number field (#99) of the Institution file (#4) associated with the scheduled appointment. 409.3,13.7 APPT CLERK SDAPT;7 POINTER TO NEW PERSON FILE (#200) LAST EDITED: JAN 04, 2005 DESCRIPTION: This is a person who assigned the appointment to the EWL entry. TECHNICAL DESCR: This is a pointer to the New Person file and it represents a person who entered the scheduled appointment into the EWL. 409.3,13.8 APPT STATUS SDAPT;8 SET 'R' FOR Scheduled/Kept; 'I' FOR Inpatient; 'NS' FOR No-Show; 'NSR' FOR No_Show, Rescheduled; 'CP' FOR Canceled by Patient; 'CPR' FOR Canceled by Patient, Rescheduled; 'CC' FOR Canceled by Clinic; 'CCR' FOR Canceled by Clinic, Rescheduled; 'NT' FOR No Action Taken; LAST EDITED: JAN 12, 2005 DESCRIPTION: This is an appointment status. 409.3,14 SERVICE CONNECTED PERCENTAGE SC;1 NUMBER INPUT TRANSFORM: K:+X'=X!(X>100)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: JUN 27, 2005 HELP-PROMPT: Type a Number between 0 and 100, 0 Decimal Digits 409.3,15 SERVICE CONNECTED PRIORITY SC;2 SET '0' FOR NO; '1' FOR YES; LAST EDITED: JUN 27, 2005 RECORD INDEXES: GSB (#1445) 409.3,16 DO NOT REMOVE DATE 0;14 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: JUN 18, 2002 DESCRIPTION: If the patient has met the criteria that should remove him/her from the wait list but the user does not want the patient removed 409.3,17 USER ENTERING NO REMOVE 0;15 POINTER TO NEW PERSON FILE (#200) LAST EDITED: JUN 18, 2002 DESCRIPTION: User entering 'Do Not Remove' 409.3,18 DO NOT REMOVE REASON DNR;1 SET 'A' FOR Appointment Criteria Not Met; 'P' FOR Patient wants another appointment; 'PR' FOR Provider wants another appointment; 'O' FOR Other; LAST EDITED: OCT 09, 2002 HELP-PROMPT: Enter the reason for NOT removing the patient from the wait list. DESCRIPTION: Reason why the patient is not removed from Waiting List(Sch/PCMM) 409.3,18.1 DO NOT REMOVE COMMENT DNR;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>50!($L(X)<1) X LAST EDITED: AUG 21, 2002 HELP-PROMPT: Answer must be 1-50 characters in length. DESCRIPTION: Free Text comment (1-50 characters) for why wait list entry should not be removed when an appointment has met the wait list criteria. 409.3,19 DATE DISPOSITIONED DIS;1 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: JUN 18, 2002 DESCRIPTION: Date patient is dispositioned from the Wait List(Sch/PCMM) 409.3,20 DISPOSITIONED BY DIS;2 POINTER TO NEW PERSON FILE (#200) LAST EDITED: JUN 18, 2002 DESCRIPTION: User who dispositioned patient from Wait List(Sch/PCMM) 409.3,21 DISPOSITION DIS;3 SET 'D' FOR DEATH; 'NC' FOR REMOVED/NON-VA CARE; 'SA' FOR REMOVED/SCHEDULED-ASSIGNED; 'CC' FOR REMOVED/VA CONTRACT CARE; 'NN' FOR REMOVED/NO LONGER NECESSARY; 'ER' FOR ENTERED IN ERROR; 'TR' FOR TRANSFERRED; 'CL' FOR CHANGED CLINIC; 'EA' FOR REMOVED/EXTERNAL APP; LAST EDITED: MAY 08, 2020 HELP-PROMPT: Select a reason for removing the patient the wait list. DESCRIPTION: Reason patient has been dispositioned from Wait List(Sch/PCMM) 409.3,22 DESIRED DATE OF APPOINTMENT 0;16 DATE (Required) CID/PREFERRED DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: NOV 16, 2015 HELP-PROMPT: Enter the desired date for the appointment. The date can be imprecise. DESCRIPTION: If a patient is placed on a Service/Specialty or Clinic Specific Wait List type, the date the appointment is needed/desired. If the priority is ASAP, this is the date the patient is placed on the Wait List(Sch/PCMM). If the priority is Future, the user enters the date that the patient/provider needs an appointment scheduled. The field title contains 'CID/PREFERRED DATE', where 'CID' stands for Clinically Indicated Date. This is an alternate name for the field name used for reports and to present to users when adding and displaying appointment information in the Scheduling package. FIELD INDEX: GCC (#1447) REGULAR IR LOOKUP & SORTING Short Descr: SORT BY CLINIC ID AND CID/PREFERRED DATE Description: This xref is used to sort Wait List entries by the Clinic ID and the CID/PREFERRED DATE field (#22). The Clinic ID comes from the CLINIC field (#.01) of the SD WL CLINIC LOCATION file (#409.32). The SD WL CLINIC LOCATION pointer is in the WL SPECIFIC CLINIC field (#8) of the SD WAIT LIST file (#409.3). Set Logic: S ^SDWL(409.3,"GCC",X(1),X(2),DA)="" Kill Logic: K ^SDWL(409.3,"GCC",X(1),X(2),DA) Whole Kill: K ^SDWL(409.3,"GCC") X(1): Computed Code: S X=$P($G(^SDWL(409.32,+$P($G(^SDWL(409.3,DA,0)),U,9),0)),U,1) (Subscr 1) (forwards) X(2): DESIRED DATE OF APPOINTMENT (409.3,22) (Subscr 2) (forwards) RECORD INDEXES: GSC (#1442) 409.3,23 CURRENT STATUS 0;17 SET 'O' FOR OPEN; 'C' FOR CLOSED; LAST EDITED: DEC 02, 2014 HELP-PROMPT: Enter O or OPEN if the wait list entry is open. Enter C or CLOSED if the wait list entry is closed. DESCRIPTION: If the Wait List(Sch/PCMM) entry is dispositioned the status = CLOSED, otherwise the Wait List(Sch/PCMM) entry status = OPEN CROSS-REFERENCE: 409.3^E^MUMPS 1)= S:$P(^SDWL(409.3,DA,0),U,2)'="" ^SDWL(409.3,"E",X,$P(^SDWL(409.3,DA,0),U,2),DA)="" 2)= K:$P(^SDWL(409.3,DA,0),U,2)'="" ^SDWL(409.3,"E",X,$P(^SDWL(409.3,DA,0),U,2),DA) This xref is used to speed up the lookup of open or closed wait list entries for a given time range. 409.3,24 AUDIT POINTER AU;0 Multiple #409.324 409.324,.01 AUDIT POINTER 0;1 NUMBER INPUT TRANSFORM: K:+X'=X!(X>99999999999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: JUL 13, 2002 HELP-PROMPT: Type a Number between 1 and 99999999999, 0 Decimal Digits CROSS-REFERENCE: 409.324^B 1)= S ^SDWL(409.3,DA(1),"AU","B",$E(X,1,30),DA)="" 2)= K ^SDWL(409.3,DA(1),"AU","B",$E(X,1,30),DA) 409.3,25 COMMENTS 0;18 FREE TEXT (audited) INPUT TRANSFORM: K:$L(X)>60!($L(X)<1) X LAST EDITED: NOV 02, 2016 HELP-PROMPT: Answer must be 1-60 characters in length. DESCRIPTION: Free Text field to enter information related to the appointment that needs to be made. example: see progress note date 5/01/02 this would direct the scheduling clerk to a note that may contain lab,xray orders that need to be completed prior to the appointment. AUDIT: YES, ALWAYS 409.3,26 PACKAGE ORIGINATING 0;19 SET 'SD' FOR SCHEDULING; 'PCMM' FOR PCMM; LAST EDITED: JUN 28, 2002 409.3,27 EWL ENROLLEE STATUS 0;20 SET 'N' FOR NEW; 'E' FOR ESTABLISHED; 'P' FOR PRIOR; 'U' FOR UNDETERMINED; LAST EDITED: AUG 15, 2002 DESCRIPTION: A set of code that is determined by a formula looking at date patient last seen (file #391.91 and enrollment date from file #27.11) 409.3,27.1 EWL ENROLLEE DATE USED 1;3 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: MAY 09, 2006 DESCRIPTION: This field contains the actual date used to calculate the number of days between the current date and the last treatment or enrollment date. 409.3,27.2 EWL ENROLLEE DATABASE FILE 1;4 SET '0' FOR NONE; '1' FOR TREATING FACILITY; '2' FOR PATIENT ENROLLMENT; '3' FOR OUTPATIENT ENCOUNTER; '4' FOR KLF DOWNLOAD; LAST EDITED: MAY 22, 2006 DESCRIPTION: This field is used to track the file used to obtain either the last treatment date (TREATING FACILITY file #391.52) or the enrollment date (PATIENT ENROLLMENT file #27.11). It is used internally only for audit purposes. 409.3,28 EDITING USER 0;21 POINTER TO NEW PERSON FILE (#200) LAST EDITED: SEP 30, 2002 409.3,29 REOPEN REASON 1;1 SET 'CC' FOR INACTIVATED CLINIC; 'CA' FOR CANCELED APPOINTMENT; 'DE' FOR DATE OF DEATH ERROR; 'O' FOR OTHER; LAST EDITED: APR 26, 2005 DESCRIPTION: The reason why the closed EWL entry was open. TECHNICAL DESCR: This field has been added with patch SD*5.3*327. It is populated by the EWL background job. 409.3,30 REOPEN COMMENT 1;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>72!($L(X)<3) X LAST EDITED: MAR 11, 2005 HELP-PROMPT: Answer must be 3-72 characters in length DESCRIPTION: The comment used optionally with the Reopen Reason if applicable, 409.3,32 REJECTION FLAG FLAGS;2 SET '1' FOR REJECTED; LAST EDITED: MAY 13, 2006 409.3,33 SCHEDULING REMINDER FLAG FLAGS;3 SET 'Y' FOR TICKLER FLAG; LAST EDITED: JUN 05, 2006 409.3,34 INTRA TRANSFER FLAG FLAGS;4 SET '1' FOR INTRA TRANSFER FLAG; LAST EDITED: APR 27, 2006 409.3,36 120 DAYS FIELD FLAGS;6 SET '1' FOR NO APPOINTMENT; '2' FOR WITH APPOINTMENT; LAST EDITED: APR 27, 2006 409.3,37 CHANGED CLINIC PARENT POINTER 0;22 POINTER TO SD WAIT LIST FILE (#409.3) LAST EDITED: MAY 25, 2006 DESCRIPTION: When an EWL entry is closed with a disposition code of CL: CLINIC CHANGE, the process involves the creation of a new EWL entry with details copied from the parent. This is a pointer back to that parent entry. 409.3,38 MULTI TEAM FLAG FLAGS;5 SET '1' FOR MULTI TEAM LOCATION; '0' FOR SINGL TEAM LOCATION; LAST EDITED: MAY 24, 2006 409.3,39 120 DAY APPT CREATED FLAGS;1 SET '1' FOR APPT CREATED; LAST EDITED: MAY 29, 2006 409.3,44 PATIENT CONTACT 4;0 DATE Multiple #409.344 DESCRIPTION: This multiple records the patient contact events. 409.344,.01 DATE ENTERED 0;1 DATE INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X LAST EDITED: NOV 14, 2014 HELP-PROMPT: Enter a date. Time is optional. DESCRIPTION: This DATE ENTERED field represents the Date that an attempt was made to contact the patient regarding 'this' appointment. The time can also be optionally entered. CROSS-REFERENCE: 409.344^B 1)= S ^SDWL(409.3,DA(1),4,"B",$E(X,1,30),DA)="" 2)= K ^SDWL(409.3,DA(1),4,"B",$E(X,1,30),DA) RECORD INDEXES: AF (#1363) (WHOLE FILE #409.3) 409.344,2 ENTERED BY USER 0;2 POINTER TO NEW PERSON FILE (#200) LAST EDITED: OCT 01, 2014 HELP-PROMPT: Select a provider DESCRIPTION: The ENTERED BY USER field points to the NEW PERSON file and represents the user/provider that made an attempt to contact the patient regarding 'this' appointment. RECORD INDEXES: AF (#1363) (WHOLE FILE #409.3) 409.344,3 ACTION 0;3 SET 'C' FOR CALLED; 'M' FOR MESSAGE LEFT; 'L' FOR LETTER; LAST EDITED: APR 21, 2015 HELP-PROMPT: Select an action DESCRIPTION: The ACTION field represents the attempt that was made to contact the patient regarding 'this' appointment. C = Called M = Message Left L = LETTER 409.344,4 PATIENT PHONE 0;4 FREE TEXT INPUT TRANSFORM: K:$L(X)>20!($L(X)<4) X LAST EDITED: NOV 13, 2014 HELP-PROMPT: Answer must be 4-20 characters in length. DESCRIPTION: This is the phone number used to contact the patient. 409.3,45 VS AUDIT 6;0 DATE Multiple #409.345 (Add New Entry without Asking) DESCRIPTION: This multiple is used as an audit trail of specific fields for VistA Scheduling GUI. 409.345,.01 DATE EDITED 0;1 DATE (Multiply asked) INPUT TRANSFORM: S %DT="ETXR" D ^%DT S X=Y K:Y<1 X LAST EDITED: DEC 01, 2015 HELP-PROMPT: Enter a date and time DESCRIPTION: This is the Date/Time in which the edits represented by this entry were made. CROSS-REFERENCE: 409.345^B 1)= S ^SDWL(409.3,DA(1),6,"B",$E(X,1,30),DA)="" 2)= K ^SDWL(409.3,DA(1),6,"B",$E(X,1,30),DA) 409.345,1 EDITED BY 0;2 POINTER TO NEW PERSON FILE (#200) LAST EDITED: DEC 01, 2015 HELP-PROMPT: Enter a user DESCRIPTION: This is the user that edited the current VS AUDIT entry. 409.345,2 WL SPECIFIC CLINIC 0;3 POINTER TO SD WL CLINIC LOCATION FILE (#409.32) LAST EDITED: DEC 01, 2015 HELP-PROMPT: Select a clinic from the approved wait list clinics DESCRIPTION: This field represents the specific clinic from SD WL CLINIC LOCATION. 409.345,3 WL SPECIFIC HOSPITAL LOCATION 0;4 POINTER TO HOSPITAL LOCATION FILE (#44) LAST EDITED: DEC 01, 2015 HELP-PROMPT: Select a hospital location DESCRIPTION: This is the HOSPITAL LOCATION in which the WL SPECIFIC CLINIC points to. 409.345,4 WL SERVICE/SPECIALTY 0;5 POINTER TO SD WL SERVICE/SPECIALTY FILE (#409.31) LAST EDITED: DEC 01, 2015 HELP-PROMPT: Select a Service/Specialty DESCRIPTION: This field represents the Service/Specialty that matches the appointment that this wait list entry is waiting for. FILES POINTED TO FIELDS APPOINTMENT TYPE (#409.1) WL APPOINTMENT TYPE (#8.7) CLINIC STOP (#40.7) APPT STOP CODE (#13.4) APPT CREDIT STOP CODE (#13.5) HOSPITAL LOCATION (#44) WL SPECIFIC HOSPITAL LOCATION (#8.5) APPT CLINIC (#13.2) VS AUDIT:WL SPECIFIC HOSPITAL LOCATION (#3) INSTITUTION (#4) INSTITUTION (#2) APPT INSTITUTION (#13.3) NEW PERSON (#200) ORIGINATING USER (#9) PROVIDER (#12) APPT CLERK (#13.7) USER ENTERING NO REMOVE (#17) DISPOSITIONED BY (#20) EDITING USER (#28) PATIENT CONTACT:ENTERED BY USER (#2) VS AUDIT:EDITED BY (#1) PATIENT (#2) PATIENT (#.01) SD WAIT LIST (#409.3) CHANGED CLINIC PARENT POINTER (#37) SD WL CLINIC LOCATION (#409.32) WL SPECIFIC CLINIC (#8) VS AUDIT:WL SPECIFIC CLINIC (#2) SD WL SERVICE/SPECIALTY (#409.31) WL SERVICE/SPECIALTY (#7) VS AUDIT:WL SERVICE/SPECIALTY (#4) TEAM (#404.51) WL SPECIFIC TEAM (#5) TEAM POSITION (#404.57) WL SPECIFIC POSITION (#6) File #409.3 Record Indexes: AC (#1356) RECORD REGULAR IR SORTING ONLY Short Descr: Index by ORIGINATING DATE and ORIGINATING USER Description: This cross reference is used to sort by ORIGINATING DATE and ORIGINATING USER. Set Logic: S ^SDWL(409.3,"AC",X(1),X(2),DA)="" Kill Logic: K ^SDWL(409.3,"AC",X(1),X(2),DA) Whole Kill: K ^SDWL(409.3,"AC") X(1): DATE/TIME ENTERED (409.3,9.5) (Subscr 1) (forwards) X(2): ORIGINATING USER (409.3,9) (Subscr 2) (forwards) AD (#1357) RECORD REGULAR IR SORTING ONLY Short Descr: Index by PATIENT and WL SPECIFIC HOSPITAL LOCATION Description: This cross reference is used to sort by PATIENT and WL SPECIFIC HOSPITAL LOCATION. Set Logic: S ^SDWL(409.3,"AD",X(1),X(2),DA)="" Kill Logic: K ^SDWL(409.3,"AD",X(1),X(2),DA) Whole Kill: K ^SDWL(409.3,"AD") X(1): PATIENT (409.3,.01) (Subscr 1) (forwards) X(2): WL SPECIFIC HOSPITAL LOCATION (409.3,8.5) (Subscr 2) (forwards) GS (#1441) RECORD REGULAR IR LOOKUP & SORTING Short Descr: SORT BY CLINIC STOP (SERVICES) ID AND ORIGINATING DATE Description: This xref is used to sort/filter Wait List entries by the CLINIC STOP id and the ORIGINATING DATE field (#1). The CLINIC STOP id comes from the SD WL SERVICE/SPECIALTY file (#409.31). The WL SERVICE/SPECIALTY field (#7) in the SD WAIT LIST file (#409.3) contains the pointer to the SD WL SERVICE/SPECIALTY file. Set Logic: S ^SDWL(409.3,"GS",X(1),X(2),DA)="" Kill Logic: K ^SDWL(409.3,"GS",X(1),X(2),DA) Whole Kill: K ^SDWL(409.3,"GS") X(1): Computed Code: S X=$P($G(^SDWL(409.31,+$P($G(^SDWL(409.3,DA,0)),U,8),0)),U,1) (Subscr 1) (forwards) X(2): ORIGINATING DATE (409.3,1) (Subscr 2) (forwards) GSA (#1444) RECORD REGULAR IR LOOKUP & SORTING Short Descr: SORT BY CLINIC STOP (SERVICES) ID, SVC CONNECTED, AND ORIGINATING DATE Description: This xref is used to sort Wait List entries by the CLINIC STOP id, SERVICE CONNECTED, and the ORIGINATING DATE field (#1). The WL SERVICE/SPECIALTY field (#7) in the SD WAIT LIST file (#409.3) contains the pointer to the SD WL SERVICE/SPECIALTY file. The CLINIC STOP id is in the SERVICE/SPECIALTY field (#.01) of the SD WL SERVICE/SPECIALTY file (#409.31) SERVICE CONNECTED is the SERVICE CONNECTED? field (#.301) (a required field) in the PATIENT file (#2). Set Logic: S ^SDWL(409.3,"GSA",X(1),X(2),X(3),DA)="" Kill Logic: K ^SDWL(409.3,"GSA",X(1),X(2),X(3),DA) Whole Kill: K ^SDWL(409.3,"GSA") X(1): Computed Code: S X=$P($G(^SDWL(409.31,+$P($G(^SDWL(409.3,DA,0)),U,8),0)),U,1) (Subscr 1) (forwards) X(2): Computed Code: S X=$P($G(^DPT(+$P($G(^SDWL(409.3,DA,0)),U,1),.3)),U,1) (Subscr 2) (forwards) X(3): ORIGINATING DATE (409.3,1) (Subscr 3) (forwards) GSB (#1445) RECORD REGULAR IR LOOKUP & SORTING Short Descr: SORT BY CLINIC STOP (SVCS) ID, SVC CONNECTED PRIORITY, AND ORIGINATING DATE Description: This xref is used to sort Wait List entries by the CLINIC STOP id, SERVICE CONNECTED PRIORITY field (#15), and the ORIGINATING DATE field (#1). The WL SERVICE/SPECIALTY field (#7) in the SD WAIT LIST file (#409.3) contains the pointer to the SD WL SERVICE/SPECIALTY file. The CLINIC STOP id is in the SERVICE/SPECIALTY field (#.01) of the SD WL SERVICE/SPECIALTY file (#409.31). Set Logic: S ^SDWL(409.3,"GSB",X(1),X(2),X(3),DA)="" Kill Logic: K ^SDWL(409.3,"GSB",X(1),X(2),X(3),DA) Whole Kill: K ^SDWL(409.3,"GSB") X(1): Computed Code: S X=$P($G(^SDWL(409.31,+$P($G(^SDWL(409.3,DA,0)),U,8),0)),U,1) (Subscr 1) (forwards) X(2): SERVICE CONNECTED PRIORITY (409.3,15) (Subscr 2) (forwards) Transform (Storage): S X=+X X(3): ORIGINATING DATE (409.3,1) (Subscr 3) (forwards) GSC (#1442) RECORD REGULAR IR LOOKUP & SORTING Short Descr: SORT BY CLINIC STOP (SERVICES) ID AND CID/PREFERRED DATE Description: This xref is used to sort Wait List entries by the CLINIC STOP id and the CID/PREFERRED DATE field (#22). The CLINIC STOP id comes from the SD WL SERVICE/SPECIALTY file (#409.31). The WL SERVICE/SPECIALTY field (#7) in the SD WAIT LIST file (#409.3) contains the pointer to the SD WL SERVICE/SPECIALTY file. Set Logic: S ^SDWL(409.3,"GSC",X(1),X(2),DA)="" Kill Logic: K ^SDWL(409.3,"GSC",X(1),X(2),DA) Whole Kill: K ^SDWL(409.3,"GSC") X(1): Computed Code: S X=$P($G(^SDWL(409.31,+$P($G(^SDWL(409.3,DA,0)),U,8),0)),U,1) (Subscr 1) (forwards) X(2): DESIRED DATE OF APPOINTMENT (409.3,22) (Subscr 2) (forwards) GSP (#1443) RECORD REGULAR IR LOOKUP & SORTING Short Descr: SORT BY CLINIC STOP (SERVICES) ID, ENROLLMENT PRIORITY, AND ORIGINATING DATE Description: This xref is used to sort Wait List entries by the CLINIC STOP id, Patient's ENROLLMENT PRIORITY, and the ORIGINATING DATE field (#1). The CLINIC STOP id comes from the SD WL SERVICE/SPECIALTY file (#409.31). The WL SERVICE/SPECIALTY field (#7) in the SD WAIT LIST file (#409.3) contains the pointer to the SD WL SERVICE/SPECIALTY file. Set Logic: S ^SDWL(409.3,"GSP",X(1),X(2),X(3),DA)="" Kill Logic: K ^SDWL(409.3,"GSP",X(1),X(2),X(3),DA) Whole Kill: K ^SDWL(409.3,"GSP") X(1): Computed Code: S X=$P($G(^SDWL(409.31,+$P($G(^SDWL(409.3,DA,0)),U,8),0)),U,1) (Subscr 1) (forwards) X(2): Computed Code: S X=+$P($G(^DGEN(27.11,+$P($G(^DPT(+$P($G(^SDWL(409.3,DA,0)),U,1),"ENR")),U,1),0)),U,7) (Subscr 2) (forwards) X(3): ORIGINATING DATE (409.3,1) (Subscr 3) (forwards) Subfile #409.344 Record Indexes: AF (#1363) RECORD REGULAR IR SORTING ONLY WHOLE FILE (#409.3) Short Descr: Sort by DATE ENTERED and ENTERED BY USER of PATIENT CONTACTS Description: This cross reference sorts the whole SD WAIT LIST file by the DATE ENTERED and ENTERED BY USER of the PATIENT CONTACTS multiple field #44. Set Logic: S ^SDWL(409.3,"AF",X(1),X(2),DA(1),DA)="" Kill Logic: K ^SDWL(409.3,"AF",X(1),X(2),DA(1),DA) Whole Kill: K ^SDWL(409.3,"AF") X(1): DATE ENTERED (409.344,.01) (Subscr 1) (forwards) X(2): ENTERED BY USER (409.344,2) (Subscr 2) (forwards) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SDWL30DAY JAN 11, 2016@09:10 USER #0 EWL 30 DAY REPORT SDWLDNR SEP 15, 2006@11:45 USER #0 EWL NON-REMOVAL REASON REPORT SDWLRO DEC 15, 2015@09:58 USER #0 EWL Reopened Entries Report SDWLWTR DEC 15, 2015@14:47 USER #0 EWL WAIT TIME STATISTICS REPORT SORT TEMPLATE(S): SDWL30DAY OCT 19, 2006@16:07 USER #0 SORT BY: INSTITUTION// (INSTITUTION not null) WITHIN INSTITUTION, SORT BY: @DESIRED DATE OF APPOINTMENT// (User is asked range) WITHIN DESIRED DATE OF APPOINTMENT, SORT BY: @CURRENT STATUS// (User is asked range) Sort template for 30 day report. SDWLDNR AUG 24, 2006@10:19 USER #0 SORT BY: +@CURRENT STATUS// (CURRENT STATUS from C (CLOSED) to O (OPEN)) WITHIN CURRENT STATUS, SORT BY: PATIENT// (User is asked range) WITHIN PATIENT, SORT BY: ORIGINATING DATE// (User is asked range) Sort template for EWL DO NOT REMOVE report. SDWLRO MAR 23, 2005@13:27 USER #0 SORT BY: @CURRENT STATUS// (CURRENT STATUS equals O (OPEN)) WITHIN CURRENT STATUS, SORT BY: '@REOPEN REASON// (REOPEN REASON not null) Sort template to display field 29 REOPEN REASON. SDWLWTR OCT 20, 2006@14:18 USER #0 SORT BY: @ORIGINATING DATE// (User is asked range) WITHIN ORIGINATING DATE, SORT BY: '@SCHEDULED DATE OF APPT// (SCHEDULED DATE OF APPT not null) FORM(S)/BLOCK(S):