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 | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | All

Print Page as PDF

Global: ^OR(100.21

Package: Order Entry Results Reporting

Global: ^OR(100.21

Information

FileMan FileNo	FileMan Filename	Package
100.21	OE/RR LIST	Order Entry Results Reporting

Description

This file contains data related to lists. Generally these lists take the form of provider(s)/patients.

Accessed By FileMan Db Calls, Total: 18

Pointed To By FileMan Files, Total: 10

Pointer To FileMan Files, Total: 9

Fields, Total: 13

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E)!($D(^OR(100.21,"B",X))) X` LAST EDITED: `DEC 20, 1991` HELP-PROMPT: `NAME MUST BE 3-30 CHARACTERS, NOT BE WHOLLY NUMERIC OR START WITH PUNCTUATION. IT MUST ALSO BE UNIQUE.` DESCRIPTION: `This is the name of the list being defined.` DELETE TEST: `123.5,0)= I '($E($G(XQY0),1,4)="ORLP") W !,"Deletion of Team Lists only alowed through CPRS menu options. "` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `100.21^B` `1)= S ^OR(100.21,"B",$E(X,1,30),DA)=""` `2)= K ^OR(100.21,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `^^TRIGGER^100.21^.1` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y X ^DD(100.21,.01,1,2,1.1) X ^DD(100.21,.01,1,2,1.4)` `1.1)= S X=DIV S X=DIV X "F %=1:1:$L(X) S:$E(X,%)?1L X=$E(X,0,%-1)_$C($A(X,%)-32)_$E(X,%+1,999)" S X=X,Y(1)=X S X=1,Y(2)=X S X=30,X=$E(Y(1),Y(2),X)` `1.4)= S DIH=$S($D(^OR(100.21,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=100.21,DIG=.1 D ^DICR:$O(^DD(DIH,DIG,1,0))>0` `2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X="" X ^DD(100.21,.01,1,2,2.4)` `2.4)= S DIH=$S($D(^OR(100.21,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=100.21,DIG=.1 D ^DICR:$O(^DD(DIH,DIG,1,0))>0` `CREATE VALUE)= $E(UPPERCASE(NAME),1,30)` `DELETE VALUE)= @` `FIELD)= UPPER CASE`
.1	UPPER CASE	0;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<1) X` LAST EDITED: `FEB 27, 1991` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: `This is the name of the list in upper case. Used for look-up.` `WRITE AUTHORITY: ^` NOTES: `TRIGGERED by the NAME field of the OE/RR LIST File` CROSS-REFERENCE: `100.21^D` `1)= S ^OR(100.21,"D",$E(X,1,30),DA)=""` `2)= K ^OR(100.21,"D",$E(X,1,30),DA)` `The "D" cross-reference is used to look-up list names in upper case.`
1	TYPE	0;2	SET	**********************REQUIRED FIELD********************** 'P' FOR PERSONAL PATIENT; 'TA' FOR TEAM PATIENT AUTOLINKED; 'TM' FOR TEAM PATIENT MANUAL; 'MRAL' FOR MANUAL REMOVAL/AUTOLINK ADDITION; LAST EDITED: `AUG 18, 1999` HELP-PROMPT: `Enter 'P' for Personal list, 'TA' for a Team Patient Autolinked list, 'TM' for a Team List manually updated list, 'MRAL' for a Team list with Autolinked additions and manual removal.` DESCRIPTION: `This is the type of list being defined. List type currently includes team and personal. o Team lists` `o TM - Manually maintained (addition and removal)` `o TA - Maintained by Autolinks for addition and removal of patients.` `o MRAL - Manual removal of patients from the list with Autolink` `addition of patients to the list.` `o Personal lists` `o P - Manually maintained (addition and removal)` CROSS-REFERENCE: `^^TRIGGER^100.21^1.6` `1)= X ^DD(100.21,1,1,1,1.3) I X S X=DIV S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X=DIV S X=DUZ X ^DD(100.21,1,1,1,1.4)` `1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$S('$D(^VA(200,+$P(Y(1),U,5),0)):"",1:$P(^(0),U,1))=""` `1.4)= S DIH=$S($D(^OR(100.21,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,5)=DIV,DIH=100.21,DIG=1.6 D ^DICR:$O(^DD(DIH,DIG,1,0))>0` `2)= Q` `3)= Original creator's identity cannot be changed.` `CREATE CONDITION)= CREATOR=""` `CREATE VALUE)= S X=DUZ` `DELETE VALUE)= NO EFFECT` `FIELD)= CREATOR` `This field is used to store the indentity of the user who created the Team list.` CROSS-REFERENCE: `^^TRIGGER^100.21^1.65` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$P(Y(1),U,7)="" I X S X=DIV S Y(1)=$S($D(^OR(100.21,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X=DIV S X=DT X ^DD(100.21,1,` `1,2,1.4)` `1.4)= S DIH=$S($D(^OR(100.21,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,7)=DIV,DIH=100.21,DIG=1.65 D ^DICR:$O(^DD(DIH,DIG,1,0))>0` `2)= Q` `CREATE CONDITION)= CREATION D/T=""` `CREATE VALUE)= S X=DT` `DELETE VALUE)= NO EFFECT` `FIELD)= CREATION D/T` `Trigger fills CREATION D/T field.`
1.5	DEVICE	0;4	POINTER TO DEVICE FILE (#3.5)	DEVICE(#3.5) LAST EDITED: `DEC 01, 1997` HELP-PROMPT: `Enter the device to be linked with this list.` DESCRIPTION: `Device from the DEVICE file linked to the list.`
1.6	CREATOR	0;5	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `AUG 11, 1999` HELP-PROMPT: `Entry in this field is handled by Fileman.` DESCRIPTION: `This is the IEN of the user who creates the Team List.` `WRITE AUTHORITY: ^` `UNEDITABLE` NOTES: `TRIGGERED by the TYPE field of the OE/RR LIST File`
1.65	CREATION D/T	0;7	DATE	INPUT TRANSFORM: `S %DT="EST" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 18, 1999` HELP-PROMPT: `Date and time of list creation.` DESCRIPTION: `This field stores the date of creation of the list.` NOTES: `TRIGGERED by the TYPE field of the OE/RR LIST File`
1.7	SUBSCRIBE	0;6	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `SEP 02, 2016` HELP-PROMPT: `YES means users can add or remove themselves as team members (providers).` DESCRIPTION: `This field stores either a Y or N (for YES or NO) entry and is used in CPRS to determine whether or not individual users will be allowed to add or remove themselves as members of the team list if it is of autolink or` `manual type.`
2	USER	1;0	POINTER Multiple #100.212	100.212 HELP-PROMPT: `Enter the users associated with this list.` DESCRIPTION: `These are the user(s) that belong to the list. If the list is of type TEAM PATIENT or PERSONAL PATIENT, users on the list may receive clinical notifications for patients also on the list.`
3	AUTOLINK	2;0	VARIABLE POINTER Multiple #100.213	100.213 DESCRIPTION: `This field is used to link the list with WARDs, ROOM-BEDs, PROVIDERs, TREATING SPECIALTYs, or CLINICs. This field points to the entry in the file where the link is to occur. When ADT movement occur for patients, they` `are added to the appropriate OE/RR lists as identified by the AUTOLINK field (via "AC" cross-ref). Lists with autolink providers are updated (patient added) when the PROVIDER link matches the entry at the PRIMARY CARE` `PHYSICIAN or ATTENDING PHYSICIAN prompts.`
10	MEMBER	10;0	VARIABLE POINTER Multiple #100.2101	100.2101 HELP-PROMPT: `Enter the members for this list.` DESCRIPTION: `The list member is an item on the list. The member for personal and team patient lists is a patient (if list type is P or T, this field points to the patient file.)`
11	VISIBILITY	11;1	SET	**********************REQUIRED FIELD********************** '0' FOR OWNER; '1' FOR ALLUSERS; LAST EDITED: `NOV 15, 2007` HELP-PROMPT: `This field is used as a means to control who can see this list. If it is set to 0, then only the owner can see it. If 1 then everybody can see it. The default is owner only.` DESCRIPTION: `This field is used as a means to control who can see this list and the patients that are contained within it. If it is set to 0, then only the owner can see it. If it is set to 1, then everybody can see it. The default` `is owner only.` TECHNICAL DESCR: `SET OF CODES`
12.1	LAST UPDATED D/T	12;1	DATE	INPUT TRANSFORM: `S %DT="ETR" D ^%DT S X=Y K:X<1 X` LAST EDITED: `JUN 15, 2017` HELP-PROMPT: `Enter the date/time the members on this list were last updated.` DESCRIPTION: `This is the date/time the members on this list were last updated.` TECHNICAL DESCR: `This field is set automatically via a trigger whenever a member is added or removed from this list.` NOTES: `TRIGGERED by the MEMBER field of the MEMBER sub-field of the OE/RR LIST File`
12.2	CURATOR	12;2	VARIABLE POINTER	REMINDER LIST RULE(#810.4) LAST EDITED: `MAR 15, 2017` HELP-PROMPT: `Enter the package or entity that curates the members on this list.` DESCRIPTION: `This is the package or entity that is responsible for curating the members on this list.`

Info | Desc | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | All