Routine: YTREPT

Information

YTREPT ;SLC/DKG-TEST PKG: GENERAL TEST REPORT ;Nov 09, 2023@14:48:57;

Source file <YTREPT.m>

Name	Comments	DBIA/ICR reference
SCOR	;
DI	;
TF	;
F0	;
T0	;
T1	;
T2	;
T3	;
RW	;
W0	;
RD	;
STND	;
ST	;
LK
REPT	;
IR	;
R2	;
DONE	;
RLN	;
SCR	; ; Added 5/6/94 LJA
DTA	;
ICL	;Report Logic for ICL Report. This code was too long to remain in file.

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?(72-$L(X)\2),X,!!!?(A-9\2+L1),"S C A L E",?(L2+1),"RAW ",B,! Line Location: REPT+3
Function Call: WRITE	Prompt: !?L1,$P(^YTT(601,YSTEST,"S",J,0),U,2),?L2,$J(YSRS,4,0) Line Location: REPT+4
Function Call: WRITE	Prompt: ?(L2+6),$J($P(S,U,J),4,0) Condition for execution: $D(S) Line Location: REPT+4
Function Call: WRITE	Prompt: !!?(72-$L(X)/2),X Line Location: IR+2
Function Call: WRITE	Prompt: !!!?25,"--- ITEM RESPONSES ---",!! Line Location: IR+3
Function Call: WRITE	Prompt: ?1 Line Location: RLN+1
Function Call: WRITE	Prompt: $J(YSIT,3,0)," ",$E(X,YSIT-M)," " Line Location: RLN+1
Function Call: WRITE	Prompt: ! Line Location: RLN+2
Function Call: WRITE	Prompt: ! Line Location: SCR+6
Function Call: WRITE	Prompt: @IOF Line Location: SCR+9
Function Call: WRITE	Prompt: @IOF,YSHDR," ",YSDTA Line Location: DTA+2
Function Call: WRITE	Prompt: ! Line Location: DTA+3
Function Call: WRITE	Prompt: "Begun: ",$$FMTE^XLFDT(X8,"5ZD")," Finished ",$$FMTE^XLFDT(X7,"5ZD") Line Location: DTA+3