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

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)