Routine: YIHIST

Package	Total	Call Graph
Mental Health	2	^YTAR2 (,EN4)^YTFILE
VA FileMan	1	^DIR

Package	Total	Caller Graph
Mental Health	2	YIPHYD YIPROB

Entry Points

Name	Comments	DBIA/ICR reference
CK	;
L	;
A	;
NX	;
N2	;
D1	;
T0	;
A2	;
T3	;
A4	;
T2	;
T1	;
STOR	;
DONE	;
RD	;
BK	;
RP	;
R1	;
YSRP1	;
NOST	;
STM	;
WH	;
HDR	;
WAIT	;
END	;
HOLD	;

External References

Name	Field # of Occurrence
^DIR	WAIT+3
^YTAR2	N2+1, A2+1, A4+1
^YTFILE	DONE+1
EN4^YTFILE	STOR+1, STOR+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?YSIND,Y1 Line Location: L+2
Function Call: WRITE	Prompt: !?YSIND,$E(Y1,1,YSYI) Line Location: L+3
Function Call: WRITE	Prompt: !?YSIND,Y1 Line Location: L+4
Function Call: WRITE	Prompt: !?3,^(0) Line Location: NX+2
Function Call: WRITE	Prompt: !!!?3,"PRESS THE SPACE BAR TO CONTINUE." Line Location: NX+3
Function Call: WRITE	Prompt: " ? " Line Location: N2+1
Function Call: WRITE	Prompt: @IOF Line Location: T0+1
Function Call: WRITE	Prompt: !!?3,^(0) Line Location: T0+2
Function Call: WRITE	Prompt: !!?3,"(Y OR N)",!! Line Location: T0+3
Function Call: WRITE	Prompt: $C(13)," " Line Location: A2+1
Function Call: WRITE	Prompt: " ?" Line Location: A2+1
Function Call: WRITE	Prompt: @IOF Line Location: T3+1
Function Call: WRITE	Prompt: ! Condition for execution: +^(0)=1 Line Location: T3+2
Function Call: WRITE	Prompt: !?3,^(0) Line Location: T3+2
Function Call: WRITE	Prompt: !!!?3,"ANSWER = " Line Location: T3+3
Function Call: WRITE	Prompt: " ? " Line Location: A4+1
Function Call: WRITE	Prompt: !?12,^(0) Line Location: T2+1
Function Call: WRITE	Prompt: @IOF,!!!?3,^YTT(601,YSTEST,"Q",J,"T",1,0) Line Location: T1+1
Function Call: WRITE	Prompt: !?3,^YTT(601,YSTEST,"Q",J,"T",K,0) Line Location: T1+2
Function Call: WRITE	Prompt: !?12,^YTT(601,YSTEST,"Q",J,"T",K,0) Line Location: T1+3
Function Call: READ	Variable: *X Timeout: 900 Line Location: RD+1
Function Call: WRITE	Prompt: !!?YSIND,$P(A,U,2),! Line Location: R1+3
Function Call: WRITE	Prompt: ! Condition for execution: YSSCK Line Location: R1+8
Function Call: WRITE	Prompt: !?YSIND,$P(A,U,3) Line Location: R1+8
Function Call: WRITE	Prompt: ! Condition for execution: YSSCK=2 Line Location: R1+8
Function Call: WRITE	Prompt: ! Condition for execution: YSSCK Line Location: STM+2
Function Call: WRITE	Prompt: !?YSLCK,YSYCK Line Location: STM+2
Function Call: WRITE	Prompt: ! Condition for execution: YSSCK=2 Line Location: STM+2
Function Call: WRITE	Prompt: !,$P(^YTT(601,YSTEST,0),U)," QUESTION # ",J,! Line Location: WH+1
Function Call: WRITE	Prompt: @IOF,YSHDR,!?53,"PRINTED",?62,"ENTERED" Line Location: HDR+1
Function Call: WRITE	Prompt: ! Line Location: WAIT+1
Function Call: WRITE	Prompt: $C(7) Line Location: WAIT+3
Function Call: WRITE	Prompt: @IOF Line Location: WAIT+3
Function Call: READ	Variable: X Timeout: 3 Line Location: HOLD+1
Function Call: WRITE	Prompt: !!,"Please read each question carefully!",$C(7) Line Location: HOLD+1
Routine Call	DIR Line Location: WAIT+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^YTD(601.2 - [#601.2]	R1+4
^YTD(601.4 - [#601.4]	BK+1
^YTT(601 - [#601]	NX+1, NX+2, D1+1, T0+2, T3+2, T2+1, T1+1, T1+2, T1+3, R1+1 , R1+2, WH+1

Label References

Name	Line Occurrences
@(	WH+1
A	YIHIST+2
A2	A2+1, T2+1, T1+3
A4	A4+1
BK	A2+1, A4+1
CK	L+2, L+3, L+4, R1+3, R1+7, STM+1
D1	NX+1, BK+1
DONE	NX+1
END	R1+3, R1+7, YSRP1+3, YSRP1+4, YSRP1+5, YSRP1+6, NOST+1
HDR	CK+1, RP+1
HOLD	A4+1
L	L+5, YSRP1+4, YSRP1+5, YSRP1+6, NOST+1
N2	N2+1
NOST	YSRP1+1, YSRP1+2
NX	STOR+1, STOR+4, BK+2
R1	R1+3, R1+5, R1+6, R1+8, YSRP1+1, YSRP1+2, YSRP1+4, YSRP1+5, YSRP1+6, NOST+1
RD	N2+1, A2+1, A4+1, RD+1
STM	YSRP1+3, NOST+1
STOR	A2+1, A4+1
T0	D1+1
T1	D1+1
T2	D1+1
T3	D1+1, HOLD+1
WAIT	CK+1
WH	A2+1, A4+1
YSRP1	R1+6

Naked Globals

Name	Field # of Occurrence
^(	NX+1
^(0	NX+2, T0+2, T3+2, T2+1, T1+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	R1+1!, R1+2, R1+3, R1+6, R1+8, YSRP1+1, YSRP1+2, YSRP1+5, YSRP1+6
B	D1+1, STOR+1, R1+1!, R1+2
DIR	WAIT+3!
DIR(0	WAIT+3*
DIRUT	WAIT+2~, WAIT+3
DTOUT	WAIT+2~
DUOUT	WAIT+2~
I	BK+1, R1+1!, R1+2, R1+3, R1+4, R1+5, END+1!
>> I0	WAIT+1*
IOF	NX+2, T0+1, T3+1, T1+1, HDR+1, WAIT+3
IOSL	WAIT+1
IOST	RP+2
J	A+1, NX+1, NX+2, D1+1, T0+2, T3+2, T2+1, T1+1, T1+2, T1+3 , STOR+1, STOR+2, BK+1, BK+2, RP+1, R1+1!, R1+2*, WH+1
>> K	NX+2, T0+2, T3+2, T2+1, T1+2, T1+3, STOR+2*
L	STOR+2, STOR+3, RP+1, R1+1!, R1+4, R1+5
>> M	T3+3, A4+1, STOR+2
>> P0	CK+1, RP+2*
>> P1	L+2, L+3, L+4, RP+2*
>> P3	RP+2*, R1+3, R1+7, STM+1
R	R1+1!, R1+5, YSRP1+1, YSRP1+2*, YSRP1+4, YSRP1+5, YSRP1+6, NOST+1, END+1!
>> R1	A2+1, A4+1, WH+1
>> T	D1+1, STOR+2, STOR+3
U	D1+1, R1+2, R1+3, R1+6, R1+8, YSRP1+1, YSRP1+2, WH+1
U1	RP+1, R1+1!, R1+4
X	N2+1, A2+1, A4+1, STOR+1, RD+1, BK+1, HOLD+1*!
>> Y1	L+1*, L+2, L+3, L+4
>> Y2	L+1*, L+2, L+3, L+4
>> YSAGE	HDR+1
>> YSDFN	BK+1, R1+4
>> YSDT(0	HDR+1
>> YSED	R1+4
>> YSENT	BK+1
>> YSET	R1+4
>> YSHD	HDR+1
>> YSHDR	HDR+1*
YSIND	L+1, L+2, L+3, L+4, R1+1!, R1+2*, R1+3, R1+6, R1+8, YSRP1+3 , NOST+1, END+1!
>> YSJT	A+1, STOR+1, STOR+2
YSLCK	RP+1, R1+1!, R1+3, R1+6, YSRP1+3, NOST+1, STM+2, END+1!
>> YSRP	A+1, STOR+1, STOR+2, STOR+3, BK+1, BK+2
YSSCK	R1+1!, R1+6*, R1+7, R1+8, STM+1, STM+2, END+1!
>> YSSEX	HDR+1
YSSTEM	R1+1!, R1+6*, YSRP1+1, YSRP1+2, YSRP1+4, YSRP1+5, YSRP1+6, END+1!
>> YSTEST	NX+1, NX+2, D1+1, T0+2, T3+2, T2+1, T1+1, T1+2, T1+3, R1+1 , R1+2, WH+1
>> YSTY	D1+1*, T3+3
YSYCK	R1+1!, R1+6*, STM+2, END+1!
>> YSYI	L+3*, L+4
>> YSYTX	L+1, L+3, L+4, YSRP1+4, YSRP1+5, YSRP1+6, NOST+1
YSYX	R1+1!, R1+4*, R1+5, END+1!
>> YSZZ	CK+1, L+2, L+3, L+4, RP+1, R1+3, R1+7, YSRP1+3, YSRP1+4, YSRP1+5 , YSRP1+6, NOST+1, STM+1, WAIT+3
>> YZT	A4+1*

Customize PDF page

Package: Mental Health

Routine: YIHIST

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: