Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: AMQQCMPM

Package: PCC Medical Query

Routine: AMQQCMPM


Information

AMQQCMPM ; IHS/CMI/THL - RESOLVES DISPLAY OF MULTIPLE MULTIPLES ; 12 Mar 2015 1:09 PM

Source Information

Source file <AMQQCMPM.m>

Call Graph

Call Graph Total: 2

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
PCC Medical Query 1 AMQQCMP1  

Entry Points

Name Comments DBIA/ICR reference
ALL
ALLEXIT
DXQA1
DXEXIT
MM
MM1 ;
DXQA
DXQ
CD
EXIT
CDQ
ALLQ
X3
X2
X11 ;IHS/CMI/LAB - addded question about qualifiers
EXP ; EXPANDED LAB OUTPUT
X1
SPEC
MULT
HELP

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~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All