Routine: YTS

Information

YTS ;SLC/DKG,TGA,HIOFO/FT - START TESTS, QUESTIONNAIRES & REPORTS ;9/29/11 17:01

Source Information

Source file <YTS.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Mental Health	4	^YSLRP ENPT^YSUTL ^YTAR ^YTDP
Kernel	2	^%ZISC $$FMTE^XLFDT

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 8

Package	Total	Caller Graph
Mental Health	8	YTAR YTAR1 YTAR2 YTCLERK YTCLERK1 YTDP YTEXT YTONLY

Entry Points

Name	Comments	DBIA/ICR reference
C	;
RPT	; Called by MENU option YSPRINT ; disabled by Patch 60
NX	;
NX1	;
CK	;
CK1	;
KAR	;
END	;
HX2F	;
HX2FS	;
INT	;
BECK	; Called by YTAR -> BECK msg.
MMPI	; Called by YTAR -> MMPI msg.
MASKSSN(YSSSN)	; return only last 4 of SSN

External References

Name	Field # of Occurrence
^%ZISC	END+1
$$FMTE^XLFDT	NX+1
^YSLRP	RPT+2, INT+1
ENPT^YSUTL	C+2
^YTAR	C+2, INT+1
^YTDP	RPT+2, INT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Patient's SEX required to administer instruments!" Line Location: C+1
Function Call: WRITE	Prompt: @IOF,!!?2,YSHDR Line Location: NX+5
Function Call: WRITE	Prompt: !!,"You have selected the ""BECK"" instrument, the ""BDI"" " Line Location: BECK+2
Function Call: WRITE	Prompt: !,"instrument will be administered in its place.",! Line Location: BECK+3
Function Call: WRITE	Prompt: !!,"You have selected the ""MMPI"" instrument, the ""MMPI2"" " Line Location: MMPI+2
Function Call: WRITE	Prompt: !,"instrument will be administered in its place.",! Line Location: MMPI+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	C+1
^XUSEC("YSP"	NX1+2
^YSA(602	NX+3
^YTD(601.2 - [#601.2]	NX1+3, NX1+4, HX2F+1
^YTT(601 - [#601]	NX1+3, CK+1, HX2F+1, INT+1

Label References

Name	Line Occurrences
$$MASKSSN	NX+2
C	INT+1
CK	NX1+3
CK1	CK+1
END	RPT+2, INT+1
HX2F	INT+1
HX2FS	HX2F+1
NX	C+2, RPT+2, INT+1
NX1	NX+4

Naked Globals

Name	Field # of Occurrence
^(	HX2F+1
^(99	NX1+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	NX+1*, END+1!
%DT	END+1!
%Y	NX+1*, KAR+2!
%ZIS	KAR+2!
A	KAR+2!
A(	NX1+4, CK1+1*
A1	KAR+2!
A1(	NX1+4, HX2FS+1
A9	NX+4, END+1!, INT+1
B	KAR+2!
B1	KAR+2!
C	KAR+2!
D0	KAR+2!
DA	KAR+2!
DIC	KAR+2!
DIE	KAR+2!
DQ	KAR+2!
DR	KAR+2!
DT	NX+2
DTOUT	KAR+2!
DUOUT	KAR+2!
DUZ	NX1+2
H	KAR+2!
I	KAR+2!
I0	KAR+2!
IOF	NX+5
J	KAR+2!
K	KAR+2!
L	KAR+2!
M	KAR+2!
N	NX1+3, CK+1, CK1+1, KAR+2!, HX2F+1, HX2FS+1
N1	NX1+4, KAR+2!, HX2F+1
N2	NX1+3, NX1+4, CK1+1, KAR+2!
N3	KAR+2!, HX2F+1*, HX2FS+1
N4	CK+1*, CK1+1, KAR+2!
P0	KAR+2!
P1	KAR+2!
P3	KAR+2!
R1	KAR+2!
T	KAR+2!
T1	KAR+2!, INT+1*
T1(0	INT+1*
T2	NX1+2*, CK+2, CK+3, KAR+2!
U	C+1, NX+3, CK+1, CK+3, INT+1
X	CK+1*, CK+3, END+1!
X0	KAR+2!
X1	KAR+2!
X3	KAR+2!
X4	KAR+2!
X7	KAR+2!
X8	KAR+2!
X9	CK+1*, CK+2, CK+3, KAR+2!
XMB	KAR+2!
XMDUZ	KAR+2!
Y	NX+1*, END+1!
Y1	KAR+2!
Y2	KAR+2!
YS4D	KAR+2!
YSAGE	NX+2, KAR+2!
YSBAT	KAR+2!
YSBEGIN	KAR+2!
YSBL	NX+2*, KAR+2!
YSCD	KAR+2!
YSCH	KAR+2!
YSCHN	KAR+2!
YSCL	KAR+2!
YSCLERK	END+1!
YSCLN	KAR+2!
YSCON	KAR+2!
YSD	END+1!
YSDEMO	KAR+3!
YSDFN	C+1, RPT+2, NX1+3, NX1+4, END+1!, HX2F+1, INT+1
YSDFN(0	INT+1
YSDOB	KAR+3!
>> YSDT(0	NX+1*, NX+2
YSDTA	KAR+3!
YSDTM	KAR+3!
YSED	KAR+3!
YSEN	KAR+3!
YSENT	KAR+3!
YSET	KAR+3!
YSFHDR	KAR+3!
YSFTR	KAR+3!
YSHD	NX+2*, KAR+3!
YSHDR	NX+2*, NX+5, KAR+3!
YSHDT	NX1+1*, KAR+3!
YSJT	KAR+3!
YSLFT	KAR+1, KAR+3!
YSLN	KAR+3!
YSNM	NX+2, KAR+3!
YSNO	RPT+2*, CK+2, CK+3, KAR+3!
YSNQ	KAR+3!
YSNT	NX1+4, KAR+3!, HX2F+1, HX2FS+1*
YSNX	KAR+4!
YSOK	KAR+4!
YSORD	KAR+4!
YSORDD	KAR+4!
YSORDP	KAR+4!
YSPTD	NX+1*, END+1!
YSPTM	NX+1*, KAR+4!
YSQ	KAR+4!
YSRESTRT	KAR+4!
YSRP	KAR+4!
YSRSLMT	NX+3*, END+1!
YSSEX	NX+2, KAR+4!
YSSSN	NX+2, KAR+4!, MASKSSN~, MASKSSN+1
YSSX	NX+2*, KAR+4!
YSTEST	KAR+4!
YSTESTN	KAR+4!, BECK+1, BECK+4, MMPI+1, MMPI+4
YSTF	KAR+4!
YSTIN	KAR+4!
YSTM	KAR+4!
YSTX	KAR+4!
>> YSTXTED	KAR+1*
YSTY	KAR+4!
YSXT	NX1+1, END+1!, HX2F+1, HX2FS+1, INT+1*
YSXTP	KAR+4!, INT+1*
YSYI	KAR+4!
YSYTX	KAR+4!
YSZZ	KAR+4!
Z	KAR+4!
Z1	KAR+4!
Z3	KAR+4!
ZTSK	END+1!

Customize PDF page

Package: Mental Health