Sub-Field: 63.9121

Information

Parent File	Name	Number	Package
63.902	SMEAR PREP	63.9121	Lab Service

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SMEAR PREP	0;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>9!($L(X)<1) X` LAST EDITED: `JUL 04, 1988` HELP-PROMPT: `ANSWER MUST BE 1-9 CHARACTERS IN LENGTH` CROSS-REFERENCE: `63.9121^B` 1)= S ^LR(DA(3),"CY",DA(2),.1,DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^LR(DA(3),"CY",DA(2),.1,DA(1),1,"B",$E(X,1,30),DA)
1	STAIN/PROCEDURE	1;0	POINTER Multiple #63.9122	63.9122 LAST EDITED: `JAN 13, 1991`

SMEAR PREP

0;1

FREE TEXT

CROSS-REFERENCE: 63.9121^B

1)= S ^LR(DA(3),"CY",DA(2),.1,DA(1),1,"B",$E(X,1,30),DA)=""

2)= K ^LR(DA(3),"CY",DA(2),.1,DA(1),1,"B",$E(X,1,30),DA)

STAIN/PROCEDURE

1;0

POINTER Multiple #63.9122