Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Print Page as PDF

Sub-Field: 601.41

Package: Mental Health

INCOMPLETE PSYCH TEST PATIENT(#601.4)-->601.41

Sub-Field: 601.41

Information

Parent File	Name	Number	Package
INCOMPLETE PSYCH TEST PATIENT(#601.4)	INSTRUMENT	601.41	Mental Health

Details

Field #	Name	Loc	Type	Details
.01	INSTRUMENT	0;1	POINTER TO MH INSTRUMENT FILE (#601)	MH INSTRUMENT(#601) INPUT TRANSFORM: `S DINUM=X` LAST EDITED: `MAR 18, 1987` DESCRIPTION: `This is the Instrument Code (unique name), stored in this field is the pointer to the INSTRUMENT file #601.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `601.41^B` `1)= S ^YTD(601.4,DA(1),1,"B",$E(X,1,30),DA)=""` `2)= K ^YTD(601.4,DA(1),1,"B",$E(X,1,30),DA)`
1	DATE ENTERED	0;2	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` DESCRIPTION: `This is the date the test was given.`
2	DATE ADMINISTERED CLERICALLY	0;3	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` DESCRIPTION: `This is the date the test was given clerically (pencil and paper, instead of by computer).`
3	NEXT ITEM	0;4	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 1 AND 9999` DESCRIPTION: `The next item (next question) in sequence to be asked by the instrument. This is the restart point.`
4	VALID RESPONSE STRING	0;5	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 a SET of Valid responses, such as ABCX, TFX or 123X. That is for the three examples, for the 1st you may enter 'A', 'B', 'C' or 'X'.`
5	RESPONSE STRING 1	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 of them, they are position dependent. For example: if the instrument asked twenty TRUE & FALSE questions, the string would contain 20 T's and/or F's (TTTFFTFTFTFTFFTTTFFT) this` `string indicates answers 1 thru 3 were TRUE, answer 4 FALSE and so on.`
6	RESPONSE STRING 2	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. Same as 'RESPONSE STRING 1' only that this is string #2.`
7	RESPONSE STRING 3	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. Same as 'RESPONSE STRING 1' only that this is string #3.`
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 of them. This is the same format as the three other fields, 'RESPONSE STRING 1' or 2 or 3. This is used for string manipulation for specific instruments.`
8	BOTTOM	B;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 what is displayed at the bottom of the instrument item (question). Such as 'ANSWER = ', this field is usually the MUMPS code to generate the displayed line.`
9	CLERK TEST	0;6	POINTER TO MH INSTRUMENT FILE (#601)	MH INSTRUMENT(#601) LAST EDITED: `JAN 16, 1987` DESCRIPTION: `This is the instrument code name, it is the same as the instrument field. If this field is present, then the test has been clerk entered. Actually stored in this field is the pointer value to the MH INSTRUMENT file` `#601.` CROSS-REFERENCE: `601.41^AC` `1)= S ^YTD(601.4,DA(1),1,"AC",$E(X,1,30),DA)=""` `2)= K ^YTD(601.4,DA(1),1,"AC",$E(X,1,30),DA)`
16	ORDERED BY	0;7	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `JAN 16, 1987` 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.`
17	RESTART TESTS	R;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` LAST EDITED: `JAN 21, 1987` HELP-PROMPT: `ANSWER MUST BE 1-245 CHARACTERS IN LENGTH` DESCRIPTION: `Executable MUMPS code for restarting test. This will be present ONLY if necessary.`
18	DATE BEGUN	0;8	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 11, 1987` DESCRIPTION: `This is the date the instrument was first administered (test began).`