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 |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^DGCN(391.98

Package: Registration

Global: ^DGCN(391.98


Information

FileMan FileNo FileMan Filename Package
391.98 PATIENT DATA EXCEPTION Registration

Description

Directly Accessed By Routines, Total: 7

Package Total Routines
Registration 7 DG53P766    DG685PST    VAFCEHLM    VAFCEHU1    VAFCEHU2    VAFCMGB4    ^DGCN(391.98    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Registration 3 DG53P766    VAFCEHU1    VAFCEHU2    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Registration 1 PATIENT DATA ELEMENT(#391.99)[.01.04]    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Registration 2 EXCEPTION STATUS(#391.984)[.04]    PATIENT(#2)[.01]    
Kernel 1 NEW PERSON(#200)[12]    

Fields, Total: 7

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

  • LAST EDITED:  FEB 02, 1999
  • HELP-PROMPT:  Enter the patient name, between 1 and 30 characters.
  • DESCRIPTION:  
    An exception has been logged for this patient.
  • CROSS-REFERENCE:  391.98^B
    1)= S ^DGCN(391.98,"B",$E(X,1,30),DA)=""
    2)= K ^DGCN(391.98,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  391.98^AKY^MUMPS
    1)= N A,B,C S A=^DGCN(391.98,DA,0),B=$G(^DGCN(391.98,DA,"FRM")),C=$P(A,U,3) I B]"",C]"" S ^DGCN(391.98,"AKY",$E(X,1,30),B,C,DA)=""
    2)= N A,B,C S A=^DGCN(391.98,DA,0),B=$G(^DGCN(391.98,DA,"FRM")),C=$P(A,U,3) I B]"",C]"" K ^DGCN(391.98,"AKY",$E(X,1,30),B,C,DA)
    This is the first, of a three cross-reference, that is to be used as the key to this file. The Date of Event field (#.03) and the From Whom field (#50) are the other two cross-references.
  • CROSS-REFERENCE:  391.98^C^MUMPS
    1)= N A S A=$P($G(^DPT(X,0)),U,1) I A]"" S ^DGCN(391.98,"C",A,DA)=""
    2)= N A S A=$P($G(^DPT(X,0)),U,1) I A]"" K ^DGCN(391.98,"C",A,DA)
    This is the external to help in the sorting.
.02 DATE RECEIVED 0;2 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 24, 1996
  • HELP-PROMPT:  Enter the date that the exception was received at the facility.
  • DESCRIPTION:  
    This is the date that the exception was received at the facility.
.03 DATE OF EVENT 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 16, 1996
  • HELP-PROMPT:  Enter the date that the event occurred.
  • DESCRIPTION:  
    This is the date/time the event occurred that caused the information to be sent to this facility.
  • CROSS-REFERENCE:  391.98^AKY1^MUMPS
    1)= N A,B,C S A=^DGCN(391.98,DA,0),B=$P(A,U,1),C=$G(^DGCN(391.98,DA,"FRM")) I B]"",C]"" S ^DGCN(391.98,"AKY",B,C,$E(X,1,30),DA)=""
    2)= N A,B,C S A=^DGCN(391.98,DA,0),B=$P(A,U,1),C=$G(^DGCN(391.98,DA,"FRM")) I B]"",C]"" K ^DGCN(391.98,"AKY",B,C,$E(X,1,30),DA)
    This is the second field of the key cross-reference. The other two fields are the Patient field (#.01) and the From Whom field (#50).
  • CROSS-REFERENCE:  391.98^EVT
    1)= S ^DGCN(391.98,"EVT",$E(X,1,30),DA)=""
    2)= K ^DGCN(391.98,"EVT",$E(X,1,30),DA)
    This cross-reference is to organize the date of the events that caused this information to be sent.
.04 STATUS 0;4 POINTER TO EXCEPTION STATUS FILE (#391.984)
************************REQUIRED FIELD************************
EXCEPTION STATUS(#391.984)

  • LAST EDITED:  OCT 21, 1996
  • HELP-PROMPT:  Enter the status of this exception.
  • DESCRIPTION:  
    This is the status of the exception. Every entry should have a status.
  • CROSS-REFERENCE:  391.98^AST
    1)= S ^DGCN(391.98,"AST",$E(X,1,30),DA)=""
    2)= K ^DGCN(391.98,"AST",$E(X,1,30),DA)
    This cross-reference is used primarily to organize the statuses.
11 WHEN COMPLETED 1;1 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 15, 1996
  • HELP-PROMPT:  Enter the date that the exception event was completed.
  • DESCRIPTION:  
    This field contains the date/time the exception event was completed.
12 WHO COMPLETED 1;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  OCT 16, 1996
  • HELP-PROMPT:  Enter the person who marked the exception as being completed.
  • DESCRIPTION:  
    This is the person who marked the exception as being completed using the comparison screens.
50 FROM WHOM FRM;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>35!($L(X)<1) X
  • LAST EDITED:  OCT 16, 1996
  • HELP-PROMPT:  Enter the sender of the information.
  • DESCRIPTION:  
    This field contains the sender of the information that needs to be reviewed by the exception handler. This is a free text field so that a non-DHCP sender can be documented.
  • CROSS-REFERENCE:  391.98^FRM
    1)= S ^DGCN(391.98,"FRM",$E(X,1,30),DA)=""
    2)= K ^DGCN(391.98,"FRM",$E(X,1,30),DA)
    This is a cross-reference of who sent the exception data.
  • CROSS-REFERENCE:  391.98^AKY2^MUMPS
    1)= N A,B,C S A=^DGCN(391.98,DA,0),B=$P(A,U,1),C=$P(A,U,3) I A]"",B]"" S ^DGCN(391.98,"AKY",B,$E(X,1,35),C,DA)=""
    2)= N A,B,C S A=^DGCN(391.98,DA,0),B=$P(A,U,1),C=$P(A,U,3) I A]"",B]"" K ^DGCN(391.98,"AKY",B,$E(X,1,35),C,DA)
    This is the third field of the three field key to this file. The other two fields are the Patient field (#.01) and the Date of Event field (#.03).

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #3303
  • Clinical Information Resource Network
  • STATUS (.04).
    Access: Direct Global Read & w/Fileman

    External References

    Name Field # of Occurrence
    ^%DT .02+1, .03+1, 11+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DGCN(391.98 - [#391.98] .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K)
    .04(XREF 1S), .04(XREF 1K), 50(XREF 1S), 50(XREF 1K), 50(XREF 2S), 50(XREF 2K)
    ^DPT - [#2] .01(XREF 3S), .01(XREF 3K)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT .02+1*, .03+1*, 11+1*
    A .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .03(XREF 1S), .03(XREF 1K), 50(XREF 2S), 50(XREF 2K)
    B .01(XREF 2S), .01(XREF 2K), .03(XREF 1S), .03(XREF 1K), 50(XREF 2S), 50(XREF 2K)
    C .01(XREF 2S), .01(XREF 2K), .03(XREF 1S), .03(XREF 1K), 50(XREF 2S), 50(XREF 2K)
    >> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K)
    .04(XREF 1S), .04(XREF 1K), 50(XREF 1S), 50(XREF 1K), 50(XREF 2S), 50(XREF 2K)
    U .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .03(XREF 1S), .03(XREF 1K), 50(XREF 2S), 50(XREF 2K)
    X .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02+1*!, .03+1*!, .03(XREF 1S), .03(XREF 1K)
    .03(XREF 2S), .03(XREF 2K), .04(XREF 1S), .04(XREF 1K), 11+1*!, 50+1!, 50(XREF 1S), 50(XREF 1K), 50(XREF 2S), 50(XREF 2K)
    >> Y .02+1, .03+1, 11+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All