STANDARD DATA DICTIONARY #396.95 -- AMIE C&P EXAM TRACKING FILE                                                   3/24/25    PAGE 1
STORED IN ^DVB(396.95,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                      (VERSION 2.7)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file has been added for use by the 2507 REQUEST File (396.3).  It contains information about C&P appointments linked to 2507
Requests.  
 
This file should not be edited via FileMan.  The information in this file is crucial to proper calculation of the Average
Processing Time on the AMIE AMIS 290.  
 
NOTICE: This file is part of an implementation of a Nationally 
        Controlled Procedure.  Local modifications to this file 
        are prohibited per VHA Directive 10-93-142 


IDENTIFIED BY: CURRENT APPT DATE (#.03), 2507 REQUEST (#.06)[R]

CROSS
REFERENCED BY: CURRENT APPT DATE(AB), 2507 REQUEST(AB2), 2507 REQUEST(AR), ORIGINAL APPT DATE(ARO), 2507 REQUEST(ARO1), 
               CURRENT APPT DATE(ARVC), ORIGINAL APPT DATE(ARVO), VETERAN CANCELLATION(AVC2), 2507 REQUEST(AVC3), 
               VETERAN CANCELLATION(AVO2), 2507 REQUEST(AVO3), INITIAL APPT DATE(B), CURRENT APPT DATE(CD)



396.95,.01    INITIAL APPT DATE      0;1 DATE (Required)

              INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      OCT 28, 1994 
              HELP-PROMPT:      Enter the first appointment date scheduled. 
              DESCRIPTION:
                                This field contains the initial appointment date.  

              TECHNICAL DESCR:  The information in this field should not be modified by the site.  It contains the date of the
                                first appointment scheduled for the examination.  

              CROSS-REFERENCE:  396.95^B 
                                1)= S ^DVB(396.95,"B",$E(X,1,30),DA)=""
                                2)= K ^DVB(396.95,"B",$E(X,1,30),DA)


396.95,.02    ORIGINAL APPT DATE     0;2 DATE

              INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      OCT 28, 1994 
              HELP-PROMPT:      Enter the date of the original appointment for the examination. 
              DESCRIPTION:
                                This field contains the original appointment date.  

              TECHNICAL DESCR:  The information in this field should not be modified by the site.  It contains the date of the
                                original appointment for the examination.  This date will equal the current appointment until the
                                veteran reschedules.  
                                 
                                This date will be used for the clock stop date in the event of a veteran reschedule, if it is the
                                latest original appointment date rescheduled by the veteran.  

              CROSS-REFERENCE:  396.95^ARO^MUMPS 
                                1)= I $P(^DVB(396.95,DA,0),U,6)'="" S ^DVB(396.95,"ARO",$P(^DVB(396.95,DA,0),U,6),$E(X,1,30),DA)=""
                                2)= I $P(^DVB(396.95,DA,0),U,6)'="" K ^DVB(396.95,"ARO",$P(^DVB(396.95,DA,0),U,6),$E(X,1,30),DA)
                                 This Cross-Reference is used by the software that calculates the total processing time for a 2507
                                request.  It is used to find the last original appointment date on a 2507 request.  


              CROSS-REFERENCE:  396.95^ARVO^MUMPS 
                                1)= I $P(^DVB(396.95,DA,0),U,4)'="",($P(^DVB(396.95,DA,0),U,6)'="") N A,B S A=$P(^DVB(396.95,DA,0),
                                U,6),B=$P(^DVB(396.95,DA,0),U,4) S ^DVB(396.95,"ARVO",A,B,$E(X,1,30),DA)=""

                                2)= I $P(^DVB(396.95,DA,0),U,4)'="",($P(^DVB(396.95,DA,0),U,6)'="") N A,B S A=$P(^DVB(396.95,DA,0),
                                U,6),B=$P(^DVB(396.95,DA,0),U,4) K ^DVB(396.95,"ARVO",A,B,$E(X,1,30),DA)
                                 This Cross-Reference is used by the software that calculates the total processing time for a 2507
                                request.  It is used to find the last original appointment date on those appointments that have
                                been cancelled by the veteran.  This is to ensure that all appointments rescheduled at the request
                                of the veteran are completed within 30 days.  



396.95,.03    CURRENT APPT DATE      0;3 DATE

              INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      OCT 28, 1994 
              HELP-PROMPT:      Enter the date of the current appointment for the examination. 
              DESCRIPTION:
                                This field contains the current appointment date for the examination.  

              TECHNICAL DESCR:  The information in this field should not be modified by the site.  It contains the date of the
                                current appointment for the examination.  This date may be used for the clock start date in the
                                event of a veteran reschedule.  

              CROSS-REFERENCE:  396.95^AB^MUMPS 
                                1)= N A S A=$P(^DVB(396.95,DA,0),U,6) I +A>0 S ^DVB(396.95,"AB",A,$E(X,1,30),DA)=""
                                2)= N A S A=$P(^DVB(396.95,DA,0),U,6) I +A>0 K ^DVB(396.95,"AB",A,$E(X,1,30),DA)
                                 This cross reference is used to reference all the current appointment dates on a specific 2507
                                request.  


              CROSS-REFERENCE:  396.95^CD 
                                1)= S ^DVB(396.95,"CD",$E(X,1,30),DA)=""
                                2)= K ^DVB(396.95,"CD",$E(X,1,30),DA)
                                 This Cross Reference is used by the AMIE Appointment Management software to find a specific
                                appointment link in the AMIE C&P Exam Tracking File.  


              CROSS-REFERENCE:  396.95^ARVC^MUMPS 
                                1)= I $P(^DVB(396.95,DA,0),U,4)'="",($P(^DVB(396.95,DA,0),U,6)'="") N A,B S A=$P(^DVB(396.95,DA,0),
                                U,6),B=$P(^DVB(396.95,DA,0),U,4) S ^DVB(396.95,"ARVC",A,B,$E(X,1,30),DA)=""

                                2)= I $P(^DVB(396.95,DA,0),U,4)'="",($P(^DVB(396.95,DA,0),U,6)'="") N A,B S A=$P(^DVB(396.95,DA,0),
                                U,6),B=$P(^DVB(396.95,DA,0),U,4) K ^DVB(396.95,"ARVC",A,B,$E(X,1,30),DA)
                                 This Cross-Reference is used by the software that calculates the total processing time for a 2507
                                request.  It is used to find the last current appointment date on those appointments that have been
                                cancelled by the veteran.  This is to ensure that all appointments rescheduled at the request of
                                the veteran are completed within 30 days.  



396.95,.04    VETERAN CANCELLATION   0;4 SET (Required)

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      OCT 28, 1994 
              HELP-PROMPT:      Enter the date of the current appointment for the examination. 
              DESCRIPTION:      This field contains a code indicating if the appointment has been cancelled at the request of the
                                veteran.  

              TECHNICAL DESCR:  The information in this field should not be modified by the site.  It contains either of two values
                                for a set of codes (Yes or No).  In the event of a veteran reschedule, this field will indicate the
                                occurance so the Original Appt Date will not be modified with any subsequent reschedules.  

              CROSS-REFERENCE:  396.95^AVC2^MUMPS 
                                1)= I $P(^DVB(396.95,DA,0),U,3)'="",($P(^DVB(396.95,DA,0),U,6)'="") N A,B S A=$P(^DVB(396.95,DA,0),
                                U,6),B=$P(^DVB(396.95,DA,0),U,3) S ^DVB(396.95,"ARVC",A,$E(X,1,30),B,DA)=""

                                2)= I $P(^DVB(396.95,DA,0),U,3)'="",($P(^DVB(396.95,DA,0),U,6)'="") N A,B S A=$P(^DVB(396.95,DA,0),
                                U,6),B=$P(^DVB(396.95,DA,0),U,3) K ^DVB(396.95,"ARVC",A,$E(X,1,30),B,DA)
                                 This Cross-Reference is used by the software that calculates the total processing time for a 2507
                                request.  It is used to find the last current appointment date on those appointments that have been
                                cancelled by the veteran.  This is to ensure that all appointments rescheduled at the request of
                                the veteran are completed within 30 days.  


              CROSS-REFERENCE:  396.95^AVO2^MUMPS 
                                1)= I $P(^DVB(396.95,DA,0),U,2)'="",($P(^DVB(396.95,DA,0),U,6)'="") N A,B S A=$P(^DVB(396.95,DA,0),
                                U,6),B=$P(^DVB(396.95,DA,0),U,2) S ^DVB(396.95,"ARVO",A,$E(X,1,30),B,DA)=""

                                2)= I $P(^DVB(396.95,DA,0),U,2)'="",($P(^DVB(396.95,DA,0),U,6)'="") N A,B S A=$P(^DVB(396.95,DA,0),
                                U,6),B=$P(^DVB(396.95,DA,0),U,2) K ^DVB(396.95,"ARVO",A,$E(X,1,30),B,DA)
                                 This Cross-Reference is used by the software that calculates the total processing time for a 2507
                                request.  It is used to find the last original appointment date on those appointments that have
                                been cancelled by the veteran.  This is to ensure that all appointments rescheduled at the request
                                of the veteran are completed within 30 days.  



396.95,.05    VETERAN REQ APPT DATE  0;5 DATE

              INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      OCT 28, 1994 
              HELP-PROMPT:      Enter the last appointment date rescheduled for at the veteran's request. 
              DESCRIPTION:
                                This field contains the date to which the veteran last requested the appointment be rescheduled.  

              TECHNICAL DESCR:  The information in this field should not be modified by the site.  It contains the last date of the
                                appointment rescheduled to by the veteran.  


396.95,.06    2507 REQUEST           0;6 POINTER TO 2507 REQUEST FILE (#396.3) (Required)

              LAST EDITED:      OCT 28, 1994 
              HELP-PROMPT:      Enter the IEN from the 2507 Request this record points to. 
              DESCRIPTION:
                                This field contains a pointer to the 2507 request record this appointment is scheduled for.  

              TECHNICAL DESCR:  The information in this field should not be modified by the site.  It contains an IEN from file
                                396.3.  

              CROSS-REFERENCE:  396.95^AB2^MUMPS 
                                1)= N A S A=$P(^DVB(396.95,DA,0),U,3) I +A>0 S ^DVB(396.95,"AB",$E(X,1,30),A,DA)=""
                                2)= N A S A=$P(^DVB(396.95,DA,0),U,3) I +A>0 K ^DVB(396.95,"AB",$E(X,1,30),A,DA)
                                 This cross reference is used to look up Current Appt Dates on specific 2507 requests.  


              CROSS-REFERENCE:  396.95^AR 
                                1)= S ^DVB(396.95,"AR",$E(X,1,30),DA)=""
                                2)= K ^DVB(396.95,"AR",$E(X,1,30),DA)
                                 This Cross-Reference is used by DVBCPURG to delete those appointment records that are associated
                                with the 2507 request being deleted.  


              CROSS-REFERENCE:  396.95^ARO1^MUMPS 
                                1)= I $P(^DVB(396.95,DA,0),U,2)'="" S ^DVB(396.95,"ARO",$E(X,1,30),$P(^DVB(396.95,DA,0),U,2),DA)=""
                                2)= I $P(^DVB(396.95,DA,0),U,2)'="" K ^DVB(396.95,"ARO",$E(X,1,30),$P(^DVB(396.95,DA,0),U,2),DA)
                                 This Cross-Reference is used by the software that calculates the total processing time for a 2507
                                request.  It is used to find the last original appointment date on a 2507 request.  


              CROSS-REFERENCE:  396.95^AVC3^MUMPS 
                                1)= I ($P(^DVB(396.95,DA,0),U,3)'=""),($P(^DVB(396.95,DA,0),U,4)'="") N A,B S A=$P(^DVB(396.95,DA,0
                                ),U,4),B=$P(^DVB(396.95,DA,0),U,3) S ^DVB(396.95,"ARVC",$E(X,1,30),A,B,DA)=""

                                2)= I ($P(^DVB(396.95,DA,0),U,3)'=""),($P(^DVB(396.95,DA,0),U,4)'="") N A,B S A=$P(^DVB(396.95,DA,0
                                ),U,4),B=$P(^DVB(396.95,DA,0),U,3) K ^DVB(396.95,"ARVC",$E(X,1,30),A,B,DA)
                                 This Cross-Reference is used by the software that calculates the total processing time for a 2507
                                request.  It is used to find the last current appointment date on those appointments that have been
                                cancelled by the veteran.  This is to ensure that all appointments rescheduled at the request of
                                the veteran are completed within 30 days.  


              CROSS-REFERENCE:  396.95^AVO3^MUMPS 
                                1)= I $P(^DVB(396.95,DA,0),U,2)'="",($P(^DVB(396.95,DA,0),U,4)'="") N A,B S A=$P(^DVB(396.95,DA,0),
                                U,4),B=$P(^DVB(396.95,DA,0),U,2) S ^DVB(396.95,"ARVO",$E(X,1,30),A,B,DA)=""

                                2)= I $P(^DVB(396.95,DA,0),U,2)'="",($P(^DVB(396.95,DA,0),U,4)'="") N A,B S A=$P(^DVB(396.95,DA,0),
                                U,4),B=$P(^DVB(396.95,DA,0),U,2) K ^DVB(396.95,"ARVO",$E(X,1,30),A,B,DA)
                                 This Cross-Reference is used by the software that calculates the total processing time for a 2507
                                request.  It is used to find the last original appointment date on those appointments that have
                                been cancelled by the veteran.  This is to ensure that all appointments rescheduled at the request
                                of the veteran are completed within 30 days.  



396.95,.07    APPOINTMENT STATUS     0;7 SET (Required)

                                '1' FOR ACTIVE; 
                                '0' FOR CANCELLED; 
              LAST EDITED:      OCT 28, 1994 
              HELP-PROMPT:      Enter the status of the appointment tracked by this record. 
              DESCRIPTION:
                                This field contains a code indicating the status of the appointment.  

              TECHNICAL DESCR:  The information in this field should not be modified by the site.  It contains either of two values
                                for a set of codes (Active or Cancelled).  


396.95,.08    DATE APPT CANCELLED    0;8 DATE

              INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      NOV 07, 1994 
              HELP-PROMPT:      Enter the date the appointment this record is linked to was cancelled. 
              DESCRIPTION:
                                This field contains the date the appointment this link is associated with was last cancelled.  

              TECHNICAL DESCR:  The information in this field should not be modified by the site.  It contains the last date the
                                appointment was cancelled.  



      FILES POINTED TO                      FIELDS

2507 REQUEST (#396.3)             2507 REQUEST (#.06)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):