Sub-Field: 1964000.069

Information

Parent File	Name	Number	Package
DIABETES REGISTER CRSU(#1964000)	EXERCISE	1964000.069	Uncategorized

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	EXERCISE DATE	0;1	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `APR 30, 1990` CROSS-REFERENCE: `1964000.069^B` 1)= S ^DIZ(1964000,DA(1),27,"B",$E(X,1,30),DA)="" 2)= K ^DIZ(1964000,DA(1),27,"B",$E(X,1,30),DA)
1	EXERCISE LEVEL	0;2	SET	'0' FOR SEDENTARY; '1' FOR MINIMUM; '2' FOR MODERATE; '3' FOR COMPLETE; '4' FOR EXCESSIVE; LAST EDITED: `APR 30, 1990`

EXERCISE DATE

0;1

DATE

CROSS-REFERENCE: 1964000.069^B

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

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

EXERCISE LEVEL

0;2

SET