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 | ICR | All

Print Page as PDF

Global: ^NURSF(211.4

Package: Nursing Service

Global: ^NURSF(211.4

Information

FileMan FileNo	FileMan Filename	Package
211.4	NURS LOCATION	Nursing Service

Description

This file contains nursing information on all patient care areas and office locations specific to Nursing Service.

Accessed By FileMan Db Calls, Total: 34

Pointed To By FileMan Files, Total: 7

Pointer To FileMan Files, Total: 7

Fields, Total: 16

Field #	Name	Loc	Type	Details
.01	NAME	0;1	POINTER TO HOSPITAL LOCATION FILE (#44)	**********************REQUIRED FIELD********************** HOSPITAL LOCATION(#44) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,22)=$O(^DIC(40.9,""C"",""NU"",0))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` OUTPUT TRANSFORM: `S Y=$S(+Y'>0:"",'$D(^SC(+Y,0)):"",$P(^(0),U)?1"NUR ".E:$P($P(^(0),U),"NUR ",2),1:$P(^(0),U))` LAST EDITED: `AUG 18, 1988` DESCRIPTION: `Name of the nursing location.` SCREEN: `S DIC("S")="I $P(^(0),U,22)=$O(^DIC(40.9,""C"",""NU"",0))"` EXPLANATION: `Only nursing type locations may be selected from the Hospital Location file. Editing the name of this location must be done through the Hospital Location file.` EXECUTABLE HELP: `S MSG(1)="NOTE: The letters NUR may be in front of the location name.",MSG(1,"F")="!!",MSG(2)="This is not to be corrected under any circumstance.",MSG(2,"F")="!?7" D EN^DDIOL(.MSG) K MSG` DELETE TEST: `1,0)= I 1 D EN^DDIOL($C(7),"","?0") S XQH="NURS-LOCATION-DELETE" D EN^XQH D EN^DDIOL("","","!?5")` CROSS-REFERENCE: `211.4^B` `1)= S ^NURSF(211.4,"B",$E(X,1,30),DA)=""` `2)= K ^NURSF(211.4,"B",$E(X,1,30),DA)` `This is the main index on the name field of the NURS Location file.`
.02	FACILITY		COMPUTED	MUMPS CODE: `S X=$$GET1^DIQ(4,+$$GET1^DIQ(44,+$G(^NURSF(211.4,D0,0)),3,"I"),.01,"I")` ALGORITHM: `S X=$$GET1^DIQ(4,+$$GET1^DIQ(44,+$G(^NURSF(211.4,D0,0)),3,"I"),.01,"I")` LAST EDITED: `APR 16, 1996` DESCRIPTION: `This field associates a nursing unit/location with a division of a medical center or facility.`
.03	PRODUCT LINE	1;4	POINTER TO NURS PRODUCT LINE FILE (#212.7)	NURS PRODUCT LINE(#212.7) LAST EDITED: `JUL 10, 1996` DESCRIPTION: `This field associates a service/programs/product line with this Nursing Location.` CROSS-REFERENCE: `211.4^P` `1)= S ^NURSF(211.4,"P",$E(X,1,30),DA)=""` `2)= K ^NURSF(211.4,"P",$E(X,1,30),DA)` `This is a regular cross-reference on the Product Line field.`
.5	CARE SETTING	1;5	SET	**********************REQUIRED FIELD********************** 'I' FOR Inpatient; 'O' FOR Other; LAST EDITED: `JUL 09, 2009` HELP-PROMPT: `Enter an "I" if this is an inpatient location or an "O" for other.` DESCRIPTION: `This is a set of codes used to define the CARE SETTING of the nursing location as inpatient or other.`
.6	UNIT TYPE	1;6	POINTER TO VANOD UNIT TYPES FILE (#212.8)	VANOD UNIT TYPES(#212.8) LAST EDITED: `JUL 09, 2009` HELP-PROMPT: `Enter a VANOD UNIT TYPE` DESCRIPTION: `This field defines the VANOD UNIT TYPE associated with the nursing location.`
.7	INPATIENT DSS DEPARTMENT	1;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>45!($L(X)<3) X` LAST EDITED: `JUN 08, 2009` HELP-PROMPT: `Answer must be 3-45 characters in length` DESCRIPTION: `This identifies the Inpatient DSS Department.`
1	PATIENT CARE FLAG	1;1	SET	**********************REQUIRED FIELD********************** 'A' FOR ACTIVE; 'I' FOR INACTIVE; LAST EDITED: `MAY 26, 1987` DESCRIPTION: `This field determines if this location is for patient care. ACTIVE denotes that this is a patient care location, and INACTIVE denotes that this is not a patient care location.` EXECUTABLE HELP: `S:X?1"??".E X="?" S XQH="NURS-PATIENT FLAG" D EN^XQH K XQH Q` CROSS-REFERENCE: `211.4^D` `1)= S ^NURSF(211.4,"D",$E(X,1,30),DA)=""` `2)= K ^NURSF(211.4,"D",$E(X,1,30),DA)` `This is an index on the 'Patient Care Status' field and indicates the active or inactive patient care status of the nursing location.`
1.5	INACTIVE FLAG	I;1	SET	**********************REQUIRED FIELD******************** 'A' FOR ACTIVE; 'I' FOR INACTIVE**; INPUT TRANSFORM: `D CHKSTAT^NURSUT1 K:$G(NURSTAT) X K NURSTAT,NURACTV` LAST EDITED: `AUG 18, 2011` DESCRIPTION: `This field flags whether this location is associated with active FTEE in the Nursing Package.` EXECUTABLE HELP: `S:X?1"??".E X="?" S XQH="NURS-INACTIVE FLAG" D EN^XQH K XQH Q` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `211.4^AC^MUMPS` `1)= D SERVICE^NURSUT6` `2)= Q` `This cross reference acts as a trigger to add an entry to the Service Dates multiple field (# 16) in this file (# 211.4), when the Ward Status field (# 1.5) changes. The entries added to the Service Dates multiple, by` `this cross reference, record the history of when this Nursing Location was active or inactive, by storing the date of the change and what the Ward Status was changed to (Active or Inactive).` `Note that if a location is changed back and forth between active and inactive on the same day, then this cross reference will only record the status corresponding to the last action on that date in the new Service Dates` `multiple.`
2	MAS WARD	3;0	POINTER Multiple #211.41	211.41 DESCRIPTION: `Pointer to the WARD LOCATION (#42) file represents the MAS equivalent of a NURSING LOCATION.` IDENTIFIED BY: `AMIS BED SECTION(#1)`
4	AMIS BED SECTION	4;0	POINTER Multiple #211.43	211.43 DESCRIPTION: `Pointer to the #213.3 file. This field assigns one or more bed sections per NURS LOCATION.`
11	PROFESSIONAL PERCENTAGE	1;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>100)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUN 18, 1990` HELP-PROMPT: `Type a Number between 1 and 100, 0 Decimal Digits` DESCRIPTION: `This number indicates the percentage of professional nursing personnel assigned to a unit.`
12	UNIT EXPERIENCE	1;3	POINTER TO NURS CLINICAL BACKGROUND FILE (#211.5)	NURS CLINICAL BACKGROUND(#211.5) LAST EDITED: `APR 16, 1996` DESCRIPTION: `This field contains the clinical background that is associated with this location. The data in this field is used by the Nursing Acuity/Separation- Activation Run to update the professional experience field of the NURS` `Staff (#210) file.`
14	POC DATA ENTRY PERSONNEL	5;0	POINTER Multiple #211.414	211.414
15	POC DATA APPROVAL PERSONNEL	6;0	POINTER Multiple #211.415	211.415
16	SERVICE DATES	7;0	DATE Multiple #211.416	211.416 DESCRIPTION: `Entries to the SERVICE DATES multiple field (#16) are added when the INACTIVE FLAG field (#1.5) is changed. This is accomplished by using MUMPS code in the "AC" cross reference of the INACTIVE FLAG field as a trigger to` `set the values for the SERVICE DATE field (#.01) and the STATUS field (#1) in the SERVICE DATES multiple.` INDEXED BY: `SERVICE DATE & STATUS (C)`
37	STAFF FLAG		COMPUTED	MUMPS CODE: `S Y=+$G(^NURSF(211.4,D0,0)),X=$S(+$$LOCSTAT^NURSUT1(Y):"YES",1:"NO")` ALGORITHM: `S Y=+$G(^NURSF(211.4,D0,0)),X=$S(+$$LOCSTAT^NURSUT1(Y):"YES",1:"NO")` DESCRIPTION: `This field indicates weather or not active staff members are assigned to the nursing location.`

ICR, Total: 3

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