Sub-Field: 9009026.51

Parent File	Name	Number	Package
BLR REFERENCE LAB MONITOR PARAMETERS(#9009026.5)	USER	9009026.51	IHS Changes To Lab

Parent File

Name

Number

Package

USER

9009026.51

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	USER	0;1	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `AUG 16, 2013` CROSS-REFERENCE: `9009026.5^B` 1)= S ^BLRRLMST("B",$E(X,1,30),DA(1),DA)="" 2)= K ^BLRRLMST("B",$E(X,1,30),DA(1),DA)
.02	ENSEMBLE PRODUCTION	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `JUN 02, 2014` HELP-PROMPT: `Answer must be 1-20 characters in length.` CROSS-REFERENCE: `9009026.5^APRD^MUMPS` 1)= S ^BLRRLMST("APRD",$P(^BLRRLMST(DA(1),0),"^"),$P(^BLRRLMST(DA(1),1,DA,0),"^"),X)="" 2)= K ^BLRRLMST("APRD",$P(^BLRRLMST(DA(1),0),"^"),$P(^BLRRLMST(DA(1),1,DA,0),"^"),X)

USER

0;1

POINTER TO NEW PERSON FILE (#200)

CROSS-REFERENCE: 9009026.5^B

1)= S ^BLRRLMST("B",$E(X,1,30),DA(1),DA)=""

2)= K ^BLRRLMST("B",$E(X,1,30),DA(1),DA)

ENSEMBLE PRODUCTION

0;2

FREE TEXT

CROSS-REFERENCE: 9009026.5^APRD^MUMPS

1)= S ^BLRRLMST("APRD",$P(^BLRRLMST(DA(1),0),"^"),$P(^BLRRLMST(DA(1),1,DA,0),"^"),X)=""

2)= K ^BLRRLMST("APRD",$P(^BLRRLMST(DA(1),0),"^"),$P(^BLRRLMST(DA(1),1,DA,0),"^"),X)