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