Sub-Field: 601.22

Parent File	Name	Number	Package
601.21	DATE	601.22	Mental Health

Details

Field #	Name	Loc	Type	Details
.01	COMPLETION DATE	0;1	DATE	INPUT TRANSFORM: `S %DT="EX",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X S DINUM=X K %DT(0)` LAST EDITED: `NOV 06, 2000` DESCRIPTION: `This is the date the test/interview was completed.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `601.2^AD^MUMPS` `1)= D SET^YTCROSS` `2)= D KILL^YTCROSS` RECORD INDEXES: `ACR (#476) (WHOLE FILE #601.2)`
1	DEVICE	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-10 CHARACTERS IN LENGTH` DESCRIPTION: `This is the device from which the test was administered. This field has become of little value because of virtual terminals.`
2	ORDERED BY	0;3	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) DESCRIPTION: `This is the name of the clinician ordering the administration of this instrument to this patient. Actually stored in the field is the pointer value pointing to the clinician in the NEW PERSON file #200.`
3	ENTERED BY	0;4	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) DESCRIPTION: `This the name of the person who entered the test/interview or who setup the testing for patient entry. Actually stored is the pointer value pointing to the NEW PERSON file #200.`
4	ADMINISTRATION DATE	0;5	DATE	INPUT TRANSFORM: `S %DT="EX",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)` LAST EDITED: `NOV 06, 2000` DESCRIPTION: `This is the date the test/interview was administered.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
5	RESPONSE STRING1	1;E1,200	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>200!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-200 CHARACTERS IN LENGTH` DESCRIPTION: `This is a STRING of responses, 1 to 200 characters in length, they are position dependent. For example: if the instrument asked sixteen TRUE & FALSE questions, the string would contain 16 T's and/or F's` `(TTFFFTFTFTFTTTFF), this string indicates answers 1 & 2 were TRUE and answers 3 thru 5 were FALSE, and so on.`
6	RESPONSE STRING2	2;E1,200	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>200!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-200 CHARACTERS IN LENGTH` DESCRIPTION: `This is a STRING of responses, a continuation from RESPONSE STRING1.`
7	RESPONSE STRING3	3;E1,200	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>200!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-200 CHARACTERS IN LENGTH` DESCRIPTION: `This is a STRING of responses, a continuation from RESPONSE STRING2.`
7.2	RESPONSE STRING4	4;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>200!($L(X)<1) X` LAST EDITED: `JUN 15, 1988` HELP-PROMPT: `ANSWER MUST BE 1-200 CHARACTERS IN LENGTH` DESCRIPTION: `This is a STRING of responses.`
7.3	RESPONSE STRING5	5;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>200!($L(X)<1) X` LAST EDITED: `JUN 15, 1988` HELP-PROMPT: `ANSWER MUST BE 1-200 CHARACTERS IN LENGTH` DESCRIPTION: `This is a STRING of responses.`
7.4	RESPONSE STRING 6	6;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>200!($L(X)<1) X` LAST EDITED: `JUN 15, 1988` HELP-PROMPT: `ANSWER MUST BE 1-200 CHARACTERS IN LENGTH` DESCRIPTION: `This is a STRING of responses.`
7.5	RESPONSE STRING 99	99;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>200!($L(X)<1) X` LAST EDITED: `JUN 16, 1987` HELP-PROMPT: `ANSWER MUST BE 1-200 CHARACTERS IN LENGTH` DESCRIPTION: `This is a STRING of responses, 1 to 245 characters in length. This is used for specific instruments.`
8	SCORE SET1	100;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-245 CHARACTERS IN LENGTH` DESCRIPTION: `This is testing results, usually numeric values separated by a delimitor. Not all instruments will have recorded SCORE SETS.`
9	SCORE SET2	101;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-245 CHARACTERS IN LENGTH` DESCRIPTION: `This is testing results.`
10	SCORE SET3	102;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-245 CHARACTERS IN LENGTH` DESCRIPTION: `This is testing results.`
10.5	SCORE SET4	103;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` LAST EDITED: `JUN 16, 1987` HELP-PROMPT: `ANSWER MUST BE 1-245 CHARACTERS IN LENGTH` DESCRIPTION: `This is testing results.`
10.6	SCORE SET5	104;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` LAST EDITED: `JUN 16, 1987` HELP-PROMPT: `ANSWER MUST BE 1-245 CHARACTERS IN LENGTH` DESCRIPTION: `This is testing results.`
11	ENTRY MODE	0;6	SET	'1' FOR CLERK; '2' FOR ON-LINE; LAST EDITED: `MAR 09, 1987` DESCRIPTION: `This is a set of codes; '1' means instrument was CLERK ENTERED, '2' means instrument was ENTERED ON-LINE.`
12	STATION NUMBER	0;7	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<111)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 21, 1987` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 111 AND 9999` DESCRIPTION: `This is the Station number of the person administering the instrument. It is derived from their DUZ(2). Used mostly for billing purposes.`
13	STAFF COMMENTS ENTRY DATE	R;0	DATE Multiple #601.2213	601.2213 DESCRIPTION: `This is a multiple valued field with subfields.`
14	DATE BEGUN	0;8	DATE	INPUT TRANSFORM: `S %DT="EX",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)` LAST EDITED: `NOV 06, 2000` DESCRIPTION: `This is the date the test/interview was started.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`

Customize PDF page

Package: Mental Health

PSYCH INSTRUMENT PATIENT(#601.2)-->601.21-->601.22

Sub-Field: 601.22

Information

Details