Routine: AMQQHELP

Package	Total	Call Graph
VA Fileman	1	^DIR

Package

Total

Call Graph

VA Fileman

^DIR

Package	Total	Caller Graph
PCC Medical Query	5	AMQQ1 AMQQAC AMQQATA AMQQHEL2 AMQQSQA0

Package

Total

Caller Graph

PCC Medical Query

AMQQ1 AMQQAC AMQQATA AMQQHEL2 AMQQSQA0

Name	Field # of Occurrence
^DIR	ATTS+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: EN1+4
Function Call: WRITE	Prompt: !! Line Location: EN1+6
Function Call: WRITE	Prompt: !!,"Possible choices:" Line Location: L1+2
Function Call: WRITE	Prompt: !?3,"ALL",!?3,"ANY",!?3,"EXISTS",!?3,"NULL" Line Location: L1+3
Function Call: WRITE	Prompt: !,?3,Y Line Location: L1+5
Function Call: WRITE	Prompt: !!,"Enter '^' to stop listing or any other key to see more <>" Line Location: L2+0
Function Call: READ	Timeout: DTIME Variable: Z Line Location: L2+1
Function Call: WRITE	Prompt: @IOF Line Location: L2+3
Function Call: WRITE	Prompt: !! Line Location: LISTG+5
Function Call: WRITE	Prompt: !! Line Location: MULT+1
Function Call: WRITE	Prompt: @IOF,?20,"*** ATTRIBUTE CATEGORIES ***" Line Location: ITEM+1
Function Call: WRITE	Prompt: !,"Type ""ADA CODE"" and the enter the code number or procedure name",! Line Location: ATTS+7
Function Call: WRITE	Prompt: !,"Type ""DX""<RETURN> and then enter the ICD code or diagnosis",! Line Location: ATTS+8
Function Call: WRITE	Prompt: !,"Type ""TREATMENT""<RETURN> and then enter the name of the treatment",! Line Location: ATTS+9
Function Call: WRITE	Prompt: !,"Type ""RX""<RETURN> and then enter the name of the prescription",! Line Location: ATTS+10
Function Call: WRITE	Prompt: !,"Type ""PROCEDURE""<RETURN> and then enter the procedure code or name",! Line Location: ATTS+11
Function Call: WRITE	Prompt: !,"Sorry, these attributes are not currently available",! Line Location: ATTS+20
Function Call: WRITE	Prompt: !!,?3,"POSITIVE",!?3,"NEGATIVE",! Line Location: TYPE+0
Function Call: WRITE	Prompt: ! Line Location: TYPE+1
Function Call: WRITE	Prompt: ! Line Location: TYPE+1
Function Call: WRITE	Prompt: !?3,$P(X,":",2) Line Location: TYPE+2
Routine Call	DIR Line Location: ATTS+2

Name	Line Occurrences (* Changed, ! Killed)
^AMQQ(1 - [#9009071]	TYPE+2, WHP+7
^AMQQ(5 - [#9009075]	L0+2, LISTG+4, TYPE+2, WHP+5
^BWAA("AC"	WHP+1, WHP+9
^UTILITY("AMQQ TAX"	WHP+4

Name	Line Occurrences
$$WHP	L1
L0	EN1+5, MULT
L1	L0+2, L1+3, LISTG+4
L2	L1+4
LISTX	L0+2
MULT	EN1+4
RUN	ATTS+6, ATTS+12, ATTS+13, ATTS+14, ATTS+15, ATTS+16, ATTS+17, ATTS+18, ATTS+19
TYPE	L1+2

Name	Field # of Occurrence
^(	WHP+4
^(0	TYPE+2

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	RUN+1~, EN1+1~, LISTG+1~, TYPE+1~, TYPE+2, WHP+2~, WHP+5, WHP+6, WHP+7
A	RUN+1~, EN1+1~, L0*, L0+2
AMQQLNO	RUN+1~, RUN+2, EN1+1~, EN1+3, L1+1, L1+2, L1+3, L1+4, LISTG+1~, LISTG+3* , TYPE, TYPE+1, TYPE+2*
AMQQMSPF	L1+3!
>> AMQQQUIT	ATTS+4*
>> AMQQSQSN	TYPE+2
>> AMQQSQST	TYPE, TYPE+1
>> AMQQTAX	WHP+4
B	RUN+1~, EN1+1~, L0+2*
C	RUN+1~, EN1+1~, L0+1*, L0+2
DIR	ATTS+3!
DIR("A"	ATTS+1*
DIR(0	ATTS*
DIRUT	ATTS+5!
DTIME	L2+1
DTOUT	ATTS+5!
DUOUT	ATTS+5!
I	RUN+1~, EN1+1~, L0+2, LISTG+1~, TYPE+1~, TYPE+2
IOF	L2+3, ITEM+1
IOSL	L1+4
J	EN1+1~, MULT*
S	EN1+1~, EN1+2*, EN1+4, MULT
T	WHP+2~, WHP+4*, WHP+9
U	L0, L0+1, L2+2, ATTS+4, TYPE+2, WHP+7
X	EN1+2, L0, L0+1, L1, MULT, ATTS+4, ATTS+5, ATTS+6, ATTS+12, ATTS+13 , ATTS+14, ATTS+15, ATTS+16, ATTS+17, ATTS+18, ATTS+19, TYPE+1~, TYPE+2*
Y	RUN+1~, EN1+1~, L0+2, L1, L1+4, L1+5, L2+1, L2+2, LISTG+1~, LISTG+2 , LISTG+4*, ATTS+6, ATTS+7, ATTS+8, ATTS+9, ATTS+10, ATTS+11, ATTS+12, ATTS+13, ATTS+14 , ATTS+15, ATTS+16, ATTS+17, ATTS+18, ATTS+19, WHP~, WHP+5
Z	RUN+1~, EN1+1~, L2+1, L2+2, LISTG+1~, WHP+2~, WHP+7, WHP+8, WHP+9

Customize PDF page

Package: PCC Medical Query

Routine: AMQQHELP

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
RUN	; - EP -
LISTX
ITEM	; - EP - FROM ^AMQQATA AND ^AMQQSQA0
EN1	; - EP - FROM ^AMQQHEL2 AND ^AMQQSQA0
L2
WHP(Y)	; SCREEN WH PROCEDURE ATTRIBUTES
L0
L1
ATTS
LISTG	; ENTRY POINT FROM AMQQ1
TYPE
MULT