Sub-Field: 63.331

Parent File	Name	Number	Package
63.033	PARAFFIN BLOCK	63.331	Lab Service

Details

Field #	Name	Loc	Type	Details
.01	PARAFFIN BLOCK ID	0;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>9!($L(X)<1) X` LAST EDITED: `SEP 12, 1994` HELP-PROMPT: `Answer must be 1-9 characters in length.` DESCRIPTION: `The identification number on the paraffin block used to make slides for staining.` CROSS-REFERENCE: `63.331^B` `1)= S ^LR(DA(2),33,DA(1),1,"B",$E(X,1,30),DA)=""` `2)= K ^LR(DA(2),33,DA(1),1,"B",$E(X,1,30),DA)`
.02	DATE/TIME BLOCK PREPARED	0;2	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `FEB 05, 1992` DESCRIPTION: `Date/time block prepared. Used for workload recording.`
.03	BLOCK COUNTED	0;3	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `FEB 05, 1992` DESCRIPTION: `Used for workload recording.`
1	STAIN/PROCEDURE	1;0	POINTER Multiple #63.3311	63.3311 DESCRIPTION: `List of tissue stains or procedures performed on the slides cut from the paraffin block.` SCREEN: `S DIC("S")="I $P(^(0),U,4)=""SP"""` EXPLANATION: `Selects only stains/procedures associated with anatomic pathology.`