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

Package: Controlled Substances

Routine: PSDOPTY


Information

PSDOPTY ;BIR/LTL-Review OP Transactions by Rx # ; 21 July 94

Source Information

Source file <PSDOPTY.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 2 ^%ZISC  $$S^%ZTLOAD  
Registration 2 KVAR^VADPT  PID^VADPT6  
VA Fileman 2 Y^DIQ  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Controlled Substances 1 PSDOPTX  

Entry Points

Name Comments DBIA/ICR reference
HEADER ;prints header info
END
LOOP

External References

Name Field # of Occurrence
^%ZISC END+2
$$S^%ZTLOAD HEADER+2
Y^DIQ LOOP+10
^DIR END+1, HEADER+1
KVAR^VADPT END+3
PID^VADPT6 LOOP+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,Y,?19
  • Line Location: LOOP+8
Function Call: WRITE
  • Prompt: " ("_VA("BID")_")",?60
  • Line Location: LOOP+12
Function Call: WRITE
  • Prompt: Y
  • Line Location: LOOP+13
Function Call: WRITE
  • Prompt: Y
  • Line Location: LOOP+14
Function Call: WRITE
  • Prompt: Y
  • Line Location: LOOP+15
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: !,"Outpatient Activity from Rx # ",PSDRX(1)," to Rx # ",PSDRX(3),?70,"PAGE: ",PG,!,LN,!,"Date Posted",?19,"Rx#",?28,"Patient",?60,"Date Released",!,LN
  • Line Location: HEADER+3
Routine Call
  • DIR
  • Line Location:
    • END+1
    • HEADER+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" LOOP+8, LOOP+13, LOOP+14, LOOP+15
^DD(58.81 LOOP+10
^PSD(58.81 - [#58.81] LOOP, LOOP+1, LOOP+4
^PSDRUG - [#50] LOOP+3
^PSRX - [#52] LOOP+9, LOOP+13, LOOP+14, LOOP+15
^TMP("PSD" END+3!
^VA(200 - [#200] LOOP+7, LOOP+16, HEADER+2

Label References

Name Line Occurrences
HEADER LOOP+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C LOOP+10~*
>> DFN LOOP+9*, LOOP+10
DIR HEADER+1!
DIR("A" END+1*
DIR(0 END+1*, HEADER+1*
DUZ HEADER+2
IO("Q" END+3!
IOF END, HEADER+3
IOSL LOOP+5
IOST LOOP, END, END+1, HEADER+1
>> LN LOOP+18, HEADER+3*
>> PG HEADER+1, HEADER+3*
>> PSDLOC LOOP+2
>> PSDOUT LOOP, LOOP+5, END+1, HEADER+1*, HEADER+2*
>> PSDR(2 LOOP+1*, LOOP+2, LOOP+3, LOOP+7, LOOP+8, LOOP+16
>> PSDR(4 LOOP+4*, LOOP+7, LOOP+9, LOOP+11, LOOP+13, LOOP+14, LOOP+15, LOOP+17
>> PSDRX PSDOPTY+2*, LOOP*
>> PSDRX(1 HEADER+3
>> PSDRX(2 LOOP
>> PSDRX(3 HEADER+3
>> PSDRX(4 PSDOPTY+2
>> PSDRX(5 LOOP*, LOOP+1, LOOP+4
>> PSDT(1 PSDOPTY+2*
>> PSDU LOOP+3*, LOOP+6
U LOOP+2, LOOP+3, LOOP+7, LOOP+8, LOOP+9, LOOP+10, LOOP+11, LOOP+13, LOOP+14, LOOP+15
, LOOP+16, LOOP+17, HEADER+2
>> VA("BID" LOOP+12, END+3!
>> VA("PID" END+3!
>> Y LOOP+8*, LOOP+10*, LOOP+11, LOOP+13*, LOOP+14*, LOOP+15*, HEADER+1
>> ZTDESC HEADER+2
>> ZTQUEUED END+2
>> ZTREQ END+2*
>> ZTSK HEADER+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All