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 | Naked Globals | Local Variables | All

Print Page as PDF

Global: ^DGPF(26.11

Package: Registration

Global: ^DGPF(26.11

Information

FileMan FileNo	FileMan Filename	Package
26.11	PRF LOCAL FLAG	Registration

Description

This file contains Category II (Local) Patient Record Flags that can be assigned to a patient. Use the Record Flag Management [DGPF RECORD FLAG MANAGEMENT] option to create/edit entries in this file. Records in this file should not be added, edited, or deleted except through the use of the Patient Record Flag software that is part of Registration. Doing so would likely cause the Patient Record Flag database to become corrupted.

Directly Accessed By Routines, Total: 14

Package	Total	Routines
Registration	14	DG53P554 DGPFALF DGPFALF1 DGPFALH DGPFAPI1 DGPFAPIU DGPFLF6 DGPFRPI DGPFRPI1 ^DGPF(26.11 DGPFXCRN DGY991PO DGY994PO PRINCIPAL INVESTIGATOR(S)

Accessed By FileMan Db Calls, Total: 10

Package	Total	Routines
Registration	6	DGPFALF DGPFLF3 DGPFLF5 DGPFRPI DGPFUT64 DGY994PO
Scheduling	4	SDES2BLDAPPT2 SDES2PATDATA SDESPATFLAGS SDESPATIENTDATA2

Pointed To By FileMan Files, Total: 2

Package	Total	FileMan Files
Registration	2	PRF LOCAL FLAG HISTORY(#26.12)[.01] PRF ASSIGNMENT(#26.13)[.02]

Pointer To FileMan Files, Total: 4

Package	Total	FileMan Files
Kernel	1	NEW PERSON(#200)[#26.112(.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 locally assigned name of the Patient Record Flag.` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `26.11^B` `1)= S ^DGPF(26.11,"B",$E(X,1,30),DA)=""` `2)= K ^DGPF(26.11,"B",$E(X,1,30),DA)` RECORD INDEXES: `ASTAT (#256), ATIU (#644), ATYP (#257)`
.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. Changing this field from ACTIVE to INACTIVE will inactivate all patient record flag assignments associated with this flag.` 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 (#255) 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.11,DUZ)` `Kill Logic: Q` `X(1): STATUS (26.11,.02) (forwards)` RECORD INDEXES: `ASTAT (#256)`
.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.` DESCRIPTION: `This field identifies the usage classification of the Patient Record Flag.` TECHNICAL DESCR: `This field identifies the usage classification of the Patient Record Flag as a pointer to the PRF TYPE file (#26.16).` `UNEDITABLE` RECORD INDEXES: `ATYP (#257)`
.04	REVIEW FREQUENCY DAYS	0;4	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 31, 2003` HELP-PROMPT: `Enter a number of days from 0 to 9999. (ex: 730 days = 2 years)` 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. (example: 730 = 2 years)` `UNEDITABLE`
.05	NOTIFICATION DAYS	0;5	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>9998)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `APR 23, 2003` HELP-PROMPT: `Enter a Number between 0 and 9998, 0 Decimal Digits` DESCRIPTION: `This field contains the number of days prior to a patient record flag assignment's Review date that a review notification is sent to the flag's Review Mail Group. A value of zero ("0") indicates that NO prior notification` `is required. This field should always be less than the Review Frequency field value.` `UNEDITABLE`
.06	REVIEW MAIL GROUP	0;6	POINTER TO MAIL GROUP FILE (#3.8)	MAIL GROUP(#3.8) INPUT TRANSFORM: `S DIC("S")="I $E($P(^(0),""^""),1,4)=""DGPF""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X` LAST EDITED: `APR 25, 2003` HELP-PROMPT: `Enter the mail group that will receive review notifications.` 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' and it is further recommended that locally-defined flag mail group names begin with 'DGPFZ' to prevent conflicts with nationally-released patient record flags.` SCREEN: `S DIC("S")="I $E($P(^(0),""^""),1,4)=""DGPF"""` EXPLANATION: `Allows only mail group names that 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) INPUT TRANSFORM: `S DIC("S")="I $$TIULIST^DGPFDD(Y)" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X` LAST EDITED: `JUN 07, 2004` HELP-PROMPT: `Enter the associated Category II Progress Note Title.` DESCRIPTION: `This field contains the Category II 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)` SCREEN: `S DIC("S")="I $$TIULIST^DGPFDD(Y)"` EXPLANATION: `Allows only Category II Progress Note Titles to be displayed.` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` RECORD INDEXES: `ATIU (#644)`
1	DESCRIPTION	1;0	WORD-PROCESSING #26.111	LAST EDITED: `DEC 26, 2002` DESCRIPTION: `This field contains the text that describes the purpose and instructions for application of this local Patient Record Flag to a patient.` LAST EDITED: `APR 23, 2003` HELP-PROMPT: `Enter the purpose and instructions for assigning this flag.`
2	PRINCIPAL INVESTIGATOR(S)	2;0	POINTER Multiple #26.112	26.112 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 only used when the Flag TYPE is RESEARCH.`

ICR, Total: 1

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #7020	Scheduling	NAME (.01). Access: Read w/Fileman STATUS (.02). Access: Read w/Fileman

External References

Name	Field # of Occurrence
INACT^DGPFDD	IXAINACTSL+1
^DIC	.06+1, .07+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.11 - [#26.11]	IXASTATSL+1, IXASTATKL+1!, IXASTATKEIC+1!, IXATIUSL+1, IXATIUKL+1!, IXATIUKEIC+1!, IXATYPSL+1, IXATYPKL+1!, IXATYPKEIC+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, IXATYPSL+1, IXATYPKL+1, IXCSL+1, IXCKL+1, .01(XREF 1S) , .01(XREF 1K)
>> DA(1	IXCSL+1, IXCKL+1
DIC	ID.02+1, ID.03+1, .06+1!, .07+1!
DIC("S"	.06+1, .06SCR+1, .07+1, .07SCR+1
>> DIE	.06+1, .07+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!, .06+1!, .07+1*!
X(1	IXAINACTSL+1, IXASTATSL+1, IXASTATKL+1, IXATIUSL+1, IXATIUKL+1, IXATYPSL+1, IXATYPKL+1
X(2	IXASTATSL+1, IXASTATKL+1, IXATIUSL+1, IXATIUKL+1, IXATYPSL+1, IXATYPKL+1
>> X1(1	IXAINACTSL+1
>> Y	ID.03+1*, .06+1, .07+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 | Naked Globals | Local Variables | All