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 |  Label References |  Local Variables |  All
Print Page as PDF
Routine: XUTMDEVQ

Package: Kernel

Routine: XUTMDEVQ


Information

XUTMDEVQ ;ISCSF/RWF - Device call and Queue in one place ;01/18/2006

Source Information

Source file <XUTMDEVQ.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  (,REQ)^%ZTLOAD  

Caller Graph

Caller Graph Total: 125

Package Total Caller Graph
Scheduling 47 SCDXPRN2  SCDXSUP  SCRPEC  SCRPI01  SCRPI02  SCRPITP  SCRPO1  SCRPO5  
SCRPO6  SCRPPAT  SCRPRAC  SCRPSLT  SCRPTA  SCRPTM  SCRPTP  SCRPV1  
SCRPW1  SCRPW10  SCRPW11  SCRPW14  SCRPW16  SCRPW2  SCRPW20  SCRPW21  
SCRPW23  SCRPW301  SCRPW304  SCRPW40  SCRPW41  SCRPW45  SCRPW46  SCRPW50  
SCRPW6  SCRPW60  SCRPW62  SCRPW7  SCRPW70  SCRPW9  SD53105A  SD53142  
SD53P215  SDCP  SDRPA09  SDRRISRA  SDRRISRD  SDRRISRL  SDRRISRX  
Registration 20 DG53244T  DG53355A  DG53467P  DGHTRPT  DGHTRPT1  DGMSTR1  DGMSTR2  DGMSTR3  
DGMSTR4  DGMTARR  DGPFRAB  DGPFRAL  DGPFRFA  DGPFRFR  DGPFRPA  DGPFRPI  
DGPLBL  DGRUGPRP  VAFCAUD  VAFCPDAT  
MailMan 17 XMA30  XMA32  XMAI2  XMCQ  XMCQA  XMCQH  XMJBL  XMJBN  
XMJMD  XMJMOR  XMJMORX  XMJMP  XMPH  XMUT1A  XMUT2  XMUT4  
XMUTERM  
Kernel 12 XPDCOM  XPDDCS  XPDDI  XPDDP  XPDDPCK  XUDHUTL  XUSAP1  XUSERBLK  
XUTMQ0  XUTMQ1  XUTMQ2  XUXPRT  
Radiology Nuclear Medicine 5 RACMHIS  RAMAINP1  RAWKLU  RAWKLU2  RAWRVUP  
National Drug File 4 PSNCLPR  PSNCMOP  PSNJP54  PSNPPIP  
Text Integration Utility 4 TIUPS139  TIUPS174  TIUPS185  TIUPS209  
IHS Changes To Lab 3 BLRSORA  BLRSORC  BLRUER  
IHS VA Utilities 3 XBLFAM  XBLFD  XBLFSETS  
Clinical Reminders 2 PXRMDLR1  PXRMXQUE  
Consult Request Tracking 2 GMRCSTL7  GMRCSTLA  
Toolkit 2 XTERSUM4  XTSUMCK1  
IHS Changes To Pharmacy 1 APSEPPIM  
IHS Changes To Scheduling 1 BSDCCR0  
Lab Service 1 LRTOCOST  
Order Entry Results Reporting 1 OROVRRPT  

Entry Points

Name Comments DBIA/ICR reference
QQ(%RTN,%DESC,%VAR1,%VOTH1,%ZIS,IOP,%WR,%RTN2,%DESC2,%VAR2,%VOTH2) ;
; double queuing - queue up the second routine to device, but do not
; schedule the task in Taskman
; queue up the first job to ZTIO="" and schedule it
; %RTN - required - [tag]^routine for the 1st job to be run (usually a
; search and build sorted data type process)
; %DESC - optional - ZTDESC value for 1st job (default [tag]~routine)
; %VAR1 - optional - ZTSAVE values for 1st job - see %VAR descript above
  • ICR #1519
    • Status: Active
    • Usage: Supported
    RUN ;
    ZIS ;
    DEV(ZTRTN,ZTDESC,%VAR,%VOTH,%ZIS,IOP,%WR) ; single que ask for device
    ; ZTRTN - required - [tag]^routine that taskman will run
    ; ZTDESC - optional - default to name of [tag]~routine
    ; %VAR - optional - single value or passed by reference
    ; this will be used to S ZTSAVE()
    ; can be a string of variable names separated by ';'
    ; each ;-piece will be used as a subscript in ztsave
    ; %VOTH - optional - passed by reference
    ; %voth(sub)="" or explicit value
    ; sub - this is any other %ZTLOAD variable besides
    ; ZTRTN,ZTDESC,ZTIO,ZTSAVE
    ; example: %VOTH("ZTDTH")=$H
    ; %ZIS - optional - default value "MQ" - passed by reference
    ; standard %ZIS variable array for calling device handler
    ; IOP - optional - IOP variable as defined in Kernel device handler
    ; %WR - optional - if %WR>0 then write text to the screen as to
    ; whether or not the queueing was successful
  • ICR #1519
    • Status: Active
    • Usage: Supported
    NODEV(ZTRTN,ZTDESC,%VAR,%VOTH,%WR) ; single que no device needed
    ; see DEV for parameter descriptions and return values
  • ICR #1519
    • Status: Active
    • Usage: Supported
    ZTLOAD ;
    REQQ(ZTSK,ZTDTH,%VAR) ;Reschedule the second part of a QQ task.
  • ICR #1519
    • Status: Active
    • Usage: Supported
    KILL
    EN(ZTRTN,ZTDESC,ZTSAVE,%ZIS,%) ;ZTSAVE AND %ZIS pass by reference.
  • ICR #1519
    • Status: Active
    • Usage: Supported
    VAR ;Setup ZTSAVE
    SETUP ; setup %ztload variables
    OUT

    External References

    Name Field # of Occurrence
    ^%ZIS ZIS+2
    HOME^%ZIS ZTLOAD+2
    ^%ZISC RUN+3
    ^%ZTLOAD ZTLOAD+2
    REQ^%ZTLOAD REQQ+5

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: "Request Aborted",!
    • Line Location: OUT+1
    Function Call: WRITE
    • Prompt: "Task queued ["_(+%RET)_"]",!
    • Line Location: OUT+2
    Function Call: WRITE
    • Prompt: !,"Second task queued ["_$P(%RET,U,2)_"]",!
    • Line Location: OUT+3
    Routine Call
    • %ZIS
    • Line Location:
      • ZTLOAD+2
    Routine Call
    • %ZIS
    • Line Location:
      • ZIS+2

    Label References

    Name Line Occurrences
    @( RUN+2
    KILL EN+3, EN+4
    OUT DEV+23, DEV+24, NODEV+4, QQ+37, QQ+49, QQ+57
    RUN EN+4, DEV+25
    SETUP DEV+24, NODEV+3, QQ+49, QQ+56
    VAR REQQ+4, SETUP+2
    ZIS EN+3, DEV+24, QQ+49
    ZTLOAD EN+5, DEV+26, NODEV+3, QQ+50, QQ+56

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % EN~, EN+2
    %DESC QQ~, QQ+55
    %DESC2 QQ~, QQ+43
    %RET EN+2~, ZTLOAD+3*, DEV+22~, DEV+23*, DEV+25*, OUT, OUT+1, OUT+2, OUT+3, OUT+5
    , NODEV+2~, NODEV+3*, QQ+35~, QQ+36*, QQ+51, QQ+56*
    %RTN QQ~, QQ+37, QQ+52
    %RTN2 QQ~, QQ+37, QQ+39
    %TMP QQ+36~, QQ+51*, QQ+56
    %VAR DEV~, NODEV~, QQ+36~, QQ+40*, QQ+41*, QQ+51!, QQ+53*, REQQ~, VAR+1
    %VAR( VAR+2
    %VAR1 QQ~, QQ+41, QQ+53
    %VAR2 QQ~, QQ+40
    %VOTH DEV~, NODEV~, QQ+36~, QQ+42*, QQ+51!, QQ+54*, SETUP+3
    %VOTH( SETUP+3
    %VOTH1 QQ~, QQ+54
    %VOTH2 QQ~, QQ+42
    %WR DEV~, OUT, NODEV~, QQ~
    %ZIS EN~, ZIS+1*, DEV~, QQ~, QQ+44, QQ+51!
    I SETUP+1~, VAR+1*
    IO RUN+1
    IO("Q" EN+2!, EN+4, ZTLOAD+1!, DEV+25, SETUP+1!
    IOP DEV~, QQ~, QQ+46*, QQ+47*, QQ+51!
    POP EN+3, DEV+22~, DEV+24, NODEV+2~, QQ+35~, QQ+49
    U OUT+3, QQ+56, SETUP+4
    X SETUP+1~, SETUP+3*, VAR+1*, VAR+2*
    Y SETUP+1~
    ZTCPU EN+2~, DEV+22~, NODEV+2~, QQ+35~, REQQ+2~, SETUP+1!
    ZTDESC EN~, DEV~, NODEV~, QQ+35~, QQ+43*, QQ+55*, REQQ+2~, SETUP+4*
    ZTDTH EN+2~, KILL!, DEV+22~, NODEV+2~, QQ+35~, QQ+50*, REQQ~, REQQ+3, SETUP+1!
    ZTIO EN+2~, DEV+22~, NODEV+2~, NODEV+3*, QQ+35~, QQ+44*, QQ+49, QQ+56*, REQQ+2~
    ZTKIL DEV+22~, NODEV+2~, QQ+35~, REQQ+2~, SETUP+1!
    ZTPRI DEV+22~, NODEV+2~, QQ+35~, REQQ+2~, SETUP+1!
    >> ZTQUEUED OUT
    ZTREQ REQQ+2~
    ZTRTN EN~, EN+1, RUN+2, DEV~, DEV+23, NODEV~, NODEV+3, QQ+39*, QQ+52*, REQQ+2~
    , SETUP+4
    ZTSAVE EN~, KILL!, DEV+22~, NODEV+2~, QQ+35~, REQQ+2~, SETUP+1!
    ZTSAVE( VAR+1*, VAR+2*
    ZTSAVE("XUTMQQ" QQ+56*
    ZTSK EN+2~, ZTLOAD+1!, ZTLOAD+3, DEV+22~, NODEV+2~, QQ+35~, REQQ~, REQQ+3, SETUP+1!
    ZTSK(0 REQQ+6
    ZTSYNC EN+2~, DEV+22~, NODEV+2~, QQ+35~, REQQ+2~, SETUP+1!
    ZTUCI EN+2~, DEV+22~, NODEV+2~, QQ+35~, REQQ+2~, SETUP+1!
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All