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

Package: Drug Accountability

Routine: PSAUNI


Information

PSAUNI ;BIR/LTL-Unlinked Drugs in the ITEM MASTER file ;7/23/97

Source Information

Source file <PSAUNI.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 4 DT^DICRW  ^DIR  ^DIWP  ^DIWW  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Drug Accountability 1 PSA ACTIVE DRUGS/ITEM FILE  

Entry Points

Name Comments DBIA/ICR reference
START ;compiles and prints data for report
END
LOOP
DEV ;asks device and queueing info
HEADER ;prints header info

External References

Name Field # of Occurrence
^%ZIS DEV+1
HOME^%ZIS DEV+2
^%ZISC END+2
^%ZTLOAD DEV+2
$$S^%ZTLOAD HEADER+2
DT^DICRW PSAUNI+12
^DIR PSAUNI+13, END+1, HEADER+1
^DIWP LOOP+12
^DIWW LOOP+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!"
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: $G(^PRC(441,+PSA,1,1,0)),!
  • Line Location: LOOP+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !!,"Task #",$G(ZTSK),", ",$G(ZTDESC)," was stopped by ",$P($G(^VA(200,+$G(DUZ),0)),U),"."
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !?2,"UNLINKED ITEM MASTER file DRUGS PURCHASED SINCE ",PSADT(1),?70,"PAGE: "_PSAPG,!,PSALN,!!
  • Line Location: HEADER+3
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2
Routine Call
  • DIR
  • Line Location:
    • PSAUNI+13
    • END+1
    • HEADER+1
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" PSAUNI+14
^PRC(440 LOOP+5
^PRC(441 - [#441] LOOP, LOOP+3, LOOP+4, LOOP+5, LOOP+6, LOOP+9, LOOP+12
^PRC(442 LOOP+4
^PSDRUG("AB" LOOP
^UTILITY($J LOOP+10!
^VA(200 - [#200] HEADER+2

Label References

Name Line Occurrences
END PSAUNI+13, DEV+1, DEV+2, LOOP
HEADER START+1, LOOP

Naked Globals

Name Field # of Occurrence
^(0 LOOP+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEV+1~*
DIR PSAUNI+12~, PSAUNI+13!, HEADER+1!
DIR("?" PSAUNI+13*
DIR("A" PSAUNI+13*, END+1*
DIR("B" PSAUNI+13*
DIR(0 PSAUNI+13*, END+1*, HEADER+1*
>> DIWF LOOP+10*
>> DIWL LOOP+10*
>> DIWR LOOP+10*
DTOUT DEV+1~
DUOUT DEV+1~
DUZ HEADER+2
I DEV+1!
IO("Q" DEV+1!, DEV+2, END+2!
IOF END, HEADER+3
IOP DEV+1~
IOSL LOOP
IOST LOOP+1, END, END+1, HEADER+1
POP DEV+1~
PSA PSAUNI+12~, START+1*, LOOP*, LOOP+3, LOOP+4, LOOP+5, LOOP+6, LOOP+9, LOOP+12
PSA(1 LOOP+2*, LOOP+3*, LOOP+4
PSA(2 LOOP+4*
PSA(3 LOOP+3, LOOP+7*
PSA(4 LOOP+11*, LOOP+12*
PSADT PSAUNI+12~, PSAUNI+14*, LOOP+4
PSADT(1 PSAUNI+14*, HEADER+3
PSALN START+1~, HEADER+3*
PSAOUT PSAUNI+13*, DEV+1~*, DEV+2*, START+1*, LOOP, END+1, HEADER+1*, HEADER+2*
PSAPG START+1~*, HEADER+1, HEADER+3*
U LOOP, LOOP+4, LOOP+5, LOOP+6, HEADER+2
X PSAUNI+12~, LOOP+12*
Y PSAUNI+12~, PSAUNI+13, PSAUNI+14, HEADER+1
ZTDESC DEV+2~*, HEADER+2
ZTDTH DEV+2~
ZTIO DEV+2~
>> ZTQUEUED END+2
>> ZTREQ END+2*
ZTRTN DEV+2~*
ZTSAVE DEV+2~
ZTSAVE("PSA*" DEV+2*
ZTSK DEV+2~, HEADER+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All