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

Package: Registration

Global: ^DG(45.85


Information

FileMan FileNo FileMan Filename Package
45.85 CENSUS WORKFILE Registration

Description

Directly Accessed By Routines, Total: 7

Package Total Routines
Registration 6 DGPTFMO1    ^DG(45.85    DGPTAPP1    DGPTCO1    DGPTCO3    DGPTCR    
Local Area Programs 1 AZAXDPM2    

Accessed By FileMan Db Calls, Total: 4

Package Total Routines
Registration 4 DGPTAPP1    DGPTCO1    DGPTCO3    DGPTCR    

Pointer To FileMan Files, Total: 5

Package Total FileMan Files
Registration 5 PTF CENSUS DATE(#45.86)[.04]    PATIENT MOVEMENT(#405)[.03]    PTF(#45)[.12]    WARD LOCATION(#42)[.06]    VA PATIENT(#2)[.01]    

Fields, Total: 9

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

  • DESCRIPTION:  
    This field contains the name of the inpatient.
  • CROSS-REFERENCE:  45.85^B
    1)= S ^DG(45.85,"B",$E(X,1,30),DA)=""
    2)= K ^DG(45.85,"B",$E(X,1,30),DA)
.02 ADMISSION DATE 0;2 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • DESCRIPTION:  
    This field contains the admission date and time associated with this workfile entry.
.03 ADMISSION ENTRY 0;3 POINTER TO PATIENT MOVEMENT FILE (#405) PATIENT MOVEMENT(#405)

  • LAST EDITED:  OCT 19, 1990
  • DESCRIPTION:  
    This field contains the internal entry number to the patient's admission multiple.  This number represent the admission entry that caused this workfile entry to be created.
.04 CENSUS DATE 0;4 POINTER TO PTF CENSUS DATE FILE (#45.86) PTF CENSUS DATE(#45.86)

  • LAST EDITED:  APR 12, 1990
  • DESCRIPTION:  This field contains the CENSUS DATE that the workfile entry is associated.
    Note that an admission can be associated with more than one census record but each workfile entry is associated with only one census record.
    As an example, a patient who was a continuous inpatient from 8/1/91 to 11/1/92 would have census records for the 9/30/91 and 9/30/92 censuses. This admission would have two workfile entries.
  • CROSS-REFERENCE:  45.85^ACENSUS
    1)= S ^DG(45.85,"ACENSUS",$E(X,1,30),DA)=""
    2)= K ^DG(45.85,"ACENSUS",$E(X,1,30),DA)
.05 DISCHARGE DATE 0;5 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • DESCRIPTION:  
    This field contains the discharge date and time associated with this workfile entry.
.06 WARD ON CENSUS DATE 0;6 POINTER TO WARD LOCATION FILE (#42) WARD LOCATION(#42)

  • DESCRIPTION:  
    This field contains the ward that the patient was on as of 11:59 of the CENSUS DATE.
.12 PTF NUMBER 0;12 POINTER TO PTF FILE (#45) PTF(#45)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,11)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 18, 1990
  • DESCRIPTION:  
    This field contains the PTF record that is assoicated with this workfile entry.
  • SCREEN:  S DIC("S")="I $P(^(0),U,11)=1"
  • EXPLANATION:  Only PTF records allowed.
  • CROSS-REFERENCE:  45.85^PTF
    1)= S ^DG(45.85,"PTF",$E(X,1,30),DA)=""
    2)= K ^DG(45.85,"PTF",$E(X,1,30),DA)
101 CENSUS STATUS COMPUTED

  • MUMPS CODE:  D STATUS^DGPTCO1
  • ALGORITHM:  D STATUS^DGPTCO1
  • DESCRIPTION:  This computed field will display/print the census status associated with the admission and CENSUS DATE for this workfile entry.
    Possible statuses are:   Open
    Closed
    Released
    Transmitted
103 CENSUS RECORD NUMBER COMPUTED

  • MUMPS CODE:  D CREC^DGPTCO1
  • ALGORITHM:  D CREC^DGPTCO1
  • LAST EDITED:  MAY 15, 1990
  • DESCRIPTION:  
    This computed field displays/prints the census record number associated with the admission and CENSUS DATE for this workfile entry.

External References

Name Field # of Occurrence
^%DT .02+1, .05+1
CREC^DGPTCO1 103+1
STATUS^DGPTCO1 101+1
^DIC .12+1
Y^DIQ ID.04+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(45.86 ID.04+1
^DG(45.85 - [#45.85] .01(XREF 1S), .01(XREF 1K), .04(XREF 1S), .04(XREF 1K), .12(XREF 1S), .12(XREF 1K)
^DG(45.86 - [#45.86] ID.04+1

Naked Globals

Name Field # of Occurrence
^(0 ID.04+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .02+1*, .05+1*
%I ID.04+1*!
>> C ID.04+1*
>> DA .01(XREF 1S), .01(XREF 1K), .04(XREF 1S), .04(XREF 1K), .12(XREF 1S), .12(XREF 1K)
DIC ID.04+1, .12+1!*
DIC("S" .12+1*, .12SCR+1*
>> DIE .12+1
U ID.04+1
X .01(XREF 1S), .01(XREF 1K), .02+1*!, .04(XREF 1S), .04(XREF 1K), .05+1*!, .12+1*!, .12(XREF 1S), .12(XREF 1K)
>> Y ID.04+1*, .02+1, .05+1, .12+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All