Routine: AMQQCMPM

Package	Total	Call Graph
Kernel	1	EN1^XQH
VA Fileman	1	^DIR

Package	Total	Caller Graph
PCC Medical Query	1	AMQQCMP1

Entry Points

External References

Name	Field # of Occurrence
^DIR	X11+7
EN1^XQH	HELP+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"You have 2 options for ",%,"ing ",AMQQOBJS," =>",! Line Location: ALL+26
Function Call: WRITE	Prompt: !?5,"1) For ea. patient, ",%," all ",@B," which match your",!?8,"criteria" Line Location: ALL+27
Function Call: WRITE	Prompt: !?5,"2) ",$S(AMQV("OPTION")="COUNT":"Count",1:"List")," all ",@A," with ",AMQQOBJS," meeting your criteria,",!?8,"but do not ",%," the individual values of ea. ",AMQQOBJ,! Line Location: ALL+28
Function Call: WRITE	Prompt: !,"Your choice (1 or 2): 1// " Line Location: ALLQ+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: ALLQ+1
Function Call: WRITE	Prompt: " (1)" Line Location: ALLQ+3
Function Call: WRITE	Prompt: " ??",*7 Line Location: X2+1
Function Call: WRITE	Prompt: !!,"You have 2 options for counting ",AMQQN(1)," =>",! Line Location: CD+0
Function Call: WRITE	Prompt: !?5,"1) Count all specified ",AMQQN(2)," for all patients" Line Location: CD+1
Function Call: WRITE	Prompt: !,"Your choice (1-2): 1// " Line Location: CDQ+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: CDQ+1
Function Call: WRITE	Prompt: " ??",*7 Line Location: CDQ+7
Function Call: WRITE	Prompt: !?5,"1) List every ",$S(AMQQN(2)="ICD9 CODES":"DIAGNOSIS",AMQQN(2)="ICD CODES":"ICD CODE",1:AMQQN(2))," meeting search criteria." Line Location: MULT+8
Function Call: WRITE	Prompt: !?5,"2) List every ",$S(AMQQN(2)="ICD9 CODES":"DIAGNOSIS",AMQQN(2)="ICD CODES":"ICD CODE",1:AMQQN(2))," and ",$S(AMQQN(3)="PROVIDER NARRATIVES":"PROVIDER NARRATIVE",1:AMQQN(3))," meeting search criteria." Line Location: MULT+9
Function Call: WRITE	Prompt: ! Line Location: MULT+9
Function Call: WRITE	Prompt: !?5,"3) List all PATIENTS with ",$S(AMQQN(2)="ICD9 CODES":"DIAGNOSIS",1:AMQQN(2))," you specified, but DO NOT list",!?8,"individual ",$S(AMQQN(2)="ICD9 CODES":"ICD CODES",1:AMQQN(2))," or ",AMQQN(3)," (FASTEST OPTION!!)",! Line Location: MULT+10
Function Call: WRITE	Prompt: ?8,"(Displays UNDUPLICATED list of PATIENTS)",! Line Location: MULT+11
Function Call: WRITE	Prompt: !,"Your choice (1-",(3-$D(AMQQNO3)),"): 1// " Line Location: DXQ+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: DXQ+1
Function Call: WRITE	Prompt: " (1)" Line Location: DXQA+1
Function Call: WRITE	Prompt: " ??",*7 Line Location: X3+1
Routine Call	DIR Line Location: X11+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMQQ(1 - [#9009071]	ALL+19, DXQA1+2, X11+4, SPEC, EXP+2*
^DIC(9.2 - [#9.2]	HELP+1
^UTILITY("AMQQ TAX"	MULT+4
^UTILITY("AMQQ"	MM1+1, MM1+2, MM1+3, MM1+5, MM1+6, MM1+7, ALL+3, ALL+7, ALL+12, ALL+13 , ALL+14, ALL+15, ALL+16, ALL+18, X1, CD+3, MULT+2, DXQA1, DXQA1+2, X11+3 , X11+4, X3*, SPEC

Label References

Name	Line Occurrences
@(	ALL+11
ALL	MM+2, ALLQ+4
ALLEXIT	ALL+6, ALL+7, ALL+12, ALL+13, ALL+14, ALL+15, ALL+17, ALL+19, ALLQ+2, X1 , X2
ALLQ	X2+2
CD	CDQ+5, MULT+5
CDQ	CDQ+8
DXEXIT	DXQA
DXQ	X3+2
DXQA	MULT+5, MULT+6
DXQA1	SPEC+2
EXIT	MM+3
EXP	DXQA1+1
HELP	ALLQ+4, CDQ+5, DXQA+2
MM1	MM+4
MULT	ALL+19, DXQA+2, SPEC
SPEC	ALL+7
X1	ALL+8, ALL+20
X11	X1
X2	ALL+21
X3	MULT+1

Naked Globals

Name	Field # of Occurrence
^(	ALL+12, ALL+15, CD+3, DXQA1+2*
^(1	ALL+13, EXP+2*
^(9	ALL+19, SPEC

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	MM~, MM1+2, MM1+4, MM1+5, MM1+6, ALL, ALL+1, ALL+2, ALL+3, ALL+7 , ALL+9, ALL+10, ALL+11, ALL+12, ALL+15, ALL+16, ALL+17, ALL+24, ALL+25, ALL+26 , ALL+27, ALL+28, MULT+2, MULT+3, MULT+4, DXQA1, DXQA1+1, DXQA1+2, SPEC, SPEC+1 , EXP+2
%A	HELP~
%B	HELP~
A	MM~, ALL+22*, ALL+28, ALLEXIT!
>> AMQQCCLS	ALL+6
AMQQDVQU	MM+1!, X11+2!, X11+6!, X11+8!, X11+9!, X11+10*
AMQQHIT	CD+3*, CD+5!
>> AMQQI	CD+2, CD+3
>> AMQQMULL	ALL+5*, X11+4
AMQQMULN	ALL+2*, ALL+5, ALL+7, ALL+12, ALL+13, ALL+14, ALL+15, ALL+16, ALL+18, X1 , X2, ALLEXIT!, MULT+2, DXQA1, DXQA1+2, X11+3, X3, SPEC
AMQQMULX	MM+4, EXIT!, ALL, ALL+1, X2, X3
AMQQN	ALL+19, ALLEXIT!, MULT, SPEC
AMQQN(	MULT*
AMQQN(1	CD, CD+3, CD+4, MULT+7
AMQQN(2	CD+1, MULT+8, MULT+9, MULT+10
AMQQN(3	MULT+9, MULT+10
AMQQNO3	ALLEXIT!, MULT+7, MULT+9, MULT+10, DXQ, X3, SPEC*
AMQQOBJ	ALL+3*, ALL+4, ALL+28, ALLEXIT!
AMQQOBJS	ALL+4*, ALL+23, ALL+26, ALL+28, ALLEXIT!, X11+7
>> AMQQONE	ALL+20, MULT+6
>> AMQQQUIT	MM+3, ALLQ+2, DXQA
AMQQSTP	CD+3*, CD+4, CD+5!
>> AMQQXX	ALL+8
>> AMQQXX("FORMAT"	ALL+8
>> AMQV("OPTION"	ALL+9, ALL+21, ALL+25, ALL+28, MULT+1, MULT+5, SPEC
B	MM~, ALL+23*, ALL+27, ALLEXIT!
DA	X11+7!
DIC	MM~
DIR	X11+6!, X11+7!
DIR("?"	X11+7*
DIR("A"	X11+7*
DIR("B"	X11+7*
DIR(0	X11+7*
>> DIRUT	X11+8
DTIME	ALLQ+1, CDQ+1, DXQ+1
I	MM~, MM+4, MULT
N	MM~, MM+4*, MM1+1, MM1+2, MM1+3, MM1+5, MM1+6, MM1+7
U	MM+4, MM1+2, MM1+3, MM1+5, MM1+7, ALL, ALL+1, ALL+3, ALL+7, ALL+12 , ALL+13, ALL+14, ALL+15, ALL+16, ALL+19, ALLQ+1, ALLQ+2, X2, CDQ+1, CDQ+6 , MULT, MULT+2, DXQ+1, DXQA, DXQA1+2, X11+3, X11+4, X3, EXP+2
X	MM~, ALL+8, ALL+11, ALL+12, ALL+18, ALL+19, ALL+20, ALL+21, ALLQ+1, ALLQ+2 , ALLQ+3, ALLQ+4, X1, X2, CDQ+1, CDQ+2, CDQ+3, CDQ+4, CDQ+5, CDQ+6 , MULT+1, MULT+6, DXQ+1, DXQA, DXQA+1, DXQA+2, DXQA1, X11+3, X11+5~, X11+12 , X3, DXEXIT!, SPEC+1*, EXP+1~
>> XQH	HELP+1*
Y	MM~, MM1+7, X11+9, EXP+1~
Z	MM~, MM1+6, MM1+7, ALL+12, EXP+1~

Customize PDF page

Package: PCC Medical Query

Routine: AMQQCMPM

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: