Sub-Field: 1964000.02

Information

Parent File	Name	Number	Package
DIABETES REGISTER CRSU(#1964000)	POSITIVE PPD	1964000.02	Uncategorized

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	POSITIVE PPD DATE	0;1	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `APR 29, 1990` CROSS-REFERENCE: `1964000.02^B` 1)= S ^DIZ(1964000,DA(1),21,"B",$E(X,1,30),DA)="" 2)= K ^DIZ(1964000,DA(1),21,"B",$E(X,1,30),DA)
1	MEDICATION	1;0	POINTER Multiple #1964000.21	1964000.21

POSITIVE PPD DATE

0;1

DATE

CROSS-REFERENCE: 1964000.02^B

1)= S ^DIZ(1964000,DA(1),21,"B",$E(X,1,30),DA)=""

2)= K ^DIZ(1964000,DA(1),21,"B",$E(X,1,30),DA)

1 MEDICATION 1;0 POINTER Multiple #1964000.21 1964000.21