SET DT (44)    EXECUTE CODE (62.07)

Name Value
NAME SET DT
EXECUTE CODE S X="T",%DT="" D ^%DT S DT=Y X ^LAB("X","DD") S LRDT0=Y
TYPE XECUTE
SUBSCRIPT NAME DT