STANDARD DATA DICTIONARY #26.15 -- PRF NATIONAL FLAG FILE                                                         6/27/25    PAGE 1
STORED IN ^DGPF(26.15,  (4 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                     (VERSION 5.3)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains a list of the Category I (National) Patient Record Flags that can be assigned to a patient.  
 
Category I flags are established at a National level and any changes to this file or it's entries should only be done through a
national patch release.  


IDENTIFIED BY: STATUS (#.02)[R], TYPE (#.03)[R]

POINTED TO BY: FLAG NAME field (#.02) of the PRF ASSIGNMENT File (#26.13) 
               PRF FLAG field (#.04) of the PRF HL7 REQUEST LOG File (#26.22) 
               

CROSS
REFERENCED BY: NAME(B)

INDEXED BY:    STATUS (AINACT), STATUS & NAME (ASTAT), TIU PN TITLE & NAME (ATIU), TYPE & NAME (ATYPE), PRINCIPAL INVESTIGATOR(S)
               (C)




26.15,.01     NAME                   0;1 FREE TEXT (Required)

              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)

26.15,.02     STATUS                 0;2 SET (Required)

                                '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)

26.15,.03     TYPE                   0;3 POINTER TO PRF TYPE FILE (#26.16) (Required)

              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)

26.15,.04     REVIEW FREQUENCY DAYS  0;4 NUMBER (Required)

              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

26.15,.05     NOTIFICATION DAYS      0;5 NUMBER (Required)

              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

26.15,.06     REVIEW MAIL GROUP      0;6 POINTER TO MAIL GROUP FILE (#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

26.15,.07     TIU PN TITLE           0;7 POINTER TO TIU DOCUMENT DEFINITION FILE (#8925.1) (Required)

              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)

26.15,1       DESCRIPTION            1;0   WORD-PROCESSING #26.151   (NOWRAP)

              DESCRIPTION:      This field contains the text that describes the purpose and instructions for application of this
                                national Patient Record Flag to a patient.  


                LAST EDITED:      FEB 27, 2003 
                HELP-PROMPT:      Enter the purpose and instructions for assigning this flag 
                DESCRIPTION:      This field contains the text that describes the purpose and application of this national Patient
                                  Record Flag to a patient.  




26.15,2       PRINCIPAL INVESTIGATOR(S) 2;0 POINTER Multiple #26.152 (Add New Entry without Asking)

              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.  


26.152,.01      PRINCIPAL INVESTIGATOR(S) 0;1 POINTER TO NEW PERSON FILE (#200)

                LAST EDITED:      MAR 01, 2005 
                HELP-PROMPT:      Enter the Principal Investigator name 
                DESCRIPTION:      This field contains the name of the Principal Investigator associated with the Research Type of
                                  this Patient Record Flag.  

                                  UNEDITABLE
                CROSS-REFERENCE:  26.152^B 
                                  1)= S ^DGPF(26.15,DA(1),2,"B",$E(X,1,30),DA)=""
                                  2)= K ^DGPF(26.15,DA(1),2,"B",$E(X,1,30),DA)

                FIELD INDEX:      C (#648)    REGULAR    IR    LOOKUP & SORTING    WHOLE FILE (#26.15)
                    Short Descr:  Lookup & Sort by PRINCIPAL INVESTIGATOR and NAME fields.
                      Set Logic:  S ^DGPF(26.15,"C",X,DA(1),DA)=""
                     Kill Logic:  K ^DGPF(26.15,"C",X,DA(1),DA)
                     Whole Kill:  K ^DGPF(26.15,"C")
                           X(1):  PRINCIPAL INVESTIGATOR(S)  (26.152,.01)  (Subscr 1)  (forwards)





      FILES POINTED TO                      FIELDS

MAIL GROUP (#3.8)                 REVIEW MAIL GROUP (#.06)

NEW PERSON (#200)                 PRINCIPAL INVESTIGATOR(S):PRINCIPAL INVESTIGATOR(S) (#.01)

PRF TYPE (#26.16)                 TYPE (#.03)

TIU DOCUMENT DEFINITION (#8925.1)  TIU PN TITLE (#.07)


File #26.15

  Record Indexes:

  ASTAT (#269)    RECORD    REGULAR    IR    SORTING ONLY
      Short Descr:  This is a sort only index of the STATUS & NAME fields.
        Set Logic:  S ^DGPF(26.15,"ASTAT",X(1),$E(X(2),1,30),DA)=""
       Kill Logic:  K ^DGPF(26.15,"ASTAT",X(1),$E(X(2),1,30),DA)
       Whole Kill:  K ^DGPF(26.15,"ASTAT")
             X(1):  STATUS  (26.15,.02)  (Subscr 1)  (forwards)
             X(2):  NAME  (26.15,.01)  (Subscr 2)  (Len 30)  (forwards)

  ATIU (#647)    RECORD    REGULAR    IR    SORTING ONLY
      Short Descr:  This is a sort only index of the TIU PN TITLE and NAME fields.
      Description:  This cross reference will enable quick lookups to find associated TIU PN Titles that are linked with Patient
                    Record Flag names.  
        Set Logic:  S ^DGPF(26.15,"ATIU",$E(X(1),1,99),$E(X(2),1,30),DA)=""
       Kill Logic:  K ^DGPF(26.15,"ATIU",$E(X(1),1,99),$E(X(2),1,30),DA)
       Whole Kill:  K ^DGPF(26.15,"ATIU")
             X(1):  TIU PN TITLE  (26.15,.07)  (Subscr 1)  (Len 99)  (forwards)
             X(2):  NAME  (26.15,.01)  (Subscr 2)  (Len 30)  (forwards)

  ATYPE (#270)    RECORD    REGULAR    IR    SORTING ONLY
      Short Descr:  This is a sort only index of the TYPE & NAME fields.
        Set Logic:  S ^DGPF(26.15,"ATYPE",X(1),$E(X(2),1,30),DA)=""
       Kill Logic:  K ^DGPF(26.15,"ATYPE",X(1),$E(X(2),1,30),DA)
       Whole Kill:  K ^DGPF(26.15,"ATYPE")
             X(1):  TYPE  (26.15,.03)  (Subscr 1)  (forwards)
             X(2):  NAME  (26.15,.01)  (Subscr 2)  (Len 30)  (forwards)


INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):