Select the objects that you wish to see in the downloaded PDF
S DIC("S")="I '$D(^(4))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X I $D(X) S DINUM=X
AUG 06, 1985
This is the unit selected for crossmatch.
XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
TYPE A NUMBER BETWEEN 1 AND 9999999
This is 9999999--collection date of the specimen for crossmatch.