Routine: XQARPRT2

Package	Total	Call Graph
Kernel	6	^%ZIS ^%ZISC ^%ZTLOAD $$FMTE^XLFDT $$UP^XLFSTR ($$OLDEST,VIEWTRAK)^XQARPRT1
VA Fileman	3	^%DT $$GET1^DIQ ^DIR

Package	Total	Caller Graph
Kernel	1	XQARPRT1

Entry Points

Name	Comments	DBIA/ICR reference
WORDHDR	;
DATES	;
EN	; OPT - interactive lists alerts from start date for a single user based on contents of alert tracking file
DQ1	;
DTPTDQ	;
OLDEST()	; Returns date of oldest entry in alert tracking file
WORDS(TYPE)	; Allow user to select alerts containing only certain words
VIEWTRAK	; OPT. View an entry in the Alert Tracking file in Captioned mode
EN1	;
USER	;USER ENTRY POINT
CHEKSCAN(XQADFN)	; Output a list of dates when OR, and DVB alerts are found
DTPT	; OPT - GIVEN DATE AND PATIENT, TAKE A LOOK AT ALL USING 'D' X-REF ; for one day and for 1 patient list data in alert tracking file related to patient
PRNTATRK(IEN)	; Print data for an entry from the alert tracking file
HEADER(XQANAME,DOFF)	; Output header at start of report XQANAME indicates who report is for

External References

Name	Field # of Occurrence
^%DT	CHEKSCAN+9
^%ZIS	EN1+4, DTPT+7
^%ZISC	DQ1+10
^%ZTLOAD	EN1+4, DTPT+7
$$GET1^DIQ	DQ1+2, DTPT+3, DTPTDQ+2
^DIR	EN+1, WORDS+11, WORDS+19, WORDS+25, DATES+1, DATES+4, PRNTATRK+18, DTPT+3, CHEKSCAN+4, CHEKSCAN+8
$$FMTE^XLFDT	DATES+2, DATES+3, PRNTATRK+14, HEADER+1, HEADER+2, CHEKSCAN+6, CHEKSCAN+14
$$UP^XLFSTR	WORDS+19, PRNTATRK+5
$$OLDEST^XQARPRT1	OLDEST+1
VIEWTRAK^XQARPRT1	VIEWTRAK+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?10,"ALL words or phrases connected by -AND- must appear in the",!?10,"message for an alert to be selected" Line Location: WORDS+14
Function Call: WRITE	Prompt: !?10,"The earliest date in the alert tracking file is ",$$FMTE^XLFDT($$OLDEST(),"D") Line Location: DATES+2
Function Call: WRITE	Prompt: !,"* WARNING *: Do not specify too many days - each entry in the Alert Tracking",!,"file must be checked for the date range specified.",! Line Location: DATES+3
Function Call: WRITE	Prompt: !,$E(XQAMSG,1,IOM-1) Line Location: PRNTATRK+15
Function Call: WRITE	Prompt: !?35,XQANEN Line Location: PRNTATRK+15
Function Call: WRITE	Prompt: @IOF Line Location: PRNTATRK+17
Function Call: WRITE	Prompt: ! Line Location: PRNTATRK+18
Function Call: WRITE	Prompt: @IOF Condition for execution: DOFF Line Location: HEADER+1
Function Call: WRITE	Prompt: OUTDATE Line Location: HEADER+3
Function Call: WRITE	Prompt: ! Line Location: HEADER+5
Function Call: WRITE	Prompt: !?5,$S(J=1:"Selected alerts containing:",1:" and containing:"),?35,XQAWORDS(I,J) Line Location: WORDHDR+3
Function Call: WRITE	Prompt: !!! Line Location: CHEKSCAN+2
Function Call: WRITE	Prompt: !,"Dates and number of alerts found in () [may not be all of them]" Line Location: CHEKSCAN+12
Function Call: WRITE	Prompt: !,XX(I) Line Location: CHEKSCAN+15
Routine Call	DIR Line Location: EN+1 WORDS+11 WORDS+19 WORDS+25 DATES+1 DATES+4 PRNTATRK+18 DTPT+3 CHEKSCAN+4 CHEKSCAN+8
Routine Call	%ZIS Line Location: EN1+4 DTPT+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP("XQARPRT2"	CHEKSCAN+5!, CHEKSCAN+10*, CHEKSCAN+12, CHEKSCAN+14
^XTV(8992.1 - [#8992.1]	DQ1+5, DQ1+6, DQ1+7, PRNTATRK+2, PRNTATRK+3, DTPTDQ+4, DTPTDQ+5, CHEKSCAN+10

Label References

Name	Line Occurrences
$$OLDEST	DATES+2, CHEKSCAN+6
CHEKSCAN	DTPT+4
DATES	EN1+2, DTPT+5
EN1	USER+2
HEADER	DQ1+4, DQ1+9, DTPTDQ+3, DTPTDQ+13
PRNTATRK	DQ1+8, DTPTDQ+10
WORDHDR	HEADER+4
WORDS	EN1+3, DTPT+6

Naked Globals

Name	Field # of Occurrence
^(	DQ1+5, CHEKSCAN+14
^(0	DTPTDQ+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	EN1+1~, EN1+4, DTPT+7
BASECNT	CHEKSCAN+1~
CNT	CHEKSCAN+1~, CHEKSCAN+14*
COL	CHEKSCAN+1~
DATA	DQ1+11!
DIR	EN+1~!, DQ1+11!, WORDS+11!, WORDS+20!, WORDS+25!, USER+1~, DATES+1!, DATES+4!, PRNTATRK+18!, DTPT+2~ , CHEKSCAN+1~, CHEKSCAN+4!, CHEKSCAN+8!
DIR("?"	WORDS+2, WORDS+3, WORDS+4, WORDS+5, WORDS+6, WORDS+7, WORDS+8, WORDS+9, WORDS+10, WORDS+15 , WORDS+16, WORDS+17, WORDS+18, WORDS+24
DIR("A"	WORDS+1, WORDS+19, WORDS+25, DATES+1, DATES+4, CHEKSCAN+2, CHEKSCAN+3, CHEKSCAN+7
DIR("B"	WORDS+25, DATES+1, DATES+3*
DIR(0	EN+1, WORDS+1, WORDS+19, WORDS+24, DATES+1, DATES+4, PRNTATRK+18, DTPT+3, CHEKSCAN+2, CHEKSCAN+7
DIRUT	EN+1, EN1+3, DQ1+6, DQ1+11!, WORDS+20!, WORDS+25!, DATES+4, PRNTATRK+16, DTPT+4, DTPT+6 , DTPTDQ+4, DTPTDQ+5, CHEKSCAN+4
DOFF	HEADER~, HEADER+1, HEADER+2
DUZ	USER+1
FOUND	DTPTDQ+1~, DTPTDQ+6, DTPTDQ+7, DTPTDQ+8, DTPTDQ+9, DTPTDQ+10
HEADERID	DQ1+1~, DQ1+2, DQ1+4, DQ1+9, DTPTDQ+1~, DTPTDQ+2, DTPTDQ+3, DTPTDQ+13
I	WORDS+19, PRNTATRK+6~, PRNTATRK+7, WORDHDR+1~, WORDHDR+2, WORDHDR+3, CHEKSCAN+1~, CHEKSCAN+10, CHEKSCAN+14, CHEKSCAN+15
IEN	PRNTATRK~, PRNTATRK+2, PRNTATRK+3, PRNTATRK+14
IO	DQ1+3, PRNTATRK+19
IO("Q"	EN1+4!, DTPT+7!
IO(0	PRNTATRK+18
IOF	PRNTATRK+17, HEADER+1
IOM	PRNTATRK+15
IOSL	PRNTATRK+16
J	WORDS+13, WORDS+19, PRNTATRK+6~, PRNTATRK+7, WORDHDR+1~, WORDHDR+3*
OLDEST	CHEKSCAN+1~, CHEKSCAN+6~*, CHEKSCAN+7
ONE	DTPTDQ+1~, DTPTDQ+5*, DTPTDQ+8, DTPTDQ+9
OUTDATE	HEADER+2~*, HEADER+3
POP	EN1+1~, EN1+4, DTPT+7
TYPE	WORDS~, WORDS+1, WORDS+23
U	PRNTATRK+3, DTPTDQ+7, DTPTDQ+8, DTPTDQ+9, CHEKSCAN+10
X	CHEKSCAN+1~, CHEKSCAN+9*
XQA1U4N	DATES+3, DTPT+2~, DTPT+3*
XQA1U4NP	DTPT+2~, DTPT+3*, DTPTDQ+9
XQACTR	DQ1+1~, DQ1+11!, PRNTATRK+16, HEADER+3, HEADER+5, WORDHDR+3, DTPTDQ+1~
XQADATE	DQ1+1~, DQ1+6, DQ1+7, DQ1+11!, PRNTATRK+1~, PRNTATRK+2, PRNTATRK+14, HEADER+2, DTPTDQ+1~, DTPTDQ+4* , DTPTDQ+5
XQADFN	DTPT+2~, DTPT+3*, DTPT+4, DTPTDQ+2, DTPTDQ+7, CHEKSCAN~, CHEKSCAN+10
XQADISP	EN1+1~, WORDS+25*, PRNTATRK+8, PRNTATRK+9, PRNTATRK+10
XQADOC	EN+1~, DQ1+2, DQ1+6, DQ1+11!, USER+1~
XQAEDATE	DQ1+6, DQ1+7, DATES+4*, HEADER+2, DTPT+2~, DTPTDQ+4
XQAIEN	DQ1+1~, DQ1+5, DQ1+6, DQ1+7, DQ1+8, DQ1+11!, DTPTDQ+1~, DTPTDQ+5*, DTPTDQ+10
XQAMSG	PRNTATRK+1~, PRNTATRK+3*, PRNTATRK+5, PRNTATRK+15
XQAMSG1	PRNTATRK+6~*
XQAMSGUC	PRNTATRK+1~, PRNTATRK+5, PRNTATRK+6, PRNTATRK+7, PRNTATRK+8, PRNTATRK+9, PRNTATRK+10*
XQANAME	HEADER~, HEADER+1, DTPT+2~, DTPT+3*, DTPTDQ+8, DTPTDQ+9
XQANEN	PRNTATRK+1~, PRNTATRK+14*, PRNTATRK+15
XQANODE0	DQ1+1~, DQ1+7, DQ1+11!, PRNTATRK+1~, PRNTATRK+2
XQANWID	DQ1+1~, DTPTDQ+1~
XQAOPT	PRNTATRK+1~, PRNTATRK+3, PRNTATRK+4, PRNTATRK+9, PRNTATRK+10, PRNTATRK+14
XQAROU	PRNTATRK+1~, PRNTATRK+3, PRNTATRK+4, PRNTATRK+9, PRNTATRK+10
XQASDATE	EN1+1~, DQ1+5, DQ1+7, DQ1+11!, DATES+1, DATES+2, DATES+3, DATES+4, HEADER+1, DTPT+2~ , DTPTDQ+4, CHEKSCAN+1~, CHEKSCAN+9*, CHEKSCAN+10
XQATOT	DQ1+1~, PRNTATRK+15, HEADER+1, HEADER+6, DTPTDQ+1~
XQATYPE	DTPTDQ+1~, DTPTDQ+5*, DTPTDQ+7, DTPTDQ+8, DTPTDQ+9
XQAU1N4	EN1+1~
XQAWORDS	EN1+1~, WORDS+23, PRNTATRK+5, HEADER+1, DTPT+2~
XQAWORDS(	WORDS+13, WORDS+19*, PRNTATRK+6, PRNTATRK+7, WORDHDR+2, WORDHDR+3
XX	CHEKSCAN+1~
XX(	CHEKSCAN+14*, CHEKSCAN+15
Y	EN+1, EN1+2, EN1+3!, DQ1+11!, WORDS+11, WORDS+19, WORDS+25*, DATES+1, DATES+4, PRNTATRK+1~ , DTPT+3, DTPT+5, DTPT+6!, CHEKSCAN+1~, CHEKSCAN+4, CHEKSCAN+8, CHEKSCAN+9
ZERO	DTPTDQ+1~, DTPTDQ+5, DTPTDQ+7, CHEKSCAN+10
ZTDESC	EN1+1~, EN1+4, DTPT+7
>> ZTQUEUED	PRNTATRK+17, HEADER+2
ZTRTN	EN1+1~, EN1+4, DTPT+7
ZTSAVE	EN1+1~
ZTSAVE("*"	EN1+4, DTPT+7
ZTSK	EN1+4!, DTPT+7!

Customize PDF page

Package: Kernel

Routine: XQARPRT2

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: