Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields
Print Page as PDF
Global: ^DGCN(391.99

Package: Registration

Global: ^DGCN(391.99


Information

FileMan FileNo FileMan Filename Package
391.99 PATIENT DATA ELEMENT Registration

Description

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Registration 3 DG53P766    VAFCEHU1    VAFCEHU2    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Registration 1 PATIENT DATA EXCEPTION(#391.98)[.01, .04]    

Fields, Total: 7

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

  • LAST EDITED:  OCT 16, 1996
  • HELP-PROMPT:  Enter the patient data exception.
  • DESCRIPTION:  
    This is a pointer to the PATIENT DATA EXCEPTION. This .01 is not unique.
  • CROSS-REFERENCE:  391.99^B
    1)= S ^DGCN(391.99,"B",$E(X,1,30),DA)=""
    2)= K ^DGCN(391.99,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  391.99^AKY^MUMPS
    1)= N A,B,C S A=^DGCN(391.99,DA,0),B=$P(A,U,2),C=$P(A,U,3) I B]"",C]"" S ^DGCN(391.99,"AKY",$E(X,1,30),B,C,DA)=""
    2)= N A,B,C S A=^DGCN(391.99,DA,0),B=$P(A,U,2),C=$P(A,U,3) I B]"",C]"" K ^DGCN(391.99,"AKY",$E(X,1,30),B,C,DA)
    This is the first field in the three field key cross-reference. The other fields are the File field (#.02) and the Field field (#.03)
.02 FILE 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1) X
  • LAST EDITED:  OCT 16, 1996
  • HELP-PROMPT:  Answer must be 1-25 characters in length.
  • DESCRIPTION:  
    This is the file that the data element would be placed in.
  • CROSS-REFERENCE:  391.99^AKY1^MUMPS
    1)= N A,B,C S A=^DGCN(391.99,DA,0),B=$P(A,U,1),C=$P(A,U,3) I B]"",C]"" S ^DGCN(391.99,"AKY",B,$E(X,1,30),C,DA)=""
    2)= N A,B,C S A=^DGCN(391.99,DA,0),B=$P(A,U,1),C=$P(A,U,3) I B]"",C]"" K ^DGCN(391.99,"AKY",B,$E(X,1,30),C,DA)
    This is the second field in the three field key cross-reference. The other fields are the Exception field (#.01) and the Field field (#.03).
  • CROSS-REFERENCE:  391.99^ASRT^MUMPS
    1)= N A S A=$P(^DGCN(391.99,DA,0),U,3) I A]"" S ^DGCN(391.99,"ASRT",$E(X,1,30),A,DA)=""
    2)= N A S A=$P(^DGCN(391.99,DA,0),U,3) I A]"" K ^DGCN(391.99,"ASRT",$E(X,1,30),A,DA)
    This two field cross-reference is used to sort the data by file and field. The other field in the cross-reference is the Field field (#.03).
.03 FIELD 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1) X
  • LAST EDITED:  OCT 17, 1996
  • HELP-PROMPT:  Answer must be 1-25 characters in length.
  • DESCRIPTION:  
    This is the field the data element belongs in.
  • CROSS-REFERENCE:  391.99^AKY2^MUMPS
    1)= N A,B,C S A=^DGCN(391.99,DA,0),B=$P(A,U,1),C=$P(A,U,2) I B]"",C]"" S ^DGCN(391.99,"AKY",B,C,$E(X,1,30),DA)=""
    2)= N A,B,C S A=^DGCN(391.99,DA,0),B=$P(A,U,1),C=$P(A,U,2) I B]"",C]"" K ^DGCN(391.99,"AKY",B,C,$E(X,1,30),DA)
    This is the third field in the three field key cross-reference. The other fields are the Exception field (#.01) and the File field (#.02).
  • CROSS-REFERENCE:  391.99^ASRT1^MUMPS
    1)= N A S A=$P(^DGCN(391.99,DA,0),U,2) I A]"" S ^DGCN(391.99,"ASRT",A,$E(X,1,30),DA)=""
    2)= N A S A=$P(^DGCN(391.99,DA,0),U,2) I A]"" K ^DGCN(391.99,"ASRT",A,$E(X,1,30),DA)
    This is the second part of the cross-reference that sorts the data element by file and field. The other field is the File field (#.02).
.04 MASTER FILE 0;4 POINTER TO PATIENT DATA EXCEPTION FILE (#391.98) PATIENT DATA EXCEPTION(#391.98)

  • LAST EDITED:  OCT 16, 1996
  • HELP-PROMPT:  Enter Patient Data Exception.
  • DESCRIPTION:  
    This is a pointer to this file. Its use will be for the definition of multiples. At this point in time it is not used.
.05 EDITED? 0;5 SET
  • '1' FOR YES;

  • LAST EDITED:  AUG 05, 1997
  • HELP-PROMPT:  Enter YES or 1 if the element was edited.
  • DESCRIPTION:  
    This field flags incoming data elements that were actually edited at the site which originated the incoming message.
.06 UNRESOLVED? 0;6 SET
  • '1' FOR YES;

  • LAST EDITED:  SEP 22, 1997
  • HELP-PROMPT:  Enter YES or 1 if the element cannot be resolved.
  • DESCRIPTION:  
    This field flags incoming data elements that cannot be resolved.
50 VALUE VAL;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>245!($L(X)<1) X
  • LAST EDITED:  OCT 16, 1996
  • HELP-PROMPT:  Enter the value that will be placed in the field.
  • DESCRIPTION:  
    This is the value that will be placed in the field.
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields