STANDARD DATA DICTIONARY #409.32 -- SD WL CLINIC LOCATION FILE 3/24/25 PAGE 1 STORED IN ^SDWL(409.32, *** 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 list of Clinics that can be used by an institution in the Wait List (Sch/PCMM) package. The clinic must be an active clinic in the Hospital Location file. Each entry in this file will contain a wait list activation date and inactivate date. DD ACCESS: @ RD ACCESS: WR ACCESS: D DEL ACCESS: @ LAYGO ACCESS: D AUDIT ACCESS: @ IDENTIFIED BY: INSTITUTION (#.02)[R] POINTED TO BY: WL SPECIFIC CLINIC field (#8) of the SD WAIT LIST File (#409.3) WL SPECIFIC CLINIC field (#2) of the VS AUDIT sub-field (#409.345) of the SD WAIT LIST File (#409.3) CROSS REFERENCED BY: DATE ACTIVATED(ACT), CLINIC(B), INSTITUTION(C), DATE INACTIVATED(INA) 409.32,.01 CLINIC 0;1 POINTER TO HOSPITAL LOCATION FILE (#44) (Required) LAST EDITED: SEP 28, 2006 HELP-PROMPT: Select a clinic that can have patients on a Wait List DESCRIPTION: Enter clinics that are approved to be used by the Wait List(Sch/PCMM) application. Only active clinics in the Hospital Location file can be added. UNEDITABLE CROSS-REFERENCE: 409.32^B 1)= S ^SDWL(409.32,"B",$E(X,1,30),DA)="" 2)= K ^SDWL(409.32,"B",$E(X,1,30),DA) 409.32,.02 INSTITUTION 0;6 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: JUL 09, 2007 DESCRIPTION: Institution of the clinic in the .01 field SCREEN: S DIC("S")="I $P(^(0),U,11)=""N"",$$TF^XUAF4(+Y)" EXPLANATION: INSTITUTION must be NATIONAL and a treating facility. CROSS-REFERENCE: 409.32^C 1)= S ^SDWL(409.32,"C",$E(X,1,30),DA)="" 2)= K ^SDWL(409.32,"C",$E(X,1,30),DA) 409.32,1 DATE ACTIVATED 0;2 DATE (Required) INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: SEP 23, 2002 HELP-PROMPT: This is a required. DESCRIPTION: Date the clinic is available to Wait List(Sch/PCMM). UNEDITABLE CROSS-REFERENCE: 409.32^ACT^MUMPS 1)= I $D(X) S ^SDWL(409.32,"ACT",$P(^SDWL(409.32,DA,0),U,6),$P(^(0),U,1),DA,X)="" 2)= K ^SDWL(409.32,"ACT",$P(^SDWL(409.32,DA,0),U,6),$P(^(0),U,1),DA,X) 409.32,2 ACTIVATION DATE ENTERED BY 0;3 POINTER TO NEW PERSON FILE (#200) LAST EDITED: JUN 18, 2002 DESCRIPTION: User entering activation date for clinic to Wait List(Sch/PCMM). 409.32,3 DATE INACTIVATED 0;4 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X I $D(X) K:$P(^SDWL(409.32,DA,0),U,2)>X X LAST EDITED: APR 23, 2008 DESCRIPTION: Date clinic can no longer be used by the Wait List(Sch/PCMM). It cannot be earlier than the activation date. CROSS-REFERENCE: 409.32^INA^MUMPS 1)= I $D(X) K ^SDWL(409.32,"ACT",$P(^SDWL(409.32,DA,0),U,6),$P(^(0),U,1)) 2)= Q 409.32,4 INACTIVATION DATE ENTERED BY 0;5 POINTER TO NEW PERSON FILE (#200) LAST EDITED: JUN 18, 2002 DESCRIPTION: Date the clinic is no longer to be used by Wait List(Sch/PCMM). FILES POINTED TO FIELDS HOSPITAL LOCATION (#44) CLINIC (#.01) INSTITUTION (#4) INSTITUTION (#.02) NEW PERSON (#200) ACTIVATION DATE ENTERED BY (#2) INACTIVATION DATE ENTERED BY (#4) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):