STANDARD DATA DICTIONARY #727.822 -- TREATING SPECIALTY CHANGE SETUP EXTRACT FILE                                 3/24/25    PAGE 1
STORED IN ^ECX(727.822,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                     (VERSION 3.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file is used to hold information to create data for the treating specialty changes for inpatients on the date that a site 
chooses to begin using DSS.  Data is entered into this file by a background job which identifies all patients who were in the
facility on the selected date.  Then these entries are moved, by another background job, to the TREATING SPECIALTY CHANGE EXTRACT
file (#727.817) to be transferred to the DSS package.  Once the transfer to the TREATING SPECIALTY CHANGE EXTRACT file (#727.817)
is complete, data is purged from this file, and it becomes inactive.  
  
Data elements in this file should never be entered, edited, or deleted through the VA FileMan.  


COMPILED CROSS-REFERENCE ROUTINE: ECX822

CROSS
REFERENCED BY: EXTRACT NUMBER(AC), SEQUENCE NUMBER(AINV), YEAR MONTH(AM)



727.822,.01   SEQUENCE NUMBER        0;1 NUMBER (Required)

              Sequence Number   
              INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
              LAST EDITED:      OCT 15, 1996 
              HELP-PROMPT:      Enter a number between 1 and 999999999, 0 decimal digits. 
              DESCRIPTION:
                                The record number for this extract entry.  

              TECHNICAL DESCR:
                                The internal entry number (IEN) for this record. This entry is DINUMed.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  727.822^AINV^MUMPS 
                                1)= S ^ECX(727.822,"AINV",-X,DA)=""
                                2)= K ^ECX(727.822,"AINV",-X,DA)
                                3)= DO NOT DELETE.
                                This is an inverse entry cross reference.  It is used to find the last entry in the file.  It is
                                essential for the management of the extract and the purge of extract data.  



727.822,1     YEAR MONTH             0;2 FREE TEXT

              Year/Month   
              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>6!($L(X)<6)!'(X?6N) X
              OUTPUT TRANSFORM: S Y=$$ECXYMX^ECXUTL(Y)
              LAST EDITED:      SEP 24, 1997 
              HELP-PROMPT:      Answer must be 6 characters in length. 
              DESCRIPTION:      A six character numeric string representing the year and the month for which this extract was
                                performed.  

              TECHNICAL DESCR:
                                Format is YYYYMM; Year 2000 compliant per vendor.  

              CROSS-REFERENCE:  727.822^AM 
                                1)= S ^ECX(727.822,"AM",$E(X,1,30),DA)=""
                                2)= K ^ECX(727.822,"AM",$E(X,1,30),DA)
                                3)= DO NOT DELETE
                                This cross reference is essential for moving data from this file to file 727.817 to be transfered
                                to the DSS software.  
                                 
                                DO NOT DELETE OR MODIFY.  
                                 



727.822,2     EXTRACT NUMBER         0;3 POINTER TO DSS EXTRACT LOG FILE (#727)

              Extract Number   
              LAST EDITED:      OCT 15, 1996 
              HELP-PROMPT:      Enter the extract number for this extract. 
              DESCRIPTION:
                                The corresponding entry in the DSS EXTRACT LOG file (#727) for this extract.  

              TECHNICAL DESCR:  A pointer to the DSS EXTRACT LOG file (#727). The primary purpose is to pick up the header for the
                                mail message.  

              CROSS-REFERENCE:  727.822^AC 
                                1)= S ^ECX(727.822,"AC",$E(X,1,30),DA)=""
                                2)= K ^ECX(727.822,"AC",$E(X,1,30),DA)
                                3)= DO NOT DELETE.
                                This cross reference is essential for managing and purging data in this file.  



727.822,3     FACILITY               0;4 FREE TEXT

              Facility   
              INPUT TRANSFORM:  K:$L(X)>7!($L(X)<1) X
              LAST EDITED:      OCT 16, 1996 
              HELP-PROMPT:      Enter the station number where this extract was performed. 
              DESCRIPTION:
                                Identifies the facility for this extract record.  

              TECHNICAL DESCR:
                                For the Treating Specialty Change Setup extract, the FACILITY field is null.  


727.822,4     PATIENT NO. - DFN      0;5 POINTER TO PATIENT FILE (#2)

              Patient No. - DFN   
              LAST EDITED:      OCT 16, 1996 
              HELP-PROMPT:      Enter the name of the patient for this extract record. 
              DESCRIPTION:
                                The name of the patient for this extract record.  

              TECHNICAL DESCR:  Derived from the PATIENT field (.03) in the PATIENT MOVEMENT file (#405), which is a pointer to the
                                PATIENT file (#2). This data represents the patient DFN.  


727.822,5     SSN                    0;6 FREE TEXT

              Social Security Number   
              INPUT TRANSFORM:  K:$L(X)>10!($L(X)<9)!'(X?9N!X?9N1"P") X
              LAST EDITED:      OCT 15, 1996 
              HELP-PROMPT:      Your answer must be 9 to 10 characters in length. 
              DESCRIPTION:
                                The patient's social security number.  

              TECHNICAL DESCR:  Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (4) in the TREATING SPECIALTY
                                CHANGE SETUP EXTRACT file (#727.822), SSN data is derived from the SOCIAL SECURITY NUMBER field
                                (.09) in the PATIENT file (#2).  


727.822,6     NAME                   0;7 FREE TEXT

              Name   
              INPUT TRANSFORM:  K:$L(X)>4!($L(X)<4) X
              LAST EDITED:      OCT 15, 1996 
              HELP-PROMPT:      Your answer must be 4 characters in length. 
              DESCRIPTION:
                                The first four characters of the patient's last name.  

              TECHNICAL DESCR:  Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (4) in the TREATING SPECIALTY
                                CHANGE SETUP EXTRACT file (#727.822), NAME data is derived from the NAME field (.01) in the PATIENT
                                file (#2). The first four characters of the first "," piece are used, padded with trailing spaces
                                if necessary.  


727.822,7     IN OUT PATIENT INDICATOR 0;8 POINTER TO LOCATION TYPE FILE (#40.9)

              In Out Patient Indicator   
              LAST EDITED:      OCT 15, 1996 
              HELP-PROMPT:      Enter the appropriate inpatient or outpatient indicator. 
              DESCRIPTION:
                                Indicates whether the patient was an inpatient or an outpatient for this extract entry.  

              TECHNICAL DESCR:  For the Treating Specialty Change Setup extract this field is set to 3, indicating inpatient status
                                in the LOCATION TYPE file (#40.9).  


727.822,8     DAY                    0;9 FREE TEXT

              Day   
              INPUT TRANSFORM:  K:$L(X)>8!($L(X)<8) X
              OUTPUT TRANSFORM: S Y=$$ECXDATEX^ECXUTL(Y)
              LAST EDITED:      SEP 24, 1997 
              HELP-PROMPT:      Answer must be 8 characters in length. 
              DESCRIPTION:      An 8-character numeric string that represents the date on which the Treating Specialty change took
                                place.  

              TECHNICAL DESCR:  Data source: 
                                 
                                PATIENT MOVEMENT file (#405); DATE/TIME field (#.01) 
                                 
                                This field is always exactly 8 numeric characters in length.  The format is YYYYMMDD; for example,
                                19970923.  If the date cannot be determined, then a default is used.  The default date value is the
                                value of the YEAR MONTH field (#1) concatenated with "01" for the day (DD) portion.  Year 2000
                                compliant per vendor.  


727.822,9     PRODUCT                0;10 FREE TEXT

              Product   
              INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
              LAST EDITED:      OCT 15, 1996 
              HELP-PROMPT:      The product or feeder key for this extract. 
              DESCRIPTION:
                                The product or feeder key for this extract.  

              TECHNICAL DESCR:
                                For the Treating Specialty Change Setup extract, the PRODUCT field is null.  


727.822,10    ADMISSION DATE         0;11 FREE TEXT

              Admission Date   
              INPUT TRANSFORM:  K:$L(X)>8!($L(X)<8) X
              OUTPUT TRANSFORM: S Y=$$ECXDATEX^ECXUTL(Y)
              LAST EDITED:      SEP 24, 1997 
              HELP-PROMPT:      Answer must be 8 characters in length. 
              DESCRIPTION:      An 8-character numeric string that represents the date of the Admission associated with this
                                Treating Specialty change.  

              TECHNICAL DESCR:  Data source: 
                                 
                                PATIENT MOVEMENT file (#405); ADMISSION/CHECK-IN MOVEMENT field (#.14) 
                                   then to PATIENT MOVEMENT FILE (#405); DATE/TIME (#.01) 
                                 
                                This field is always exactly 8 numeric characters in length.  The format is YYYYMMDD; for example,
                                19970923.  If the date cannot be determined, then a default is used.  The default date value is the
                                value of the YEAR MONTH field (#1) concatenated with "01" for the day (DD) portion.  Year 2000
                                compliant per vendor.  


727.822,11    DISCHARGE DATE         0;12 FREE TEXT

              Discharge Date   
              INPUT TRANSFORM:  K:$L(X)>8!($L(X)<8) X
              OUTPUT TRANSFORM: S Y=$$ECXDATEX^ECXUTL(Y)
              LAST EDITED:      SEP 24, 1997 
              HELP-PROMPT:      Answer must be 8 characters in length. 
              DESCRIPTION:      This 8-character numeric string represents a Discharge date associated with the Treating Specialty
                                change.  

              TECHNICAL DESCR:  For the Treating Specialty Change Setup extract, the DISCHARGE DATE field is null.  
                                 
                                Format is YYYYMMDD; Year 2000 compliant per vendor.  


727.822,12    MOVEMENT FILE #        0;13 POINTER TO PATIENT MOVEMENT FILE (#405)

              Movement File Number   
              LAST EDITED:      OCT 15, 1996 
              HELP-PROMPT:      Enter the patient movement number associated with this extract record. 
              DESCRIPTION:
                                Current patient movement record associated with this extract record.  

              TECHNICAL DESCR:  The ^DGPM("ATS",DFN,ADM,INV_DATE, cross reference is used to obtain the current movement number
                                associated with this patient. It is a pointer to the PATIENT MOVEMENT file (#405).  


727.822,13    TYPE                   0;14 FREE TEXT

              Type   
              INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
              LAST EDITED:      OCT 15, 1996 
              HELP-PROMPT:      Your answer must be 1 character in length. 
              DESCRIPTION:
                                The type of movement for this patient.  

              TECHNICAL DESCR:
                                Using the "ATT"_TYPE cross reference where TYPE=6 (specialty change).  


727.822,14    GAINING WARD           0;15 POINTER TO HOSPITAL LOCATION FILE (#44)

              Gaining Ward   
              LAST EDITED:      OCT 16, 1996 
              HELP-PROMPT:      Enter the patient's ward. 
              DESCRIPTION:
                                The ward on which this patient was placed.  

              TECHNICAL DESCR:
                                For the Treating Specialty Change Setup extract, the GAINING WARD field is null.  


727.822,15    NEW TREATING SPECIALTY 0;16 POINTER TO SPECIALTY FILE (#42.4)

              New Treating Specialty   
              LAST EDITED:      OCT 16, 1996 
              HELP-PROMPT:      Enter the name of the treating specialty associated with this extract record. 
              DESCRIPTION:
                                The name of the treating specialty associated with this extract record.  

              TECHNICAL DESCR:  NEW TREATING SPECIALTY is derived from the FACILITY TREATING SPECIALTY field (.09) in the PATIENT
                                MOVEMENT file (#405). This facility treating specialty data is a pointer to the FACILITY TREATING
                                SPECIALTY file (#45.7). Using the SPECIALTY field (1) in the FACILITY TREATING SPECIALTY file
                                (#45.7), the pointer to the SPECIALTY file (#42.4) is obtained.  


727.822,16    DURATION               0;17 NUMBER

              Duration   
              INPUT TRANSFORM:  K:+X'=X!(X>5000)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      OCT 15, 1996 
              HELP-PROMPT:      Enter a number between 0 and 5000, 0 decimal digits. 
              DESCRIPTION:
                                Duration of stay within this movement.  

              TECHNICAL DESCR:  Calculated as current treating specialty date minus the date (DATE/TIME field (.01) of the PATIENT
                                MOVEMENT file (#405)) of the last treating specialty change.  


727.822,17    ATTENDING PHYSICIAN    0;18 FREE TEXT

              Attending Physician   
              INPUT TRANSFORM:  K:$L(X)>11!($L(X)<1) X
              LAST EDITED:      OCT 16, 1996 
              HELP-PROMPT:      Enter attending physician for this patient. 
              DESCRIPTION:
                                The attending physician assigned to this patient with this movement.  

              TECHNICAL DESCR:  Derived from the ATTENDING PHYSICIAN field (.19) of the PATIENT MOVEMENT file (#405). If ATTENDING
                                PHYSICIAN is a pointer to the NEW PERSON file (#200), it is stored as "2"_pointer value. If
                                ATTENDING PHYSICIAN is a pointer to the PROVIDER file (#6), it is stored as "6"_pointer value.  


727.822,18    MOVEMENT TYPE          0;19 POINTER TO MAS MOVEMENT TYPE FILE (#405.2)

              Movement Type   
              LAST EDITED:      OCT 15, 1996 
              HELP-PROMPT:      Enter the patient movement number associated with this extract record. 
              DESCRIPTION:
                                The MAS movement type for this movement.  

              TECHNICAL DESCR:  MOVEMENT TYPE is derived from the MAS MOVEMENT TYPE field (.18) of the PATIENT MOVEMENT file
                                (#405). It is a pointer to the MAS MOVEMENT TYPE file (#405.2).  


727.822,19    TRT TIME               0;20 FREE TEXT

              TRT Time   
              INPUT TRANSFORM:  K:$L(X)>6!($L(X)<6)!'(X?6N) X
              OUTPUT TRANSFORM: S Y=$$ECXTIMEX^ECXUTL(Y,0)
              LAST EDITED:      SEP 24, 1997 
              HELP-PROMPT:      Answer must be 6 characters in length. 
              DESCRIPTION:      A 6-character numeric string representing the time of day when the Treating Specialty change took
                                place.  

              TECHNICAL DESCR:  Data source: 
                                 
                                PATIENT MOVEMENT file (#405); DATE/TIME field (#.01); 
                                   2nd "." piece only.  
                                 
                                This field is always exactly 6 numeric characters in length; if time cannot be determined, then
                                "000300" is used as default.  


727.822,20    ADMISSION TIME         0;21 FREE TEXT

              Admission Time   
              INPUT TRANSFORM:  K:$L(X)>6!($L(X)<6)!'(X?6N) X
              OUTPUT TRANSFORM: S Y=$$ECXTIMEX^ECXUTL(Y,0)
              LAST EDITED:      SEP 24, 1997 
              HELP-PROMPT:      Answer must be 6 characters in length. 
              DESCRIPTION:      A 6-character numeric string that represent the time of day of the Admission associated with this
                                Treating Specialty change.  

              TECHNICAL DESCR:  Data source: 
                                 
                                PATIENT MOVEMENT file (#405); ADMISSION/CHECK-IN MOVEMENT field (#.14) 
                                   then to PATIENT MOVEMENT FILE (#405); DATE/TIME (#.01) 
                                 
                                This field is always exactly 6 numeric characters in length; if time cannot be determined, then
                                "000300" is used as default.  



      FILES POINTED TO                      FIELDS

DSS EXTRACT LOG (#727)            EXTRACT NUMBER (#2)

HOSPITAL LOCATION (#44)           GAINING WARD (#14)

LOCATION TYPE (#40.9)             IN OUT PATIENT INDICATOR (#7)

MAS MOVEMENT TYPE (#405.2)        MOVEMENT TYPE (#18)

PATIENT (#2)                      PATIENT NO. - DFN (#4)

PATIENT MOVEMENT (#405)           MOVEMENT FILE # (#12)

SPECIALTY (#42.4)                 NEW TREATING SPECIALTY (#15)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):