Routine: AMQQDOW

Package	Total	Call Graph
VA Fileman	4	H^%DTC ^DIC EN1^DIP ^DIR
Kernel	2	^%ZIS ^%ZTLOAD

Entry Points

External References

Name	Field # of Occurrence
H^%DTC	COUNT, SET+8
^%ZIS	PRINT+1
^%ZTLOAD	PRINT+10
^DIC	INFO+21
EN1^DIP	PRINT+4
^DIR	INFO+4, INFO+12

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: *13,AMQRZZZ Line Location: AMQQDOW+6
Function Call: WRITE	Prompt: " (",AMQRDXXX,")" Line Location: AMQQDOW+6
Function Call: WRITE	Prompt: !!!!,"CRUNCH, CRUNCH....",!! Line Location: AMQQDOW+8
Function Call: WRITE	Prompt: *13,AMQRZZZ," (",AMQRDXXX,")" Line Location: FAIL+1
Function Call: WRITE	Prompt: !!,"TOTAL" Line Location: BLVAR+2
Function Call: WRITE	Prompt: ?J,@G@("C",I) Line Location: BLVAR+4
Function Call: WRITE	Prompt: ?(J+8),AMQRDTOT Line Location: BLVAR+4
Function Call: WRITE	Prompt: !,"DAYS" Line Location: BLVAR+5
Function Call: WRITE	Prompt: ?J,$P(AMQRDD,U,I) Line Location: BLVAR+5
Function Call: WRITE	Prompt: ?J,$P(AMQRDD,U,I) Line Location: BLVAR+5
Function Call: WRITE	Prompt: !,"AVERAGE" Line Location: BLVAR+6
Function Call: WRITE	Prompt: ?(J+8) Line Location: BLVAR+6
Function Call: WRITE	Prompt: ?(J+8) Line Location: BLVAR+6
Function Call: WRITE	Prompt: @IOF Line Location: BLVAR+7
Function Call: WRITE	Prompt: ?J,% Line Location: AVE+4
Function Call: WRITE	Prompt: !,X,"-",Y Line Location: B1+7
Function Call: WRITE	Prompt: ?J,$S($D(@G@("A",AMQRLINE,I)):^(I),1:".") Line Location: B1+8
Function Call: WRITE	Prompt: ?(J+8),@G@("B",AMQRLINE) Line Location: B1+8
Function Call: READ	Prompt: "<>" Formatting: ! Timeout: DTIME Variable: AMQRQ Line Location: PAUSE+0
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+0
Function Call: WRITE	Prompt: !,"WORKLOAD REPORT FOR ",$P(AMQRINFO,U),?54,$P(AMQRINFO,U,2)," to ",$P(AMQRINFO,U,3),! Line Location: HEADER+1
Function Call: WRITE	Prompt: "VISIT TIME" Line Location: HEADER+2
Function Call: WRITE	Prompt: ?J,$P("SUN^MON^TUE^WED^THU^FRI^SAT",U,I) Line Location: HEADER+4
Function Call: WRITE	Prompt: ?(J+8),"TOT" Line Location: HEADER+4
Function Call: WRITE	Prompt: !,AMQRX Line Location: HEADER+7
Function Call: WRITE	Prompt: !!,"You can not queue a job to a slave printer..Try again",!!,*7 Line Location: PRINT+3
Function Call: WRITE	Prompt: !!,$S($D(ZTSK):"Request queued!",1:"Request cancelled!"),!!! Line Location: PRINT+11
Routine Call	DIC Line Location: INFO+21
Routine Call	DIR Line Location: INFO+4 INFO+12
Routine Call	%ZIS Line Location: PRINT+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNVSIT - [#9000010]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS("C"	BLVAR+7, BLVAR+8, PRINT+4
^AUPNVSIT - [#9000010]	SET
^DD("DD"	DIP+10, DIP+14
^UTILITY("AMQRD"	PRE!, PRE+2, PRE+3, SET+10, SET+11, SET+12

Label References

Name	Line Occurrences
AVE	BLVAR+6
B1	BLVAR+1
COUNT	INFO+17
DIP	INFO+24
EXIT	BLVAR+1, BLVAR+7
EXITINFO	INFO+6, INFO+14, INFO+23, INFO+25, PRINT+2, PRINT+4
FAIL	SET+2
HEADER	BLIST+1, PAUSE+2
PAUSE	BLVAR+1
PRE	AMQQDOW+9
PRINT	PRINT+3
SET	AMQQDOW+7, AMQQDOW+10

Naked Globals

Name	Field # of Occurrence
^(	SET+10, SET+11, SET+12*, B1+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	COUNT+4, COUNT+6, SET, SET+1, SET+2, SET+3, SET+4, SET+5, SET+6, SET+10 , SET+11, SET+12, BLVAR+6, AVE+1, AVE+2, AVE+3, AVE+4, B1, B1+1, B1+2 , B1+3, B1+5, PRINT+9*
>> %DT	DIP+9, DIP+13
%H	COUNT, EXIT!
>> %IS	PRINT*
%T	EXIT!
%Y	COUNT+1, COUNT+4, SET+9, EXIT!
A	EXIT!
AMQRDAY	SET+1, SET+7, SET+9, SET+10, SET+12, EXIT!
AMQRDD	COUNT+7*, BLVAR+5, BLVAR+6, AVE+1, AVE+2, EXITINFO!
AMQRDTIM	SET+6*, SET+10, SET+11, EXIT!
AMQRDTOT	PRE+4, SET+13, BLVAR+4, BLVAR+6, EXIT!
AMQRDXXX	AMQQDOW+4, AMQQDOW+6, FAIL, FAIL+1, EXIT!
AMQRI	HEADER+8!
AMQRINFO	HEADER+1, DIP+7, DIP+11, DIP+15*, EXITINFO!
AMQRJ	HEADER+8!
AMQRLINE	BLVAR+1, EXIT!, B1, B1+8, PAUSE, PAUSE+1
AMQRQ	PAUSE*!
AMQRX	BLIST, BLVAR+9, EXIT!, HEADER+5, HEADER+6, HEADER+7, HEADER+8!
AMQRZZZ	AMQQDOW+4, AMQQDOW+5, AMQQDOW+6, AMQQDOW+7, FAIL+1, EXIT!
B	EXITINFO!
>> BY	DIP+4*
C	EXITINFO!
>> D0	SET
>> D1	INFO+8*, DIP+2, DIP+8
>> D2	INFO+16*, DIP+3, DIP+12
>> DHD	DIP+5*
DIC	INFO+18, INFO+22!, DIP, EXITINFO!
DIC("A"	INFO+20*
DIC(0	INFO+19*
DIJ	EXITINFO!
>> DIOEND	PRE+1*
DIR	INFO+5!, INFO+13!
DIR("?"	INFO+3, INFO+11
DIR("A"	INFO+2, INFO+10
DIR(0	INFO+1, INFO+9
>> DIS(0	DIP+6*
DP	EXITINFO!
DT	INFO+15
DTIME	BLIST, BLVAR+9, PAUSE
>> DTOUT	INFO+6, INFO+14, INFO+23
>> DUOUT	INFO+6, INFO+14, INFO+23
>> FLDS	DIP+1*
>> FR	DIP+2*
G	BLVAR*, BLVAR+4, EXIT!, AVE+2, B1+8
>> I	COUNT+6, PRE+2, PRE+3, BLVAR+3, BLVAR+4, BLVAR+5, BLVAR+6, AVE, AVE+1, AVE+2 , B1+4, B1+8, HEADER+3, HEADER+4, PRINT+9*
IO	PRINT+3, PRINT+4
IO("Q"	PRINT+3, PRINT+4
IO(0	PRINT+3
IOBS	PRINT+4!
IOF	BLVAR+7, HEADER, PRINT+4!
ION	PRINT+4!, PRINT+6
>> IOP	PRINT+4*
IOPAR	PRINT+4!
IOSL	BLVAR+1, PRINT+4!
IOST	AMQQDOW+6, AMQQDOW+8, BLIST, BLVAR+7, PAUSE
IOT	PRINT+4!
>> J	BLVAR+4, BLVAR+5, BLVAR+6, AVE+4, B1+8, HEADER+4*
N	BLVAR+5*, BLVAR+6, EXIT!
P	EXITINFO!
POP	PRINT+2, PRINT+4!
>> TO	DIP+3*
U	COUNT+6, BLVAR+5, AVE+1, AVE+2, PAUSE, HEADER+1, HEADER+4, DIP+7, DIP+11
X	COUNT, COUNT+2, COUNT+3, COUNT+5, COUNT+6, COUNT+7, SET+7, EXIT!, B1+2, B1+5* , B1+6*, B1+7, INFO+7, INFO+15, INFO+24
X(	COUNT*
X(0	COUNT+1*
X(1	COUNT+2
X(2	COUNT+2
Y	COUNT, COUNT+3, COUNT+6, EXIT!, B1+3, B1+5, B1+6, B1+7, INFO+7, INFO+8 , INFO+15, INFO+16, INFO+24, INFO+25, DIP+6, DIP+7, DIP+8, DIP+11, DIP+12, DIP+15
Z	COUNT+3*, COUNT+4, EXIT!
>> ZTDESC	PRINT+8*
>> ZTDTH	PRINT+7*
>> ZTIO	PRINT+6*
>> ZTRTN	PRINT+5*
>> ZTSAVE(	PRINT+9*
>> ZTSK	PRINT+11

Customize PDF page

Package: PCC Medical Query

Routine: AMQQDOW

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
COUNT
PRE
SET
DIP
PRINT
EXITINFO
INFO	; GET TIME FRAME AND CLINIC TYPE
HEADER
BLIST
EXIT
B1
FAIL
AVE
BLVAR
PAUSE