Routine: AMQQEM3

Package	Total	Call Graph
PCC Medical Query	3	^AMQQEM21 (FLEN,T5,T6,T7,T8)^AMQQEM31 MARK^AMQQEMAN
VA Fileman	1	^DIR

Package	Total	Caller Graph
PCC Medical Query	1	AMQQEM2

Entry Points

External References

Name	Field # of Occurrence
^AMQQEM21	DATE+1
FLEN^AMQQEM31	AMQQEM3+6
T5^AMQQEM31	T5
T6^AMQQEM31	T6, T9
T7^AMQQEM31	T7
T8^AMQQEM31	T8
MARK^AMQQEMAN	TUNE+22, DATE+5, T3+17
^DIR	TUNE+13, TYPE1+4, T2+2, T3+12, T4+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: *7 Line Location: EXIT+0
Function Call: WRITE	Prompt: @IOF Line Location: DISP+4
Function Call: WRITE	Prompt: $P(X,";") Line Location: DISP+6
Function Call: WRITE	Prompt: %,D Line Location: DISP+8
Function Call: WRITE	Prompt: !,% Line Location: DISP+19
Function Call: WRITE	Prompt: !!,"This field cancelled..." Line Location: TUNE+0
Function Call: WRITE	Prompt: @IOF Line Location: TUNE+1
Function Call: WRITE	Prompt: ! Line Location: TUNE+3
Function Call: WRITE	Prompt: "Edit field/variable = """,%,"""" Line Location: TUNE+6
Function Call: WRITE	Prompt: "DATA TYPE",! Line Location: TYPE+1
Function Call: WRITE	Prompt: "VIEW/EDIT DATA TYPE",! Line Location: T1+0
Function Call: WRITE	Prompt: "DELETE",! Line Location: T2+0
Function Call: WRITE	Prompt: @IOF Line Location: T21+1
Function Call: WRITE	Prompt: "MOVE",! Line Location: T3+0
Function Call: WRITE	Prompt: *7,"Whoops, you have only defined one segment. Request denied..." Line Location: T3+1
Function Call: WRITE	Prompt: " ??",*7 Line Location: T3+7
Function Call: WRITE	Prompt: " ??",*7 Line Location: T3+17
Function Call: WRITE	Prompt: " ??",*7 Line Location: T3+18
Function Call: WRITE	Prompt: " ??",*7 Line Location: T3+19
Function Call: WRITE	Prompt: "RENAME FIELD",! Line Location: T4+0
Function Call: WRITE	Prompt: "Current field name: ",$P(^(0),U,6) Line Location: T4+1
Routine Call	DIR Line Location: TUNE+13 TYPE1+4 T2+2 T3+12 T4+4

Label References

Name	Line Occurrences
@(	RUN, TUNE+22
DISP	LIST+21
EXIT	AMQQEM3+7
LIST	EXIT, TUNE+2, TUNE+24
T2	TUNE+18
T21	TUNE
T3	T3+17, T3+18, T3+19
TUNE	TUNE+25
TYPE1	T1+1

Naked Globals

Name	Field # of Occurrence
^(	DATE+4
^(0	TUNE+5, T4+1*
^(2	DATE+4*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	DISP~, DISP+8, DISP+13, DISP+14, DISP+15, DISP+17, DISP+18, DISP+19, TUNE+4, TUNE+5* , TUNE+6, DATE+4, TYPE1, TYPE1+1, T21, T3+3
%(1	T3+4*, T3+9
%(2	T3+5*, T3+9
A	LIST+7, LIST+8, LIST+9, LIST+10, LIST+11, DISP~, DISP+10, DISP+11, DISP+12, DISP+14 , DISP+16
>> AMQQEM("DATA"	TYPE
>> AMQQEM("DATE	TRANS" , DATE, DATE+4
>> AMQQEM("DEL"	DISP+1
>> AMQQEM("FIX"	AMQQEM3+6, LIST+11, LIST+12, DISP+8, TUNE+8, TUNE+10, TUNE+21
>> AMQQEM("HLEN"	T4+2
>> AMQQEM("LEN"	DISP+12, DISP+16
AMQQEM3	AMQQEM3+4, RUN, EXIT+1!, DISP+8
AMQQEMAX	EXIT+1!, T3+6*, T3+18
>> AMQQEMFN	RUN, LIST+7*, LIST+17, LIST+21
>> AMQQEMFS	EXIT, LIST+2, LIST+7, DISP+8, T21, T21+1, T3+1, T3+3, T3+8, T3+19 , T3+20, T3+21, T3+22, T3+23, T3+24*
AMQQEMKL	TUNE!, DATE+3*, TYPE
>> AMQQEMN	AMQQEM3+4*, EXIT, LIST+10, DISP+8, TUNE+4, DATE, TYPE1, TYPE1+8, T21, T3+3 , T3+19, T4+1, T4+9
AMQQEMNO	DATE+3!
AMQQEMP	EXIT+1!, T3+3*, T3+4, T3+5, T3+20, T3+21
AMQQFLEN	AMQQEM3+6~, LIST+10
>> AMQQQUIT	AMQQEM3+6, RUN, TUNE+16, TUNE+23, DATE+2, TYPE1+7, T2+5, T3+16, T4+8*
AMQQSTOP	AMQQEM3+7, RUN, EXIT!
D	DISP~, DISP+1, DISP+2, DISP+3*, DISP+8
DIR	TUNE+14!, DATE!, TYPE1+5!, T2+3!, T3+13!, T4+5!
DIR("A"	TUNE+11, TYPE1+3, T2+1, T3+11, T4+3*
DIR("B"	TUNE+12, TYPE1+1, T3+9*
DIR(0	TUNE+7, TUNE+8, TUNE+9, TUNE+10, TYPE1+2, T2+1, T3+10, T4+2
DIROUT	EXIT+1!
DIRUT	EXIT+1!, TUNE+15, TYPE1+6, T2+4, T3+14, T4+6*
DTOUT	EXIT+1!
DUOUT	EXIT+1!, TUNE+15, TYPE1+6, T2+4, T3+14, T4+6
>> G	EXIT, LIST+8, LIST+9, LIST+11, TUNE+4, DATE, DATE+4, TYPE1, TYPE1+8, T4+1 , T4+9*
H	LIST+1!
H(	LIST+17, LIST+20, DISP+5, DISP+6, DISP+8, DISP+9
H(1	LIST+5*
I	LIST+4, LIST+18, LIST+20, DISP~, DISP+6, DISP+8
IOF	DISP+4, TUNE+1, T21+1
J	LIST+3, LIST+17, LIST+20, DISP~, DISP+5*, DISP+6, DISP+8, DISP+9
K	DISP~, DISP+8
N	LIST+4, LIST+17, LIST+19, DISP~, DISP+5, DISP+6*, DISP+10, DISP+11
T	LIST+1~, LIST+6, LIST+16, DISP~, DISP+8, DISP+12, DISP+16
U	RUN, EXIT, LIST+7, LIST+8, LIST+9, LIST+11, LIST+20, DISP+3, DISP+6, DISP+8 , TUNE+4, TUNE+5, DATE, DATE+4, TYPE1, TYPE1+8, T21, T3+1, T3+3, T3+8 , T3+19, T3+20, T3+21, T3+22, T3+23, T3+24, T4+1, T4+9
X	LIST+8, LIST+13, LIST+15, LIST+20, DISP~, DISP+6, DISP+8, TYPE1+7, T2+5, T21* , T3+2, T3+3, T3+5, T3+6, T3+7, T3+8, T3+15, T3+16, T3+17, T3+18 , T3+19, T3+24, T4+7, T4+8
Y	AMQQEM3+3, AMQQEM3+4, AMQQEM3+5~, LIST+9, LIST+10, LIST+11, LIST+12, LIST+13, LIST+15, LIST+16 , LIST+17, LIST+19, LIST+20, DISP~, DISP+8, TUNE+16, TUNE+17, TUNE+18, TUNE+19, TUNE+20* , TUNE+21, TUNE+22, TYPE1+8, T2+6, T3+3, T4+9
Z	LIST+14, LIST+15, LIST+20, DISP~, DISP+8, T3+20, T3+24

Customize PDF page

Package: PCC Medical Query

Routine: AMQQEM3

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Label References

Naked Globals

Local Variables

Legend: