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 |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables |  All
Print Page as PDF
Global: ^ECX(727.821

Package: DSS Extracts

Global: ^ECX(727.821


Information

FileMan FileNo FileMan Filename Package
727.821 PHYSICAL MOVEMENT SETUP EXTRACT DSS Extracts

Description

Directly Accessed By Routines, Total: 3

Package Total Routines
DSS Extracts 3 ^ECX(727.821    ECX8211    ECX8212    

Pointer To FileMan Files, Total: 7

Package Total FileMan Files
Registration 4 MAS MOVEMENT TYPE(#405.2)[18]    PATIENT MOVEMENT(#405)[12]    SPECIALTY(#42.4)[15]    PATIENT(#2)[4]    
Scheduling 2 LOCATION TYPE(#40.9)[7]    HOSPITAL LOCATION(#44)[1420]    
DSS Extracts 1 DSS EXTRACT LOG(#727)[2]    

Fields, Total: 22

Field # Name Loc Type Details
.01 SEQUENCE NUMBER 0;1 NUMBER
************************REQUIRED FIELD************************

  • 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.821^AINV^MUMPS
    1)= S ^ECX(727.821,"AINV",-X,DA)=""
    2)= K ^ECX(727.821,"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.
1 YEAR MONTH 0;2 FREE TEXT

  • 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.821^AM
    1)= S ^ECX(727.821,"AM",$E(X,1,30),DA)=""
    2)= K ^ECX(727.821,"AM",$E(X,1,30),DA)
    3)= DO NOT DELETE
    This cross reference is essential for moving data from this file to file 727.808 to be transfered to the DSS software.
    DO NO DELETE OR MODIFY.
2 EXTRACT NUMBER 0;3 POINTER TO DSS EXTRACT LOG FILE (#727) DSS EXTRACT LOG(#727)

  • 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.821^AC
    1)= S ^ECX(727.821,"AC",$E(X,1,30),DA)=""
    2)= K ^ECX(727.821,"AC",$E(X,1,30),DA)
    3)= DO NOT DELETE.
    This cross reference is essential for managing and purging data in this file.
3 FACILITY 0;4 FREE TEXT

  • 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:  
    An indicator of the division where this event happened.  It is derived from the DIVISION field (.015) of the WARD LOCATION file (#42) which points to the MEDICAL CENTER DIVISION file (#40.8).
4 PATIENT NO. - DFN 0;5 POINTER TO PATIENT FILE (#2) PATIENT(#2)

  • 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:  
    Pointer to the PATIENT file (#2). This data represents the patient DFN. Using the "ATID1" cross reference on the PATIENT MOVEMENT file (#405), the PATIENT NO. - DFN data is derived from the PATIENT field (.03).
5 SSN 0;6 FREE TEXT

  • 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 PHYSICAL MOVEMENT SETUP EXTRACT file (#727.821), SSN data is derived from the SOCIAL SECURITY NUMBER field (.09) in the PATIENT file (#2).
6 NAME 0;7 FREE TEXT

  • 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 PHYSICAL MOVEMENT SETUP EXTRACT file (#727.821), 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.
7 IN OUT PATIENT INDICATOR 0;8 POINTER TO LOCATION TYPE FILE (#40.9) LOCATION TYPE(#40.9)

  • 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:  This field is initialized to a 1, indicating an outpatient status. If a call to IN5^VADPT (using the patient IEN and the event date) returns a patient movement number, then the field is reset to a 3 indicating inpatient
    status.
8 DAY 0;9 FREE TEXT

  • 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 the date of the physical movement.
  • 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.
9 PRODUCT 0;10 FREE TEXT

  • 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 product or feeder key for this extract as defined by the DSS Program Office.
  • TECHNICAL DESCR:  
    For the Physical Movement Setup extract, the PRODUCT field is null.
10 ADMISSION DATE 0;11 FREE TEXT

  • 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 string represents the date on which the admission associated with this physical movement occurred.
  • TECHNICAL DESCR:  Data source:
    PATIENT MOVEMENT file (#405); ADMISSION/CHECK-IN MOVEMENT field (#.14)
    then to 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.
11 DISCHARGE DATE 0;12 FREE TEXT

  • 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-charcter numeric string represents the date on which an\ associated patient Discharge occurred.
  • TECHNICAL DESCR:  For the Physical Movement Setup extract, the DISCHARGE DATE field is null.
    Format is YYYYMMDD; Year 2000 compliant per vendor.
12 MOVEMENT FILE # 0;13 POINTER TO PATIENT MOVEMENT FILE (#405) PATIENT MOVEMENT(#405)

  • 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("APMV",DFN,CORRES_ADM,INVERSE_DATE,D0) cross reference is used to obtain the current movement number associated with this patient.  It is a pointer to the PATIENT MOVEMENT file (#405).
13 TYPE 0;14 FREE TEXT

  • 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, either transfer (2) or discharge (3).
  • TECHNICAL DESCR:  
    For the Physical Movement Setup extract, the TYPE field is set to 2 for transfer.
14 LOSING WARD 0;15 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • LAST EDITED:  OCT 15, 1996
  • HELP-PROMPT:  Enter the ward from which this patient was transferred.
  • DESCRIPTION:  
    The ward from which this patient was transferred.
  • TECHNICAL DESCR:  LOSING WARD is derived from HOSPITAL LOCATION FILE POINTER field (44) of the WARD LOCATION file (#42) as pointed to by the WARD LOCATION field (.06) of the PATIENT MOVEMENT file (#405). LOSING WARD is a pointer to the
    HOSPITAL LOCATION file (#44).
15 TREATING SPECIALTY 0;16 POINTER TO SPECIALTY FILE (#42.4) SPECIALTY(#42.4)

  • LAST EDITED:  OCT 15, 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:  
    For the Physical Movement Setup extract, the TREATING SPECIALTY field is null.
16 DURATION 0;17 NUMBER

  • 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 movement date minus the date (DATE/TIME field (.01) of the PATIENT MOVEMENT file (#405)) of the last physical movement (ADMISSION/CHECK-IN MOVEMENT field (.14) of the PATIENT MOVEMENT file (#405)).
17 ATTENDING PHYSICIAN 0;18 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>11!($L(X)<1) X
  • LAST EDITED:  OCT 25, 1996
  • HELP-PROMPT:  Enter attending physician assigned to this patient.
  • DESCRIPTION:  
    The attending physician assigned to this patient with this movement.
  • TECHNICAL DESCR:  
    For the Physical Movement Setup extract, the ATTENDING PHYSICIAN field is null.
18 MOVEMENT TYPE 0;19 POINTER TO MAS MOVEMENT TYPE FILE (#405.2) MAS MOVEMENT TYPE(#405.2)

  • 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).
19 MOV TIME 0;20 FREE TEXT

  • 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:  
    This 6-character numeric string represents the time of day at which the physical movement occurred.
  • TECHNICAL DESCR:  Data source:
    PATIENT MOVEMENT file (#405); DATE/TIME field (#.01)
    This field is always exactly 6 numeric characters in length; if time cannot be determined, then "000300" is used as default.
20 GAINING WARD 0;21 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • LAST EDITED:  OCT 15, 1996
  • HELP-PROMPT:  Enter the ward to which this patient was moved.
  • DESCRIPTION:  
    The ward to which this patient was moved. This is null for discharge type movements.
  • TECHNICAL DESCR:  GAINING WARD is derived from the HOSPITAL LOCATION FILE POINTER field (44) of the WARD LOCATION file (#42) as pointed to by the WARD LOCATION field (.06) of the PATIENT MOVEMENT file (#405). GAINING WARD is a pointer to
    the HOSPITAL LOCATION file (#44).
21 ADMISSION TIME 0;22 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<6) 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 which represents the time of day at which the admission associated with the physical movement occurred.
  • TECHNICAL DESCR:  Data source:
    PATIENT MOVEMENT file (#405); ADMISSION/CHECK-IN MOVEMENT field (#.14)
    then to PATIENT MOVEMENT file (#405); DATE/TIME field (#.01)
    This field is always exactly 6 numeric characters in length; if time cannot be determined, then "000300" is used as default.

External References

Name Field # of Occurrence
$$ECXDATEX^ECXUTL 8OT+1, 10OT+1, 11OT+1
$$ECXTIMEX^ECXUTL 19OT+1, 21OT+1
$$ECXYMX^ECXUTL 1OT+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ECX(727.821 - [#727.821] .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K)
>> DINUM .01+1*
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K), 3+1!, 5+1!
, 6+1!, 8+1!, 9+1!, 10+1!, 11+1!, 13+1!, 16+1!, 17+1!, 19+1!, 21+1!
>> Y 1OT+1*, 8OT+1*, 10OT+1*, 11OT+1*, 19OT+1*, 21OT+1*
>> Y(0 1OT+1*, 8OT+1*, 10OT+1*, 11OT+1*, 19OT+1*, 21OT+1*
Info |  Desc |  Directly Accessed By Routines |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables |  All