Sub-Field: 67.911

Parent File	Name	Number	Package
67.901	MONTH	67.911	Lab Service

Details

Field #	Name	Loc	Type	Details
.01	MONTH	0;1	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X I $D(X) S X=$E(X,1,5)_"00"` LAST EDITED: `JUN 23, 1992` DESCRIPTION: `The month that is being used to compile the data.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `67.911^B` `1)= S ^LRO(67.9,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""` `2)= K ^LRO(67.9,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)`
1	CERTIFIED BY	0;2	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `MAR 20, 1993` DESCRIPTION: `Person certifying the data.`
2	DATE COMPILED	0;3	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAY 27, 1992` DESCRIPTION: `The date that the data was compiled.`
3	MESSAGE NUMBER	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>50!($L(X)<1) X` LAST EDITED: `FEB 14, 1996` HELP-PROMPT: `Answer must be 1-50 characters in length.` DESCRIPTION: `This is the number of the message.`
4	WKLD CODE	1;0	Multiple #67.9114	67.9114 DESCRIPTION: `Multiple field. Contains information about the WKLD codes.`