Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^SDWL(409.3

Package: Scheduling

Global: ^SDWL(409.3


Information

FileMan FileNo FileMan Filename Package
409.3 SD WAIT LIST Scheduling

Description

Directly Accessed By Routines, Total: 92

Package Total Routines
Scheduling 74 AUDIT POINTER    DATE OF TRANSMISSION    PATIENT CONTACT    SCMCTSK    SCMCWAIT    SD53P491    SDAMC    SDEC07
SDEC08    SDEC50    SDEC54    SDEC54A    SDECAR3    SDECINI2    SDECWL    SDECWL1
SDECWL2    SDECWL3    SDM1A    SDM2A    SDWL NON-REMOVAL REASON RPT    SDWL30DAY    SDWLAHRC    SDWLBACC
SDWLCU1    SDWLCU5    SDWLCU6    SDWLD    SDWLDISP    SDWLDNR    SDWLE    SDWLE1
SDWLE10    SDWLE11    SDWLE110    SDWLE111    SDWLE112    SDWLE113    SDWLE2    SDWLE3
SDWLE4    SDWLE5    SDWLE6    SDWLE7    SDWLEC    SDWLEVAL    SDWLFUL1    SDWLFULU
SDWLI    SDWLIFT3    SDWLMR    SDWLPE    SDWLPL    SDWLQSC    SDWLQSC1    SDWLR31
SDWLREB    SDWLRO    SDWLROF    SDWLROIS    SDWLROS    SDWLRP1    SDWLRP4    SDWLRPS1
SDWLRPS2    SDWLRPT1    SDWLRPT2    SDWLRSRS    SDWLSC    SDWLSCPE    SDWLTR    SDWLWTR
VS AUDIT    ^SDWL(409.3    
Mobile Scheduling Applications Suite 4 MBAARPC1    MBAARPC2    MBAARPCL    MBAAWLDA    
Consult Request Tracking 1 GMRCONS1    
Kernel 1 ^DIC(19    

Accessed By FileMan Db Calls, Total: 69

Package Total Routines
Scheduling 65 SCMCWAIT    SD53P491    SDEC07    SDEC08    SDEC26    SDECAR3    SDECIDX    SDECINI1
SDECINI2    SDECUTL    SDECWL3    SDM1A    SDM2A    SDWL120    SDWLAHRC    SDWLAHRP
SDWLAPI    SDWLBACC    SDWLCU3    SDWLCU5    SDWLCU6    SDWLD    SDWLDISP    SDWLE1
SDWLE11    SDWLE110    SDWLE111    SDWLE112    SDWLE113    SDWLE2    SDWLE3    SDWLE4
SDWLE5    SDWLE6    SDWLE7    SDWLEC    SDWLEVAL    SDWLFUL2    SDWLFULU    SDWLI
SDWLIFT    SDWLIFT2    SDWLIFT3    SDWLIFT5    SDWLIFT6    SDWLMR    SDWLPL    SDWLQSC
SDWLQSC1    SDWLR31    SDWLREB    SDWLROF    SDWLROI    SDWLROIS    SDWLRP1    SDWLRP3
SDWLRP4    SDWLRPS2    SDWLRPT1    SDWLRPT2    SDWLRSR    SDWLRSRS    SDWLSCPE    SDWLTR
SDWLTR1    
Mobile Scheduling Applications Suite 4 MBAARPC1    MBAARPC2    MBAARPCL    MBAAWLDA    

Pointed To By FileMan Files, Total: 4

Package Total FileMan Files
Scheduling 4 SDEC APPOINTMENT(#409.84)[.22]    SD WAIT LIST(#409.3)[37]    SDWL TRANSFER REQUEST(#409.35)[.01]    SDWL TRANSFER ACCEPT(#409.36)[409.3]    

Pointer To FileMan Files, Total: 11

Package Total FileMan Files
Scheduling 8 CLINIC STOP(#40.7)[13.413.5]    HOSPITAL LOCATION(#44)[8.513.2#409.345(3)]
TEAM(#404.51)[5]    TEAM POSITION(#404.57)[6]    APPOINTMENT TYPE(#409.1)[8.7]    SD WAIT LIST(#409.3)[37]    SD WL SERVICE/SPECIALTY(#409.31)[7#409.345(4)]    SD WL CLINIC LOCATION(#409.32)[8#409.345(2)]    
Kernel 2 INSTITUTION(#4)[213.3]    NEW PERSON(#200)[91213.7172028#409.344(2)#409.345(1)]    
Registration 1 PATIENT(#2)[.01]    

Fields, Total: 56

Field # Name Loc Type Details
.01 PATIENT 0;1 POINTER TO PATIENT FILE (#2)
************************REQUIRED FIELD************************
PATIENT(#2)

  • 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)
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)
2 INSTITUTION 0;3 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • 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)
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
3.1 DATE OF TRANSMISSION ACCDATE;0 DATE Multiple #409.33 409.33

  • DESCRIPTION:  
    Wait List Transmission date information - multiple
4 WAIT LIST TYPE 0;5 SET
************************REQUIRED FIELD************************
  • '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
5 WL SPECIFIC TEAM 0;6 POINTER TO TEAM FILE (#404.51) TEAM(#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)
6 WL SPECIFIC POSITION 0;7 POINTER TO TEAM POSITION FILE (#404.57) TEAM POSITION(#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)
7 WL SERVICE/SPECIALTY 0;8 POINTER TO SD WL SERVICE/SPECIALTY FILE (#409.31) SD WL SERVICE/SPECIALTY(#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)
8 WL SPECIFIC CLINIC 0;9 POINTER TO SD WL CLINIC LOCATION FILE (#409.32)
************************REQUIRED FIELD************************
SD WL CLINIC LOCATION(#409.32)

  • 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)
8.5 WL SPECIFIC HOSPITAL LOCATION 0;24 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#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)
8.7 WL APPOINTMENT TYPE 0;26 POINTER TO APPOINTMENT TYPE FILE (#409.1) APPOINTMENT TYPE(#409.1)

  • 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
9 ORIGINATING USER 0;10 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  APR 03, 2015
  • DESCRIPTION:  
    User that enters the patient to the wait list.
  • RECORD INDEXES:  AC (#1356)
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)
10 PRIORITY 0;11 SET
************************REQUIRED FIELD************************
  • '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.
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.
11 REQUEST BY 0;12 SET
************************REQUIRED FIELD************************
  • '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
12 PROVIDER 0;13 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • 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
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.
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).
13.2 APPT CLINIC SDAPT;2 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#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.
13.3 APPT INSTITUTION SDAPT;3 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#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).
13.4 APPT STOP CODE SDAPT;4 POINTER TO CLINIC STOP FILE (#40.7) CLINIC STOP(#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).
13.5 APPT CREDIT STOP CODE SDAPT;5 POINTER TO CLINIC STOP FILE (#40.7) CLINIC STOP(#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.
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.
13.7 APPT CLERK SDAPT;7 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#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.
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.
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
15 SERVICE CONNECTED PRIORITY SC;2 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  JUN 27, 2005
  • RECORD INDEXES:  GSB (#1445)
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
17 USER ENTERING NO REMOVE 0;15 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUN 18, 2002
  • DESCRIPTION:  
    User entering 'Do Not Remove'
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)
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.
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)
20 DISPOSITIONED BY DIS;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUN 18, 2002
  • DESCRIPTION:  
    User who dispositioned patient from Wait List(Sch/PCMM)
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;

  • LAST EDITED:  MAY 11, 2006
  • HELP-PROMPT:  Select a reason for removing the patient the wait list.
  • DESCRIPTION:  
    Reason patient has been dispositioned from Wait List(Sch/PCMM)
22 DESIRED DATE OF APPOINTMENT 0;16 DATE
************************REQUIRED FIELD************************

  • 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)
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.
24 AUDIT POINTER AU;0 Multiple #409.324 409.324
25 COMMENTS 0;18 FREE TEXT

  • 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
26 PACKAGE ORIGINATING 0;19 SET
  • 'SD' FOR SCHEDULING;
  • 'PCMM' FOR PCMM;

  • LAST EDITED:  JUN 28, 2002
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)
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.
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.
28 EDITING USER 0;21 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  SEP 30, 2002
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.
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,
32 REJECTION FLAG FLAGS;2 SET
  • '1' FOR REJECTED;

  • LAST EDITED:  MAY 13, 2006
33 SCHEDULING REMINDER FLAG FLAGS;3 SET
  • 'Y' FOR TICKLER FLAG;

  • LAST EDITED:  JUN 05, 2006
34 INTRA TRANSFER FLAG FLAGS;4 SET
  • '1' FOR INTRA TRANSFER FLAG;

  • LAST EDITED:  APR 27, 2006
36 120 DAYS FIELD FLAGS;6 SET
  • '1' FOR NO APPOINTMENT;
  • '2' FOR WITH APPOINTMENT;

  • LAST EDITED:  APR 27, 2006
37 CHANGED CLINIC PARENT POINTER 0;22 POINTER TO SD WAIT LIST FILE (#409.3) SD WAIT LIST(#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.
38 MULTI TEAM FLAG FLAGS;5 SET
  • '1' FOR MULTI TEAM LOCATION;
  • '0' FOR SINGL TEAM LOCATION;

  • LAST EDITED:  MAY 24, 2006
39 120 DAY APPT CREATED FLAGS;1 SET
  • '1' FOR APPT CREATED;

  • LAST EDITED:  MAY 29, 2006
44 PATIENT CONTACT 4;0 DATE Multiple #409.344 409.344

  • DESCRIPTION:  
    This multiple records the patient contact events.
45 VS AUDIT 6;0 DATE Multiple #409.345 409.345

  • DESCRIPTION:  
    This multiple is used as an audit trail of specific fields for VistA Scheduling GUI.

ICR, Total: 2

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #4842
  • CONSULT/REQUEST TRACKING
  • ORIGINATING DATE (1).
    Access: Direct Global Read & w/Fileman

    WL SERVICE/SPECIALTY (7).
    Access: Direct Global Read & w/Fileman

    WL SPECIFIC CLINIC (8).
    Access: Direct Global Read & w/Fileman

    CURRENT STATUS (23).
    Access: Direct Global Read & w/Fileman

    Also, direct read on "B" xref.
    ICR #6046
  • MOBILE SCHEDULING APPLICATIONS SUITE
  • NAME (.01).
    Access: Both R/W w/Fileman

    CURRENT STATUS (23).
    Access: Both R/W w/Fileman

    ORIGINATING DATE (1).
    Access: Read w/Fileman

    DESIRED DATE OF APPOINTMENT (22).
    Access: Both R/W w/Fileman

    WL SPECIFIC CLINIC (8).
    Access: Read w/Fileman

    PRIORITY (10).
    Access: Both R/W w/Fileman

    EWL ENROLLEE STATUS (27).
    Access: Both R/W w/Fileman

    SCHEDULED DATE OF APPT (13).
    Access: Write w/Fileman

    INSTITUTION (2).
    Access: Both R/W w/Fileman

    WAIT LIST TYPE (4).
    Access: Both R/W w/Fileman

    REQUEST BY (11).
    Access: Both R/W w/Fileman

    PROVIDER (12).
    Access: Both R/W w/Fileman

    COMMENTS (25).
    Access: Both R/W w/Fileman

    CHANGED CLINIC PARENT POINTER (37).
    Access: Both R/W w/Fileman

    DATE APPT MADE (13.1).
    Access: Both R/W w/Fileman

    APPT CLINIC (13.2).
    Access: Both R/W w/Fileman

    APPT INSTITUTION (13.3).
    Access: Both R/W w/Fileman

    APPT STOP CODE (13.4).
    Access: Both R/W w/Fileman

    APPT CREDIT STOP CODE (13.5).
    Access: Both R/W w/Fileman

    APPT STATION NUMBER (13.6).
    Access: Both R/W w/Fileman

    APPT CLERK (13.7).
    Access: Both R/W w/Fileman

    APPT STATUS (13.8).
    Access: Both R/W w/Fileman

    WL SPECIFIC CLINIC (8).
    Access: Direct Global Read & w/Fileman

    DATE DISPOSITIONED (19).
    Access: Both R/W w/Fileman

    DISPOSITIONED BY (20).
    Access: Both R/W w/Fileman

    DISPOSITION (21).
    Access: Both R/W w/Fileman

    PATIENT (.01).
    Access: Direct Global Read & w/Fileman

    EWL ENROLLEE DATE USED (27.1).
    Access: Both R/W w/Fileman

    EWL ENROLLEE DATABASE FILE (27.2).
    Access: Both R/W w/Fileman

    SERVICE CONNECTED PERCENTAGE (14).
    Access: Both R/W w/Fileman

    SERVICE CONNECTED PRIORITY (15).
    Access: Both R/W w/Fileman

    External References

    Name Field # of Occurrence
    ^%DT 1+1, 9.5+1, 13+1, 13.1+1, 16+1, 19+1, 22+1, 27.1+1
    ^DIC 2+1, 5+1
    Y^DIQ ID2+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD(4 ID2+1
    ^DGEN(27.11 - [#27.11] IXGSPP2CC+1
    ^DIC(4 - [#4] ID2+1
    ^DPT - [#2] IXGSAP2CC+1, IXGSPP2CC+1
    ^SDWL(409.3 - [#409.3] IXACSL+1*, IXACKL+1!, IXACKEIC+1!, IXADSL+1*, IXADKL+1!, IXADKEIC+1!, IXAFSL+1*, IXAFKL+1!, IXAFKEIC+1!, IXGCSL+1*
    , IXGCKL+1!, IXGCKEIC+1!, IXGCP1CC+1, IXGCCSL+1*, IXGCCKL+1!, IXGCCKEIC+1!, IXGCCP1CC+1, IXGSSL+1*, IXGSKL+1!, IXGSKEIC+1!
    , IXGSP1CC+1, IXGSASL+1*, IXGSAKL+1!, IXGSAKEIC+1!, IXGSAP1CC+1, IXGSAP2CC+1, IXGSBSL+1*, IXGSBKL+1!, IXGSBKEIC+1!, IXGSBP1CC+1
    , IXGSCSL+1*, IXGSCKL+1!, IXGSCKEIC+1!, IXGSCP1CC+1, IXGSPSL+1*, IXGSPKL+1!, IXGSPKEIC+1!, IXGSPP1CC+1, IXGSPP2CC+1, .01(XREF 1S)
    .01(XREF 1K), 1(XREF 2S), 1(XREF 2K), 2(XREF 1S), 2(XREF 1K), 5(XREF 1S), 5(XREF 1K), 5(XREF 2S), 5(XREF 2K), 6(XREF 1S)
    6(XREF 1K), 7(XREF 1S), 7(XREF 1K), 8(XREF 1S), 8(XREF 1K), 8(XREF 2S), 8(XREF 2K), 8.5(XREF 1S), 8.5(XREF 1K), 23(XREF 1S)
    23(XREF 1K)
    ^SDWL(409.31 - [#409.31] IXGSP1CC+1, IXGSAP1CC+1, IXGSBP1CC+1, IXGSCP1CC+1, IXGSPP1CC+1, 7(XREF 1S), 7(XREF 1K)
    ^SDWL(409.32 - [#409.32] IXGCP1CC+1, IXGCCP1CC+1, 8(XREF 1S), 8(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID2+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT 1+1*, 9.5+1*, 13+1*, 13.1+1*, 16+1*, 19+1*, 22+1*, 27.1+1*
    %I ID2+1*!
    >> C ID2+1*
    >> DA IXACSL+1, IXACKL+1, IXADSL+1, IXADKL+1, IXAFSL+1, IXAFKL+1, IXGCSL+1, IXGCKL+1, IXGCP1CC+1, IXGCCSL+1
    , IXGCCKL+1, IXGCCP1CC+1, IXGSSL+1, IXGSKL+1, IXGSP1CC+1, IXGSASL+1, IXGSAKL+1, IXGSAP1CC+1, IXGSAP2CC+1, IXGSBSL+1
    , IXGSBKL+1, IXGSBP1CC+1, IXGSCSL+1, IXGSCKL+1, IXGSCP1CC+1, IXGSPSL+1, IXGSPKL+1, IXGSPP1CC+1, IXGSPP2CC+1, .01(XREF 1S)
    .01(XREF 1K), 1(XREF 2S), 1(XREF 2K), 2(XREF 1S), 2(XREF 1K), 5(XREF 1S), 5(XREF 1K), 5(XREF 2S), 5(XREF 2K), 6(XREF 1S)
    6(XREF 1K), 7(XREF 1S), 7(XREF 1K), 8(XREF 1S), 8(XREF 1K), 8(XREF 2S), 8(XREF 2K), 8.5(XREF 1S), 8.5(XREF 1K), 23(XREF 1S)
    23(XREF 1K)
    >> DA(1 IXAFSL+1, IXAFKL+1
    DIC ID2+1, ID4+1, ID23+1, 2+1!*, 5+1!*
    DIC("S" 2+1*, 2SCR+1*, 5+1*, 5SCR+1*
    >> DIE 2+1, 5+1
    U ID2+1, IXGCP1CC+1, IXGCCP1CC+1, IXGSP1CC+1, IXGSAP1CC+1, IXGSAP2CC+1, IXGSBP1CC+1, IXGSCP1CC+1, IXGSPP1CC+1, IXGSPP2CC+1
    1(XREF 2S), 1(XREF 2K), 7(XREF 1S), 7(XREF 1K), 8(XREF 1S), 8(XREF 1K), 8(XREF 2S), 8(XREF 2K), 23(XREF 1S), 23(XREF 1K)
    X IXGCP1CC+1*, IXGCCP1CC+1*, IXGSP1CC+1*, IXGSAP1CC+1*, IXGSAP2CC+1*, IXGSBP1CC+1*, IXGSBP2TS+1*, IXGSCP1CC+1*, IXGSPP1CC+1*, IXGSPP2CC+1*
    .01(XREF 1S), .01(XREF 1K), 1+1*!, 1(XREF 2S), 1(XREF 2K), 2+1*!, 2(XREF 1S), 2(XREF 1K), 5+1*!, 5(XREF 1S)
    5(XREF 1K), 5(XREF 2S), 5(XREF 2K), 6(XREF 1S), 6(XREF 1K), 7(XREF 1S), 7(XREF 1K), 8(XREF 1S), 8(XREF 1K), 8(XREF 2S)
    8(XREF 2K), 8.5(XREF 1S), 8.5(XREF 1K), 9.5+1*!, 13+1*!, 13.1+1*!, 13.6+1!, 14+1!, 16+1*!, 18.1+1!
    , 19+1*!, 22+1*!, 23(XREF 1S), 23(XREF 1K), 25+1!, 27.1+1*!, 30+1!
    X(1 IXACSL+1, IXACKL+1, IXADSL+1, IXADKL+1, IXAFSL+1, IXAFKL+1, IXGCSL+1, IXGCKL+1, IXGCCSL+1, IXGCCKL+1
    , IXGSSL+1, IXGSKL+1, IXGSASL+1, IXGSAKL+1, IXGSBSL+1, IXGSBKL+1, IXGSCSL+1, IXGSCKL+1, IXGSPSL+1, IXGSPKL+1
    X(2 IXACSL+1, IXACKL+1, IXADSL+1, IXADKL+1, IXAFSL+1, IXAFKL+1, IXGCSL+1, IXGCKL+1, IXGCCSL+1, IXGCCKL+1
    , IXGSSL+1, IXGSKL+1, IXGSASL+1, IXGSAKL+1, IXGSBSL+1, IXGSBKL+1, IXGSCSL+1, IXGSCKL+1, IXGSPSL+1, IXGSPKL+1
    X(3 IXGSASL+1, IXGSAKL+1, IXGSBSL+1, IXGSBKL+1, IXGSPSL+1, IXGSPKL+1
    >> Y ID2+1*, 1+1, 2+1, 5+1, 9.5+1, 13+1, 13.1+1, 16+1, 19+1, 22+1
    , 27.1+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All