Sub-Field: 64.019

Parent File	Name	Number	Package
WKLD CODE(#64)	SYNONYM	64.019	Lab Service

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SYNONYM	0;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>50!($L(X)<2) X` LAST EDITED: `APR 25, 1993` HELP-PROMPT: `Answer must be 2-50 characters in length.` DESCRIPTION: This is the .01 field of the multiple field, SYNONYM. CROSS-REFERENCE: `64.019^B` 1)= S ^LAM(DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^LAM(DA(1),1,"B",$E(X,1,30),DA) CROSS-REFERENCE: `64^B^MNEMONIC` 1)= S:'$D(^LAM("B",$E(X,1,30),DA(1),DA)) ^(DA)=1 2)= I $D(^LAM("B",$E(X,1,30),DA(1),DA)),^(DA) K ^(DA) This field contain alternate names or inverted combination to allow easier lookup. CROSS-REFERENCE: `64^G^MUMPS` 1)= D UP^LRXREF S ^LAM("G",X,DA(1),DA)="" 2)= D UP^LRXREF K ^LAM("G",X,DA(1),DA) Convert name to upper case for easier lookup. ^LAM("G",UPPERCASE SYNONYM,SUBFILE,IEN)

SYNONYM

0;1

FREE TEXT

DESCRIPTION:

This is the .01 field of the multiple field, SYNONYM.

CROSS-REFERENCE: 64.019^B

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

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

CROSS-REFERENCE: 64^B^MNEMONIC

1)= S:'$D(^LAM("B",$E(X,1,30),DA(1),DA)) ^(DA)=1

2)= I $D(^LAM("B",$E(X,1,30),DA(1),DA)),^(DA) K ^(DA)

This field contain alternate names or inverted combination to allow easier lookup.

CROSS-REFERENCE: 64^G^MUMPS

1)= D UP^LRXREF S ^LAM("G",X,DA(1),DA)=""

2)= D UP^LRXREF K ^LAM("G",X,DA(1),DA)

Convert name to upper case for easier lookup.

^LAM("G",UPPERCASE SYNONYM,SUBFILE,IEN)