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: AMQQRMT

Package: PCC Medical Query

Routine: AMQQRMT


Information

AMQQRMT ; IHS/CMI/THL - TIME SERIES REPORT ;

Source Information

Source file <AMQQRMT.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
PCC Medical Query 2 EXIT2^AMQQKILL  PRINT^AMQQSEC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
PCC Medical Query 1 AMQQCMPL  

Entry Points

Name Comments DBIA/ICR reference
PRE
TIMETASK
SET
PEXIT
HEADER
PRINT
DEV
START
RANGE
PAUSE
EXIT
B1
TIME ; ENTRY POINT FROM AMQQCMPL
FAIL
AVE
TIMERUN

External References

Name Field # of Occurrence
^%ZIS DEV+2
^%ZISC PRINT+18, PRINT+19, TIMETASK+6, TIME+4, TIME+5
^%ZTLOAD TIMETASK+5
EXIT2^AMQQKILL TIMERUN+4
PRINT^AMQQSEC DEV+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(13),AMQQTZ
  • Line Location: START+2
Function Call: WRITE
  • Prompt: " (",AMQQTX,")"
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !!!!,"CRUNCH, CRUNCH....",!!
  • Line Location: START+4
Function Call: WRITE
  • Prompt: $C(13),AMQQTZ," (",AMQQTX,")"
  • Line Location: FAIL+1
Function Call: WRITE
  • Prompt: ?66,$J(+$G(@AMQQTGR@(AMQQTMON)),6)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !!,"TOTAL"
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: ?AMQQTAB,$J(+$G(@AMQQTGR@(AMQQTYR)),6)
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: ?66,$J(AMQQTOT,6)
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !,"CUMUL."
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: ?AMQQTAB,$J(X,6)
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: ?66,$J(X,6)
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: !,"AVG/MONTH"
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: ?AMQQTAB,$J(X,6)
  • Line Location: PRINT+17
Function Call: WRITE
  • Prompt: ?66,$J((AMQQTOT\AMQQTNM),6)
  • Line Location: PRINT+17
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+18
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(@AMQQTGR@("A",AMQQTLIN,I)):^(I),1:".")
  • Line Location: B1+8
Function Call: WRITE
  • Prompt: ?(J+8),@AMQQTGR@("B",AMQQTLIN)
  • Line Location: B1+8
Function Call: READ
  • Prompt: "<>"
  • Formatting: !
  • Timeout: DTIME
  • Variable: AMQQRQ
  • Line Location: PAUSE+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+0
Function Call: WRITE
  • Prompt: !,"TIME SERIES REPORT: ",AMQQTDS," to ",AMQQTDF,!!
  • Line Location: HEADER+1
Function Call: WRITE
  • Prompt: ?X,$P(AMQQTCS,U,I)
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: ?66,"TOTAL"
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,AMQQTY
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"Request queued!",1:"Request cancelled!"),!!!
  • Line Location: TIMETASK+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TIME+4
Function Call: WRITE
  • Prompt: !!!
  • Line Location: DEV+0
Function Call: WRITE
  • Prompt: " <= Not a secure device!!",*7
  • Line Location: DEV+4
Function Call: WRITE
  • Prompt: !!,"You can not queue a job to a slave printer..Try again",!!,*7
  • Line Location: DEV+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TIMERUN+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TIMERUN+3
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] SET
^DD("DD" RANGE+3, RANGE+6
^UTILITY("AMQQ" AMQQRMT+5, PRE!

Label References

Name Line Occurrences
DEV TIME+1, DEV+4, DEV+5
FAIL SET+1
HEADER PRINT+2, PAUSE+2
PEXIT PRINT, PRINT+18
PRE START+5
PRINT TIMERUN+2
RANGE PRINT+1
SET START+3, START+6
START AMQQRMT+3
TIMERUN TIME+5
TIMETASK TIME+4

Naked Globals

Name Field # of Occurrence
^( SET+7*, SET+8*, SET+9*, B1+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% AMQQRMT+5*, AMQQRMT+6, AMQQRMT+7, EXIT!, SET*, SET+1, SET+2, SET+3, SET+4, SET+5
, SET+6, SET+7*, SET+8*, SET+9*, AVE+1*, AVE+2*, AVE+3*, AVE+4, B1*, B1+1*
, B1+2, B1+3, B1+5, TIMETASK+3*
%H EXIT!, PEXIT!
%T EXIT!, PEXIT!
%Y EXIT!, PEXIT!
>> %ZIS DEV+1*
A EXIT!, PEXIT!
>> AMQP(1 AMQQRMT+3, AMQQRMT+7*, SET
>> AMQQCCLS AMQQRMT+3
>> AMQQHOLD AMQQRMT+4, AMQQRMT+5
>> AMQQQUIT TIME+2, DEV+3*
AMQQRI HEADER+8!
AMQQRJ HEADER+8!
AMQQRMFL PEXIT!, TIME+3*
AMQQRQ PAUSE*!
AMQQTAB PRINT+5*, PRINT+6*, PRINT+9*, PRINT+10*, PRINT+13*, PRINT+14*, PRINT+16*, PRINT+17*, PEXIT!
AMQQTAY PEXIT!
AMQQTCS RANGE+14*, PEXIT!, HEADER+3
>> AMQQTD AVE+1, AVE+2
AMQQTDF RANGE+1*, RANGE+5, RANGE+7*, RANGE+10*, SET+3*, SET+5*, PEXIT!, HEADER+1
AMQQTDS RANGE*, RANGE+2, RANGE+4*, RANGE+9*, SET+2*, SET+4*, PRINT, PEXIT!, HEADER+1
AMQQTGR PRE+1*, SET+7, SET+8, SET+9, PRINT+6, PRINT+7, PRINT+10, PRINT+14, PRINT+17, PEXIT!
, AVE+2, B1+8
AMQQTLIN PEXIT!, B1, B1+8, PAUSE*, PAUSE+1
AMQQTMON SET+6*, SET+7, SET+9, PRINT+3*, PRINT+4, PRINT+6, PRINT+7, PEXIT!
AMQQTNM RANGE+16*, PRINT+17, PEXIT!
>> AMQQTOT PRINT+10, PRINT+17
AMQQTST RANGE+15*, PEXIT!
AMQQTTIM PEXIT!
AMQQTTOT PRE+2*, SET+10*, PEXIT!
AMQQTX START*, START+2, FAIL*, FAIL+1, PEXIT!
AMQQTY PRINT+20*, PEXIT!, HEADER+5*, HEADER+6*, HEADER+7, HEADER+8!
AMQQTY1 RANGE+12*, PRINT+5, PRINT+7, PRINT+10, PRINT+14, PRINT+17, PEXIT!
AMQQTY2 RANGE+11*, PRINT+5, PRINT+10, PRINT+14, PRINT+17, PEXIT!
AMQQTYR SET+6*, SET+7, SET+8, PRINT+5*, PRINT+6, PRINT+7, PRINT+10*, PRINT+14*, PRINT+17*, PEXIT!
AMQQTZ START*, START+1*, START+2, START+3, FAIL+1, PEXIT!
>> AMQQUATN AMQQRMT+4, AMQQRMT+5
>> AMQV(0 TIMERUN+1
DTIME PRINT+20, PAUSE
DTOUT DEV+3!
DUOUT DEV+3!
G EXIT!, PEXIT!
I EXIT!, RANGE+14*, AVE*, AVE+1, AVE+2, B1+4*, B1+8*, HEADER+2*, HEADER+3*, TIMETASK+3*
IO TIME+5, DEV+5
IO("Q" TIME+4, DEV+5
IO(0 DEV+5
IOF PRINT+18, HEADER, TIME+4, TIMERUN, TIMERUN+3
ION TIMETASK+1
IOST START+2, START+4, PRINT+18, PAUSE, TIMERUN+3
J EXIT!, AVE+4, B1+8*
N EXIT!, PEXIT!
POP DEV+3!
U AMQQRMT+5, RANGE+14, PRINT+4, AVE+1, AVE+2, PAUSE, HEADER+3
X PRINT+12*, PRINT+14*, PRINT+17*, PEXIT!, B1+2*, B1+5*, B1+6*, B1+7, HEADER+3*
Y RANGE+2*, RANGE+4, RANGE+5*, RANGE+7, PEXIT!, B1+3*, B1+5*, B1+6*, B1+7
Z RANGE+11*, RANGE+14, RANGE+17!, PEXIT!
Z(1 RANGE+2*, RANGE+8, RANGE+12
Z(2 RANGE+5*, RANGE+8, RANGE+11, RANGE+15
Z(3 RANGE+8*, RANGE+13*, RANGE+14, RANGE+16
>> ZTDESC TIMETASK+4*
>> ZTDTH TIMETASK+2*
>> ZTIO TIMETASK+1*
>> ZTQUEUED TIMERUN+4
>> ZTREQ TIMERUN+4*
>> ZTRTN TIMETASK*
>> ZTSAVE( TIMETASK+3*
>> ZTSK TIMETASK+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All