Select the objects that you wish to see in the downloaded PDF
S DIC("S")="B I +$G(^DIC(4,+Y,99))=+$$SITE^VASITE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X
JAN 30, 1996
S DIC("S")="I +$G(^DIC(4,+Y,99))=+$$SITE^VASITE"
Allows only divisions related to site.
XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER