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 |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^DGPF(26.15

Package: Registration

Global: ^DGPF(26.15


Information

FileMan FileNo FileMan Filename Package
26.15 PRF NATIONAL FLAG Registration

Description

Directly Accessed By Routines, Total: 11

Package Total Routines
Registration 10 DG53849P    DG53864P    DG53P425    DG53P554    DGPFANF    DGPFAPI1    DGPFAPIU    DGPFCNV
PRINCIPAL INVESTIGATOR(S)    ^DGPF(26.15    
Health Summary 1 GMTSRFHX    

Accessed By FileMan Db Calls, Total: 12

Package Total Routines
Registration 12 DG53849P    DG53864P    DG53869P    DGPFANF    DGPFHLQ4    DGPFHLT    DGPFHLT1    DGPFHLT2
DGPFHLT3    DGPFHLU    DGPFLMA2    DGPFUT64    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
Registration 1 PRF ASSIGNMENT(#26.13)[.02]    
Uncategorized 1 PRF HL7 REQUEST LOG(#26.22)[.04]    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
Kernel 1 NEW PERSON(#200)[#26.152(.01)]    
MailMan 1 MAIL GROUP(#3.8)[.06]    
Registration 1 PRF TYPE(#26.16)[.03]    
Text Integration Utility 1 TIU DOCUMENT DEFINITION(#8925.1)[.07]    

Fields, Total: 9

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S X=$$UP^XLFSTR(X) K:$E(X)'?1U!($E(X,$L(X))?1P)!($L(X)>30)!($L(X)<3)!'($TR(X," ","")?1U.UN) X
  • LAST EDITED:  MAR 31, 2004
  • HELP-PROMPT:  Answer must be 3-30 characters in length. No punctuation characters except spaces may be used. No leading or trailing spaces. Can contain numbers but not in the first position.
  • DESCRIPTION:  
    This field contains the nationally assigned name of the Patient Record Flag.
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  26.15^B
    1)= S ^DGPF(26.15,"B",$E(X,1,30),DA)=""
    2)= K ^DGPF(26.15,"B",$E(X,1,30),DA)
  • RECORD INDEXES:  ASTAT (#269), ATIU (#647), ATYPE (#270)
.02 STATUS 0;2 SET
************************REQUIRED FIELD************************
  • '0' FOR INACTIVE;
  • '1' FOR ACTIVE;

  • LAST EDITED:  APR 23, 2003
  • HELP-PROMPT:  Enter the status of the patient record flag.
  • DESCRIPTION:  
    This field contains the Active or Inactive status of the Patient Record Flag.  Modification of this field should only be performed by national patch installation.
  • TECHNICAL DESCR:  This field contains the Active or Inactive status of the Patient Record Flag as a set of codes. This field will be used as a trigger that will be fired when the Status of either a LOCAL (#26.11) or a NATIONAL (#26.15)
    Patient Record Flag is changed from Active to Inactive.  The trigger process will Inactivate ALL active Patient Record Flag Assignment records in the PRF ASSIGNMENT (#26.13) file associated with this flag.
    UNEDITABLE
  • FIELD INDEX:  AINACT (#268) MUMPS I ACTION
    Short Descr:  Trigger for Status change to all Assignments.
    Description:  The trigger process will Inactivate ALL active Patient Record Flag Assignment records in the PRF ASSIGNMENT (#26.13) file associated with this flag.
    Set Logic:  I X(1)=0,X1(1)=1 D INACT^DGPFDD(DA,X(1),26.15,DUZ)
    Kill Logic:  Q
    X(1):  STATUS  (26.15,.02)  (forwards)
  • RECORD INDEXES:  ASTAT (#269)
.03 TYPE 0;3 POINTER TO PRF TYPE FILE (#26.16)
************************REQUIRED FIELD************************
PRF TYPE(#26.16)

  • LAST EDITED:  APR 23, 2003
  • HELP-PROMPT:  Enter the Patient Record Flag Type. '??' to list available Types.
  • DESCRIPTION:  
    This field contains the usage classification of the Patient Record Flag.
  • TECHNICAL DESCR:  
    This field contains the usage classification of the Patient Record Flag as a pointer to the PRF TYPE file (#26.16).
    UNEDITABLE
  • RECORD INDEXES:  ATYPE (#270)
.04 REVIEW FREQUENCY DAYS 0;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>730)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 31, 2003
  • HELP-PROMPT:  Enter a Number between 0 and 730, 0 Decimal Digits
  • DESCRIPTION:  
    This field represents the number of days that may elapse between reviews of a Patient Record Flag Assignment.  A value of zero ("0") indicates that no automatic review will occur.
    UNEDITABLE
.05 NOTIFICATION DAYS 0;5 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>729)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 23, 2003
  • HELP-PROMPT:  Enter a Number between 0 and 729, 0 Decimal Digits
  • DESCRIPTION:  This field contains the number of days prior to a patient record flag assignment's review date that a notification is sent to the flag's Review Mail Group. Per the VHA Directive for the Nationally mandated Category I
    Patient Record Flags project, this field value will be set to 60 days.
    UNEDITABLE
.06 REVIEW MAIL GROUP 0;6 POINTER TO MAIL GROUP FILE (#3.8) MAIL GROUP(#3.8)

  • LAST EDITED:  APR 23, 2003
  • HELP-PROMPT:  Enter the mail group that will receive review notifications.(Note: Must start with DGPF)
  • DESCRIPTION:  This field contains the name of the mail group whose members will receive MailMan notification of Patient Record Flag Assignments that are due for review.
    The mail group name must begin with 'DGPF'.
    UNEDITABLE
.07 TIU PN TITLE 0;7 POINTER TO TIU DOCUMENT DEFINITION FILE (#8925.1)
************************REQUIRED FIELD************************
TIU DOCUMENT DEFINITION(#8925.1)

  • LAST EDITED:  MAY 11, 2004
  • HELP-PROMPT:  Enter the associated Category I Progress Note Title.
  • DESCRIPTION:  
    This field contains the Category I Progress Note Title that is associated with this Patient Record Flag.
  • TECHNICAL DESCR:  
    This field contains the pointer to the TIU DOCUMENT DEFINITION file (#8925.1).  This field is used to link a Progress Note Title to the Patient Record Flag.  DBIA Reference: (#4386)
    UNEDITABLE
  • RECORD INDEXES:  ATIU (#647)
1 DESCRIPTION 1;0 WORD-PROCESSING #26.151

  • DESCRIPTION:  
    This field contains the text that describes the purpose and instructions for application of this national Patient Record Flag to a patient.
2 PRINCIPAL INVESTIGATOR(S) 2;0 POINTER Multiple #26.152 26.152

  • DESCRIPTION:  
    This multiple field contains the principal investigator(s) names when the Flag TYPE is RESEARCH.
  • TECHNICAL DESCR:  
    This multiple field contains the principal investigator(s) names as a pointer to the NEW PERSON file (#200).  This field is used when the Flag TYPE is RESEARCH.

Found Entries, Total: 4

NAME: BEHAVIORAL    NAME: HIGH RISK FOR SUICIDE    NAME: MISSING PATIENT    NAME: URGENT ADDRESS AS FEMALE    

ICR, Total: 2

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #5991
  • Health Summary
  • ICR #7021
  • Scheduling
  • NAME (.01).
    Access: Read w/Fileman

    STATUS (.02).
    Access: Read w/Fileman

    External References

    Name Field # of Occurrence
    INACT^DGPFDD IXAINACTSL+1
    Y^DIQ ID.03+1
    $$UP^XLFSTR .01+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD(26.16 ID.03+1
    ^DGPF(26.15 - [#26.15] IXASTATSL+1*, IXASTATKL+1!, IXASTATKEIC+1!, IXATIUSL+1*, IXATIUKL+1!, IXATIUKEIC+1!, IXATYPESL+1*, IXATYPEKL+1!, IXATYPEKEIC+1!, IXCSL+1*
    , IXCKL+1!, IXCKEIC+1!, .01(XREF 1S), .01(XREF 1K)
    ^DGPF(26.16 - [#26.16] ID.03+1

    Naked Globals

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

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    %I ID.03+1*!
    >> C ID.03+1*
    >> DA IXAINACTSL+1, IXASTATSL+1, IXASTATKL+1, IXATIUSL+1, IXATIUKL+1, IXATYPESL+1, IXATYPEKL+1, IXCSL+1, IXCKL+1, .01(XREF 1S)
    .01(XREF 1K)
    >> DA(1 IXCSL+1, IXCKL+1
    >> DIC ID.02+1, ID.03+1
    DUZ IXAINACTSL+1
    U ID.03+1
    X IXCSL+1, IXCKL+1, .01+1*!, .01(XREF 1S), .01(XREF 1K), .04+1!, .05+1!
    X(1 IXAINACTSL+1, IXASTATSL+1, IXASTATKL+1, IXATIUSL+1, IXATIUKL+1, IXATYPESL+1, IXATYPEKL+1
    X(2 IXASTATSL+1, IXASTATKL+1, IXATIUSL+1, IXATIUKL+1, IXATYPESL+1, IXATYPEKL+1
    >> X1(1 IXAINACTSL+1
    >> Y ID.03+1*
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All