Sub-Field: 63.824

Parent File	Name	Number	Package
63.812	FROZEN TISSUE BLOCK	63.824	Lab Service

Details

Field #	Name	Loc	Type	Details
.01	FROZEN TISSUE ID	0;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>9!($L(X)<1) X` LAST EDITED: `JAN 13, 1992` HELP-PROMPT: `ANSWER MUST BE 1-9 CHARACTERS IN LENGTH` DESCRIPTION: `This is the identification of frozen tissue.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `63.824^B` `1)= S ^LR(DA(3),"SP",DA(2),.1,DA(1),3,"B",$E(X,1,30),DA)=""` `2)= K ^LR(DA(3),"SP",DA(2),.1,DA(1),3,"B",$E(X,1,30),DA)`
.02	DATE/TIME FROZEN PREPARED	0;2	DATE	INPUT TRANSFORM: `S %DT="ETX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 04, 1991` DESCRIPTION: `When the frozen section is prepared`
.03	FROZEN COUNTED	0;3	SET	LAST EDITED: `AUG 04, 1991`
.04	FROZEN TISSUE BLOCK TYPE	0;4	SET	**********************REQUIRED FIELD********************** LAST EDITED: `JAN 07, 1992` DESCRIPTION: `Entry indicates if the frozen tissue block is used for rush (rapid) diagnosis or routinely processed (not rush).`
1	STAIN/PROCEDURE	1;0	POINTER Multiple #63.825	63.825 DESCRIPTION: `These are the stain/procedures performed on this specimen.` SCREEN: `S DIC("S")="I $P(^(0),U,4)=""SP"""` EXPLANATION: `Selects only stains/procedures associated with anatomic pathology`