Sub-Field: 455.52

Parent File	Name	Number	Package
T&L UNIT(#455.5)	POC DATA ENTRY PERSONNEL	455.52	PAID

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	POC DATA ENTRY PERSONNEL	0;1	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `DEC 17, 2009` HELP-PROMPT: `Select personnel responsible for entering Nurse POC data.` DESCRIPTION: `This field points to the NEW PERSON file (#200) and identifies individuals that are responsible for entering Nurse POC data for this T&L unit.` CROSS-REFERENCE: `455.52^B` `1)= S ^PRST(455.5,DA(1),2,"B",$E(X,1,30),DA)=""` `2)= K ^PRST(455.5,DA(1),2,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `455.52^AC^MUMPS` `1)= D ASSIGNKY^PRSNEETP(.X)` `2)= D REMOVEKY^PRSNEETP(.DA,.X)` `This cross reference does not set any index. It calls MUMPS code to assign the PRSN DEP Security Key when a user is added to the POC Data Entry Personnel multiple. When a user is deleted from the multiple the cross` `reference calls code to remove the security key. The key won't be removed if the user is also a POC Data Entry Personnel in another T&L unit.` FIELD INDEX: `AE (#1015) REGULAR IR SORTING ONLY WHOLE FILE (#455.5)` `Short Descr: POC Data Entry Personnel` `Description: This is a whole file index to sort POC DATA ENTRY PERSONNEL by the T&L Units for which they are responsible.` `Set Logic: S ^PRST(455.5,"AE",X,DA(1),DA)=""` `Kill Logic: K ^PRST(455.5,"AE",X,DA(1),DA)` `Whole Kill: K ^PRST(455.5,"AE")` `X(1): POC DATA ENTRY PERSONNEL (455.52,.01) (Subscr 1) (forwards)`

POC DATA ENTRY PERSONNEL

0;1

POINTER TO NEW PERSON FILE (#200)

LAST EDITED: DEC 17, 2009
HELP-PROMPT: Select personnel responsible for entering Nurse POC data.
DESCRIPTION:
This field points to the NEW PERSON file (#200) and identifies individuals that are responsible for entering Nurse POC data for this T&L unit.
CROSS-REFERENCE: 455.52^B
1)= S ^PRST(455.5,DA(1),2,"B",$E(X,1,30),DA)=""
2)= K ^PRST(455.5,DA(1),2,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 455.52^AC^MUMPS
1)= D ASSIGNKY^PRSNEETP(.X)
2)= D REMOVEKY^PRSNEETP(.DA,.X)
This cross reference does not set any index. It calls MUMPS code to assign the PRSN DEP Security Key when a user is added to the POC Data Entry Personnel multiple. When a user is deleted from the multiple the cross
reference calls code to remove the security key. The key won't be removed if the user is also a POC Data Entry Personnel in another T&L unit.
FIELD INDEX: AE (#1015) REGULAR IR SORTING ONLY WHOLE FILE (#455.5)
Short Descr: POC Data Entry Personnel
Description: This is a whole file index to sort POC DATA ENTRY PERSONNEL by the T&L Units for which they are responsible.
Set Logic: S ^PRST(455.5,"AE",X,DA(1),DA)=""
Kill Logic: K ^PRST(455.5,"AE",X,DA(1),DA)
Whole Kill: K ^PRST(455.5,"AE")
X(1): POC DATA ENTRY PERSONNEL (455.52,.01) (Subscr 1) (forwards)