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

Package: Kernel

Routine: XQARPRT1


Information

XQARPRT1 ;sgh/mtz,JLI/OAK_OIFO-ROUTINE TO PROVIDE COUNTS OF ALERTS ;9/3/03 11:17

Source Information

Source file <XQARPRT1.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 7 ^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  $$UP^XLFSTR  $$CHKCRIT^XQALSUR2  (WORDHDR,WORDS)^XQARPRT2  
VA Fileman 2 ($$GET1,EN,GETS)^DIQ  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Kernel 1 XQARPRT2  

Entry Points

Name Comments DBIA/ICR reference
PRTLOC ;
PRTNAME ;
DATES ;
HEADER ;
DQ1 ;
G1 ;gather
PRT ;print
VIEWDQ ;
VIEWTRAK ; OPT. View an entry in the Alert Tracking file in Captioned mode
PRINTVAL ;
PRTSERVC ;
EN1 ; OPT - generates a listing of the number of alerts a user has as well as last sign-on date, number of critical and/or abnomal imaging alerts, and the date of the oldest alert
EN2 ;
CRITICAL ; OPT - generates a listing of users with more than a specified number of alerts containing CRITICAL or ABNORMAL IMAGING
QUERYDIV ;
DIVPRINT ;
OLDEST() ; Returns date of oldest entry in alert tracking file
ORDER ;
PRTNUMBR ;

External References

Name Field # of Occurrence
^%ZIS EN2+8, VIEWTRAK+6
^%ZISC DQ1+5
^%ZTLOAD EN2+8, VIEWTRAK+6
$$GET1^DIQ G1+17, G1+25, G1+27, PRTSERVC+4, PRINTVAL+3, PRINTVAL+4
EN^DIQ VIEWDQ+5
GETS^DIQ G1+19
^DIR EN2+5, DATES+2, DATES+5, QUERYDIV+1, QUERYDIV+4, QUERYDIV+8, QUERYDIV+11, ORDER+4, ORDER+7, ORDER+9
, ORDER+12, VIEWTRAK+4
$$FMTE^XLFDT G1+17, HEADER+2, HEADER+3
$$NOW^XLFDT HEADER+2
$$UP^XLFSTR G1+5
$$CHKCRIT^XQALSUR2 G1+7, G1+11
WORDHDR^XQARPRT2 HEADER+6
WORDS^XQARPRT2 EN2+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: " COUNT of ",$S($D(XQAWORDS)>1:"SELECTED ",1:""),"ALERTS - users with more than ",XQAC1," on ",$$FMTE^XLFDT($$NOW^XLFDT())
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !," for date range ",$$FMTE^XLFDT(XQASDT,"5DZ")," to ",$$FMTE^XLFDT(XQAEDT,"5DZ")
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,"CRIT column indicates number of alerts containing critical text"
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !!,?42,$S($D(XQAWORDS)>1:"Selected",1:" Total"),?70,"Oldest"
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,"Name",?25,"Service/section",?43,"Alerts",?50,"Last Sign-on",?64,"CRIT Alert"
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !,"-----------------",?25,"-----------------",?43,"------",?50,"------------",?64,"---- ----------"
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINTVAL+6
Function Call: WRITE
  • Prompt: !,NAME,?25,SERVICE,?43,NUMBER,?50,LSIGNON,?64,NCRIT,?69,OLDEST
  • Line Location: PRINTVAL+7
Function Call: WRITE
  • Prompt: !,?5,"Division: ",$S(DIVNAME=0:"These users are not assigned to a division",DIVNAME=99999:"These users are assigned to multiple divisions",1:DIVNAME)
  • Line Location: DIVPRINT+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: VIEWDQ+2
Routine Call
  • DIR
  • Line Location:
    • EN2+5
    • DATES+2
    • DATES+5
    • QUERYDIV+1
    • QUERYDIV+4
    • QUERYDIV+8
    • QUERYDIV+11
    • ORDER+4
    • ORDER+7
    • ORDER+9
    • ORDER+12
    • VIEWTRAK+4
Routine Call
  • %ZIS
  • Line Location:
    • EN2+8
    • VIEWTRAK+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("XQARPRT1" DQ1+2
^XTV(8992 - [#8992] G1+2, G1+3, G1+4, G1+5, G1+6
^XTV(8992.1 - [#8992.1] OLDEST+4, VIEWTRAK+2

Label References

Name Line Occurrences
@( PRTLOC+2
DATES EN2+6
DIVPRINT HEADER+10
DQ1 EN2+9
EN2 CRITICAL+2
G1 DQ1+4
HEADER PRT+4, PRT+5, PRTSERVC+10, PRINTVAL+6, DIVPRINT+1
ORDER EN2+7
PRINTVAL PRTNAME+2, PRTNUMBR+6, PRTSERVC+11, PRTSERVC+13
PRT DQ1+4
PRTLOC PRT+4, PRT+5
QUERYDIV EN2+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EN2+1~, EN2+8*, VIEWTRAK+6*
ALLSERV EN2+2~, ORDER+7*, ORDER+8, PRTSERVC+5
COUNT G1+1~, G1+3*, G1+7*, G1+8*, G1+16, G1+17
CRITMSG G1+1~, G1+6*, G1+7, G1+11
DA VIEWDQ+1~, VIEWDQ+5*
DAARRAY VIEWTRAK+1~, VIEWTRAK+5
DAARRAY( VIEWTRAK+4*, VIEWDQ+4, VIEWDQ+5
DATE EN2+2~, G1+1~, G1+4*
DIC VIEWDQ+1~, VIEWDQ+5*
DIQ VIEWDQ+1~
DIQ(0 VIEWDQ+3*
DIR EN2+1~, EN2+5!, DATES+2!, DATES+5!, QUERYDIV+1!, QUERYDIV+4!, QUERYDIV+8!, QUERYDIV+11!, ORDER+4!, ORDER+7!
, ORDER+10!, ORDER+12!, VIEWTRAK+1~, VIEWTRAK+5!
DIR("?" QUERYDIV+1*, QUERYDIV+3*, QUERYDIV+6*, QUERYDIV+7*, ORDER+1*, ORDER+2*, ORDER+3*, ORDER+6*
DIR("A" EN2+4*, DATES+1*, DATES+4*, QUERYDIV+1*, QUERYDIV+3*, QUERYDIV+5*, QUERYDIV+11*, ORDER+1*, ORDER+6*, ORDER+9*
, ORDER+12*, VIEWTRAK+4*
DIR("B" EN2+5*
DIR(0 EN2+4*, DATES+1*, DATES+4*, QUERYDIV+1*, QUERYDIV+3*, QUERYDIV+5*, QUERYDIV+11*, ORDER+1*, ORDER+6*, ORDER+9*
, ORDER+12*, VIEWTRAK+3*
DIRUT EN2+2~, EN2+7, QUERYDIV+1, QUERYDIV+10!, ORDER+5, ORDER+7, ORDER+12, VIEWTRAK+4!
DIVISION EN2+2~, QUERYDIV+1*, QUERYDIV+2, ORDER+2, ORDER+3, G1+18, G1+21, G1+25, PRT+3
DIVISION( QUERYDIV+11*, G1+22
DIVNAME PRT+1~, PRT+4*, HEADER+10, DIVPRINT+2
DR VIEWDQ+1~
DT OLDEST+5
FND OLDEST+1~, OLDEST+4*
I EN2+2~, QUERYDIV+11*, ORDER+9*, G1+3*, G1+4, G1+5, G1+6, G1+9~, G1+10*, G1+11
, OLDEST+1~, OLDEST+4*, OLDEST+5, VIEWTRAK+4*
IO DQ1+3
IO("Q" EN2+8!, VIEWTRAK+6!
IOF HEADER+2, PRINTVAL+6, VIEWDQ+2
IOSL PRINTVAL+6, DIVPRINT+1
J G1+9~*, G1+10, G1+11, OLDEST+1~, OLDEST+4*
K G1+20~*, G1+21, G1+22, G1+25*
L G1+20~, G1+22*
LSIGNON PRT+1~, PRTNAME+1~, PRTNUMBR+1~, PRTSERVC+1~, PRINTVAL+4*, PRINTVAL+5*, PRINTVAL+7
MSG G1+1~, G1+5*, G1+8, G1+9*, G1+10*, G1+11
MSG1 G1+9~*
NAME PRT+1~, PRTNAME+1~, PRTNAME+2*, PRTNUMBR+1~, PRTNUMBR+2*, PRTNUMBR+3, PRTNUMBR+4, PRTNUMBR+6*, PRTSERVC+1~, PRTSERVC+2*
, PRTSERVC+3, PRTSERVC+6, PRTSERVC+7, PRTSERVC+11*, PRTSERVC+13*, PRINTVAL+1~, PRINTVAL+2*, PRINTVAL+7
NCRIT G1+3*, G1+7*, G1+11*, G1+16, G1+17, PRTNAME+1~, PRTNUMBR+1~, PRTSERVC+1~, PRINTVAL+2*, PRINTVAL+7
NUMB PRTNUMBR+1~, PRTNUMBR+6~*, PRTSERVC+1~, PRTSERVC+12*, PRTSERVC+13
NUMBER PRT+1~, PRTNAME+1~, PRTNUMBR+1~, PRTNUMBR+3*, PRTNUMBR+4, PRTSERVC+1~, PRINTVAL+2*, PRINTVAL+7
OLDEST G1+3*, G1+4*, G1+17, PRTNAME+1~, PRTNUMBR+1~, PRTSERVC+1~, PRINTVAL+2*, PRINTVAL+7, OLDEST+1~, OLDEST+5*
, OLDEST+6
POP EN2+1~, EN2+8, VIEWTRAK+6
PRTLOC PRTLOC+1~, PRTLOC+2*
SERVICE EN2+2~, PRTSERVC+4*, PRTSERVC+5, PRTSERVC+6, PRTSERVC+7, PRTSERVC+10*, PRTSERVC+11, PRTSERVC+12, PRTSERVC+13, PRINTVAL+3*
, PRINTVAL+7
SERVICE( ORDER+9*, PRTSERVC+5
SERVSRT EN2+2~, ORDER+12*, PRTSERVC+6, PRTSERVC+7, PRTSERVC+11, PRTSERVC+12
SHOWDIV EN2+2~, QUERYDIV+2, QUERYDIV+8*, QUERYDIV+10*, G1+23
U QUERYDIV+11, ORDER+9, G1+4, G1+5, G1+17, PRTNUMBR+3, PRTSERVC+3, PRINTVAL+2, VIEWTRAK+2
VALUE G1+17*, G1+25, G1+27, PRT+1~, PRTNAME+1~, PRTNAME+2*, PRTNUMBR+1~, PRTNUMBR+6*, PRTSERVC+1~, PRTSERVC+11*
, PRTSERVC+13*, PRINTVAL+2
X0 VIEWTRAK+1~, VIEWTRAK+2*, VIEWTRAK+3
X1 VIEWTRAK+1~, VIEWTRAK+2*, VIEWTRAK+3
XQAC1 EN2+1~, EN2+5*, G1+16, HEADER+2
XQACRIT EN1+1~*, EN2+3, EN2+4, EN2+5, EN2+8, CRITICAL+1~*, ORDER+2, ORDER+3, G1+16, PRTNUMBR+3
XQACTR HEADER+1~*
XQADIV G1+19!*, G1+21*, G1+22*, G1+23!*
XQADIV( G1+21*, G1+22*, G1+25
XQADIV(0 G1+19*
XQADIV(99999 G1+23*
XQAEDT EN2+1~, DATES+6*, G1+4, HEADER+3
XQAGLOB DQ1+1~, DQ1+2*, DQ1+6, G1+25, G1+27, PRT+2, PRT+4
XQAGLOB1 PRT+1~, PRT+2*, PRT+4*, PRTNAME+2, PRTNUMBR+2, PRTNUMBR+3, PRTNUMBR+4, PRTNUMBR+6, PRTSERVC+2, PRTSERVC+3
, PRTSERVC+6, PRTSERVC+7, PRTSERVC+10, PRTSERVC+11, PRTSERVC+12, PRTSERVC+13
XQAI VIEWDQ+1~, VIEWDQ+4*, VIEWDQ+5
XQAN1 DQ1+1~, G1+2*, G1+3, G1+4, G1+5, G1+6, G1+17, G1+19, G1+25, G1+27
, PRTNAME+1~, PRTNUMBR+1~, PRTSERVC+1~, PRTSERVC+3*, PRTSERVC+4, PRINTVAL+2*, PRINTVAL+3, PRINTVAL+4
XQAORDER EN2+1~, EN2+7, ORDER+4*, ORDER+5, PRTLOC+2
XQARRAY G1+19!
XQARRAY( G1+20, G1+21, G1+22
XQASDT EN2+1~, DATES+3*, DATES+4, G1+4, HEADER+3
XQAWORDS EN2+2~, G1+7, G1+8, G1+11, HEADER+2, HEADER+7
XQAWORDS( G1+9, G1+10, G1+11
Y EN2+1~, EN2+3!, EN2+5, EN2+6, DATES+2, DATES+3, DATES+5, DATES+6, QUERYDIV+1, QUERYDIV+4
, QUERYDIV+8, QUERYDIV+11, ORDER+4, ORDER+7, ORDER+9, ORDER+12, VIEWTRAK+4
ZTDESC EN2+1~, EN2+8*, VIEWTRAK+6*
ZTRTN EN2+1~, EN2+8*, VIEWTRAK+6*
ZTSAVE EN2+1~
ZTSAVE("*" EN2+8*, VIEWTRAK+6*
ZTSK EN2+8!, VIEWTRAK+6!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All