Sub-Field: 9999999.8211

Parent File	Name	Number	Package
9999999.821	MONTHS OF AGE	9999999.8211	Utility Tables

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	MONTHS OF AGE	0;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>216)!(X<0)!(X?.E1"."2N.N) X` LAST EDITED: `JAN 14, 1992` HELP-PROMPT: `Enter AGE in months between 0 and 216 1 decimal digit` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9999999.8211^B` 1)= S ^AUTTPCT(DA(2),1,DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^AUTTPCT(DA(2),1,DA(1),1,"B",$E(X,1,30),DA)
1	MEASUREMENT VALUES	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>28!($L(X)<28)!'(X?28N) X` LAST EDITED: `JAN 14, 1992` HELP-PROMPT: `Enter 28-character (7 groups of 4 digits, one decimal point assumed) measurement string` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`

MONTHS OF AGE

0;1

NUMBER

CROSS-REFERENCE: 9999999.8211^B

1)= S ^AUTTPCT(DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""

2)= K ^AUTTPCT(DA(2),1,DA(1),1,"B",$E(X,1,30),DA)

MEASUREMENT VALUES

0;2

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:$L(X)>28!($L(X)<28)!'(X?28N) X
LAST EDITED: JAN 14, 1992
HELP-PROMPT: Enter 28-character (7 groups of 4 digits, one decimal point assumed) measurement string
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER