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

Package: Drug Accountability

Routine: PSALND


Information

PSALND ;BIR/LTL-Report Potential NDC Matches ;7/23/97

Source Information

Source file <PSALND.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 5 DD^%DT  DT^DICRW  ^DIR  ^DIWP  ^DIWW  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  
Drug Accountability 1 $$ITEM^PSAUTL  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Drug Accountability 2 PSA NDC REPORT  PSALNA  

Entry Points

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

External References

Name Field # of Occurrence
DD^%DT START+2
^%ZIS DEV+1
HOME^%ZIS DEV+2
^%ZISC QUIT+2
^%ZTLOAD DEV+2
$$S^%ZTLOAD HEADER+2
DT^DICRW PSALND+6
^DIR QUIT+1, HEADER+1
^DIWP LOOP+11
^DIWW LOOP+11
$$ITEM^PSAUTL LOOP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!"
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: ?40,$G(^PRC(441,+PSAIT,1,1,0))
  • Line Location: LOOP+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: QUIT+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: QUIT+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 DRUG/ITEM MASTER file entries by common NDC",?55,PSARPDT,?70,"PAGE: "_PSAPG,!,PSALN,!,"DRUG file",?40,"ITEM MASTER file"
  • Line Location: HEADER+3
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2
Routine Call
  • DIR
  • Line Location:
    • QUIT+1
    • HEADER+1
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(441 - [#441] LOOP+4, LOOP+6, LOOP+7, LOOP+9, LOOP+11, HEADER+4
^PSDRUG - [#50] LOOP, LOOP+7, LOOP+8, HEADER+4
^PSDRUG("AB" LOOP+6
^UTILITY($J LOOP+10!
^VA(200 - [#200] HEADER+2

Label References

Name Line Occurrences
HEADER START+2, LOOP, LOOP+11
QUIT DEV+1, DEV+2, LOOP

Naked Globals

Name Field # of Occurrence
^(2 LOOP
^(3 LOOP+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEV+1~*
DIR DEV+1~, HEADER+1!
DIR("A" QUIT+1*
DIR(0 QUIT+1*, HEADER+1*
DIRUT START+2~
>> DIWF LOOP+10*
>> DIWL LOOP+10*
>> DIWR LOOP+10*
DT START+2
DTOUT DEV+1~
DUOUT DEV+1~
DUZ HEADER+2
IO("Q" DEV+1!, DEV+2, QUIT+2!
IOF QUIT, HEADER+3
IOP DEV+1~
IOSL LOOP, LOOP+11
IOST QUIT, QUIT+1, HEADER+1
POP DEV+1~, START+2~
PSA START+2~*, LOOP+11*, LOOP+12*, HEADER+4
PSAB START+2~
PSAD START+2~*, LOOP*, LOOP+7, LOOP+8, HEADER+4
PSAD(1 LOOP*, LOOP+1
PSADD START+2~
PSAIA START+2~, LOOP+3*, LOOP+4*, LOOP+5
PSAIT START+2~, LOOP+1*, LOOP+2, LOOP+4, LOOP+6, LOOP+7, LOOP+9, LOOP+11, HEADER+4
PSALN START+2~, HEADER+3*
PSAOUT DEV+1~*, DEV+2*, START+2*, LOOP, LOOP+11, QUIT+1, HEADER+1*, HEADER+2*
PSAPG START+2~*, HEADER+1, HEADER+3*
PSARPDT START+2~*, HEADER+3
U LOOP, LOOP+4, LOOP+7, LOOP+8, HEADER+2, HEADER+4
X START+2~, LOOP+11*
Y START+2~*, HEADER+1
ZTDESC DEV+2~*, HEADER+2
ZTDTH DEV+2~
ZTIO DEV+2~
>> ZTQUEUED QUIT+2
>> ZTREQ QUIT+2*
ZTRTN DEV+2~*
ZTSAVE 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