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

Package: Kernel

Routine: XUBA


Information

XUBA ; BT/BP - LIST USERS HAVE INACTIVE PERSON CLASSES; 4/27/2010

Source Information

Source file <XUBA.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 7 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$DT,$$FMTE)^XLFDT  $$GET^XUA4A72  ($$GET3,$$GET5)^XUPCF  $$ACTIVE^XUSER  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Kernel 1 XU-INACTIVE PERSON CLASS USERS  

Entry Points

Name Comments DBIA/ICR reference
PR ; entry point of the option LIST USERS NEED TO BE ASSIGNED NEW PERSON CLASSES
PAUSE ;
HDR ;
PRNT ; print the report
LIST(XUA541) ; get all users who need to be assigned a new Person Class.
EXIT ;
CLEAN ;clean the global
PGBK ;page break
INPSC ;get all inactive Person Class from the PERSON CLASS FILE.

External References

Name Field # of Occurrence
^%ZIS PR+3
HOME^%ZIS PR+4
^%ZISC EXIT+2
^%ZTLOAD PR+4
^DIR PR+1
$$DT^XLFDT HDR+1
$$FMTE^XLFDT HDR+1
$$GET^XUA4A72 LIST+5, LIST+8
$$GET3^XUPCF INPSC+5
$$GET5^XUPCF INPSC+5
$$ACTIVE^XUSER LIST+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: PR+3
Function Call: WRITE
  • Prompt: !,"Queued as task# ",ZTSK,!!
  • Line Location: PR+5
Function Call: WRITE
  • Prompt: !,$G(XUI),?20,$G(^TMP("XUINPSCN",$J,XUI))
  • Line Location: PRNT+6
Function Call: WRITE
  • Prompt: !!!,"Number of users: ",XUC
  • Line Location: PRNT+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRNT+11
Function Call: WRITE
  • Prompt: ?IOM-40,"Report on ",$$FMTE^XLFDT($$DT^XLFDT)," Page ",$G(XUPG),!
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"User name:",?20,"Currently has the inactive Person Class IEN^NAME:"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"----------",?20,"-------------------------------------------------"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"Press RETURN to continue or '^' to exit: "
  • Line Location: PAUSE+1
Routine Call
  • %ZIS
  • Line Location:
    • PR+4
Routine Call
  • DIR
  • Line Location:
    • PR+1
Routine Call
  • %ZIS
  • Line Location:
    • PR+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("XUINPSC" INPSC+2!, INPSC+5*, LIST+6, CLEAN+1!
^TMP("XUINPSCN" PRNT+5, PRNT+6, LIST+2!, LIST+8*, CLEAN+2!
^USC(8932.1 - [#8932.1] INPSC+3
^VA(200 - [#200] LIST+3, LIST+7

Label References

Name Line Occurrences
CLEAN EXIT+1
EXIT PR+3, PR+5, PRNT+12
HDR PRNT+4
INPSC PRNT+1
LIST PRNT+1
PAUSE PR+5, PRNT+11
PGBK PRNT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LIST+1~
%ZIS PR+3*, EXIT+3!
COUNT INPSC+1~, INPSC+3*, INPSC+4
DIR PR+1~
DIR("A" PR+1*
DIR("B" PR+1*
DIR(0 PR+1*
DTIME PAUSE+1
IO PRNT+1
IO("Q" PR+4
IOF PR+3
IOM HDR+1
ION PR+4
IOST PRNT+11, PGBK+2
>> POP PR+3
XUA541 PR+1~, PR+2*, PRNT+1, LIST~, LIST+4
XUB PRNT+2~*, PRNT+9, PAUSE+1*, PAUSE+3*
XUC PRNT+2~*, PRNT+7*, PRNT+10
XUI PRNT+2~, PRNT+5*, PRNT+6, INPSC+1~, INPSC+4*, INPSC+5, LIST+1~, PAUSE+2*, PAUSE+3*
XUIEN LIST+1~, LIST+3*, LIST+4, LIST+5, LIST+7, LIST+8
XUNAME LIST+7~*, LIST+8
XUPG PRNT+2~*, HDR+1
XUPSUP PRNT+3~, PRNT+8, PGBK+1*, PGBK+2*
XUV LIST+1~
XUY INPSC+1~, LIST+1~, LIST+5*, LIST+6
Y PR+1~, PR+2
ZTDESC PR+4*, EXIT+3!
ZTIO PR+4*, EXIT+3!
ZTRTN PR+4*, EXIT+3!
ZTSAVE EXIT+3!
ZTSAVE("XUA541" PR+4*
ZTSK PR+5, EXIT+3!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All