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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: PSORESK

Package: Outpatient Pharmacy

Routine: PSORESK


Information

PSORESK ;BIR/SAB-return to stock ; 8/12/11 12:34pm

Source Information

Source file <PSORESK.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Outpatient Pharmacy 10 REVERSE^PSOBPSU1  ICN^PSODPT  EN^PSOHDR  EN^PSOHLSN1  EN^PSOHLUP  ^PSOLSET  LOCK^PSOORCPY  (ACT,CP,STAT)^PSORESK1  
LOGRTS^PSORTSUT  INVT^PSORXDL  
VA FileMan 5 (C,NOW)^%DTC  ^DIE  ^DIK  EN^DIQ1  ^DIR  
Controlled Substances 1 PSDRTS^PSDOPT0  
Pharmacy Data Management 1 ($$L,PSOL,PSOUL,UL)^PSSLOCK  
Registration 1 $$SITE^VASITE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Kernel 1 ^DIC(19  
Outpatient Pharmacy 1 PSO RETURNED STOCK  

Entry Points

Name Comments DBIA/ICR reference
AC
BC
BC1 ;
REF
PAR
EX ;
MSG
BCI
RXP
UL ;
NPF

External References

Name Field # of Occurrence
C^%DTC NPF+2, NPF+3, NPF+6
NOW^%DTC BC1+44, PAR+27
^DIE BC1+44, PAR+42, PAR+49, NPF+7
^DIK BC1+45, PAR+55
EN^DIQ1 BC+3
^DIR BC, BC1+10, BC1+19, BC1+34, REF+2, PAR+9, PAR+24
PSDRTS^PSDOPT0 BC1+26, PAR+14, PAR+16, PAR+17
REVERSE^PSOBPSU1 BC1+46, PAR+31
ICN^PSODPT BC1+2
EN^PSOHDR BC1+47, PAR+56
EN^PSOHLSN1 BC1+48, PAR+56
EN^PSOHLUP BC1+5
^PSOLSET AC
LOCK^PSOORCPY BC1+3
ACT^PSORESK1 BC1+45, PAR+52
CP^PSORESK1 BC1+23, PAR+12
STAT^PSORESK1 BC1+6
LOGRTS^PSORTSUT BC1+42, PAR+34
INVT^PSORXDL BC1+24, PAR+13
$$L^PSSLOCK BC1+3
PSOL^PSSLOCK BC1+4
PSOUL^PSSLOCK UL+1
UL^PSSLOCK BC1+4, UL+2
$$SITE^VASITE BC+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Outpatient Pharmacy Site Parameters are required!"
  • Line Location: AC+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: BC+0
Function Call: WRITE
  • Prompt: !,$C(7),$C(7)," INVALID STATION NUMBER !!",$C(7),$C(7),!
  • Line Location: BC+2
Function Call: WRITE
  • Prompt: !,$C(7),$C(7),$C(7)," NON-EXISTENT Rx"
  • Line Location: BC+4
Function Call: WRITE
  • Prompt: !,$C(7),$C(7),$C(7)," IMPROPER BARCODE FORMAT"
  • Line Location: BC+5
Function Call: WRITE
  • Prompt: !,$C(7),$C(7),"Rx # "_$P(^PSRX(RXP,0),"^")_" was NOT released !"
  • Line Location: BC1+14
Function Call: WRITE
  • Prompt: !
  • Line Location: BC1+16
Function Call: WRITE
  • Prompt: !!?5,"Prescription Not Returned to Stock!",!
  • Line Location: BC1+24
Function Call: WRITE
  • Prompt: !?5,"Comments are required, 10-75 characters.",!
  • Line Location: BC1+34
Function Call: WRITE
  • Prompt: $C(7),!!,"Last Fill Already Returned to Stock !",!
  • Line Location: PAR+2
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),$S(XTYPE:"Refill",1:"PARTIAL")_" #"_TYPE_" was NOT released !",!
  • Line Location: PAR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PAR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PAR+6
Function Call: WRITE
  • Prompt: !!?5,"Prescription Not Returned to Stock!",!
  • Line Location: PAR+13
Function Call: WRITE
  • Prompt: !?5,"Comments are required, 10-75 characters.",!
  • Line Location: PAR+24
Function Call: WRITE
  • Prompt: !
  • Line Location: PAR+42
Function Call: WRITE
  • Prompt: " - Not Returned!"
  • Line Location: PAR+46
Function Call: WRITE
  • Prompt: !!,"Rx # "_$P(^PSRX(RXP,0),"^")_$S(XTYPE:" REFILL",1:" PARTIAL")_" #"_TYPE_" Returned to Stock"
  • Line Location: PAR+55
Function Call: WRITE
  • Prompt: !!,"The PSDMGR key is required to return a CONTROLLED SUBSTANCE Rx to stock and",!,"update corresponding vault balances."
  • Line Location: MSG+0
Routine Call
  • DIE
  • Line Location:
    • BC1+44
    • PAR+42
    • PAR+49
    • NPF+7
Routine Call
  • DIR
  • Line Location:
    • BC
    • BC1+10
    • BC1+19
    • BC1+34
    • REF+2
    • PAR+9
    • PAR+24

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] Classic Fileman Calls
^PS(52.5 - [#52.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] BC1+17, PAR+7
^PS(52.5 - [#52.5] BC1+45, PAR+55
^PS(55 - [#55] BC1+5
^PSDRUG - [#50] BC1+17, BC1+24, BC1+37, BC1+39*, PAR+7, PAR+13, PAR+27, PAR+29*
^PSRX - [#52] BC+4, BC+5, BC1+1, BC1+5, BC1+6, BC1+7, BC1+8, BC1+12, BC1+13, BC1+14
, BC1+15, BC1+16, BC1+17, BC1+23, BC1+26, BC1+51, REF, REF+3, PAR, PAR+2
, PAR+3, PAR+5, PAR+6, PAR+7, PAR+12, PAR+16, PAR+17, PAR+27, PAR+37, PAR+38
, PAR+45, PAR+55, RXP, NPF, NPF+1, NPF+2, NPF+5, NPF+6
^PSRX("AR" BC1+15, BC1+40!, PAR+5, PAR+30!
^PSRX("B" RXP
^UTILITY($J AC+1!
^XTMP("PSA" BC1+49, BC1+50*, PAR+53, PAR+54*

Label References

Name Line Occurrences
BC BC+1, BC+2, BC+4, BC+5, BC1+3, BC1+4, BC1+6, BC1+8, BC1+12, BC1+14
, BC1+19, BC1+21, REF, PAR+1, PAR+2, PAR+3, PAR+9, PAR+12, PAR+13, PAR+18
, PAR+45, PAR+57
BC1 BC+1, BC+5
BCI BC+1
EX BC, BC1+21, PAR+1, PAR+2, PAR+18
MSG BC1+26, PAR+16, PAR+17
NPF PAR+52
PAR BC1+11
REF BC1+7
RXP RXP
UL BC1+6, BC1+8, BC1+13, BC1+14, BC1+19, BC1+21, REF, PAR+1, PAR+2, PAR+3
, PAR+9, PAR+12, PAR+13, PAR+18, PAR+49, PAR+57

Naked Globals

Name Field # of Occurrence
^("STA" BC1+6
^(0 BC1+7, BC1+17, BC1+49*, PAR+7, PAR+16, PAR+17, PAR+53*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% BC1+44, EX+1!
COM BC1+35*, PAR+26*, EX+1!
COPAYFLG BC1+7*, BC1+23, PAR+12, EX+1!
DA BC+3*!, BC1+44*!, BC1+45*, PAR+41*, PAR+47*, PAR+55*, EX+1!, NPF+7*
DA(1 PAR+41*, PAR+47*
DIC BC+3*, EX+2!
DIE BC1+44*!, PAR+41*, PAR+47*, EX+1!, NPF+7*!
DIK BC1+45*, PAR+55*, EX+2!
DIQ BC+3*!
DIQ(0 BC+3*
DIR BC!, BC1+10!, BC1+19!, BC1+31!, BC1+35!, REF+2!, PAR+4!, PAR+9!, PAR+21!, PAR+24!
, EX+1!
DIR("?" BC*, BC1+10*, BC1+32*, REF+2*, PAR+22*
DIR("A" BC*, BC1+9*, BC1+16*, BC1+17*, BC1+18*, BC1+32*, REF+1*, PAR+6*, PAR+7*, PAR+8*
, PAR+22*
DIR("B" BC1+9*, BC1+16*, BC1+33*, REF+1*, PAR+6*, PAR+23*
DIR(0 BC*, BC1+9*, BC1+19*, BC1+32*, REF+1*, PAR+6*, PAR+22*
DIRUT BC, BC1+19, BC1+30, BC1+31!, BC1+34, PAR+20, PAR+21!, PAR+24, EX+1!
DR BC+3*!, BC1+44*!, PAR+41*, PAR+48*, EX+1!, NPF+7*
DT BC1+49, BC1+50, PAR+53, PAR+54
DTOUT BC1+8, BC1+31!, REF, PAR+4!, PAR+9, PAR+21!
DUOUT BC1+8, BC1+31!, REF, PAR+4!, PAR+9, PAR+21!
I EX+1!
PSDCS EX+1!, MSG
PSDRS EX+1!, MSG
PSDS BC1+26!, PAR+16!, PAR+17!
PSOCPN EX+1!
PSOCPRX EX+1!
PSODEF AC+1!, BC!, BC1+33, BC1+35*, PAR+23, PAR+26*
PSODEFLG BC!, BC1+24!, PAR+13!, EX+1!
PSODISPP PAR+56!*
PSOINVTX BC!, BC1+24!, BC1+38, PAR+13!, PAR+28, EX+1!
PSOLOCRL BC1+15*, BC1+40, PAR+5!*, PAR+30, EX+1!
PSOLOUD BC1+5*!
PSOMSG BC1+4!, EX+1!
>> PSOPAR AC
PSOPCECT AC+1*, BC1+21*, PAR+1*, PAR+2*, EX+1!
PSOPFS BC1+23~*, PAR+12~*, EX+2!
PSOPLCK BC1+3*!, BC1+4!, EX+1!
PSORESAR BC+3!
PSORESAR(4 BC+3
PSORESST BC+2!, BC+3!*
PSORESSX BC+3*!
PSORRDFN BC1+1*, BC1+2, BC1+3, BC1+4, EX+1!, UL+2
>> PSOSITE BC1+50, PAR+54
PSOWHERE BC!, BC1+15*, BC1+18, BC1+24, BC1+38, BC1+40, PAR+5!*, PAR+8, PAR+13, PAR+28
, PAR+30, EX+1!
PSOY NPF~, NPF+2*, NPF+3
QDRUG BC1+7*, BC1+24, BC1+37, BC1+39, BC1+50, PAR+13, PAR+27, PAR+29, PAR+54, EX+1!
QTY BC1+7*, BC1+39, BC1+50, PAR+27*, PAR+29, PAR+54, EX+1!
RDUZ EX+1!
REC EX+1!
RESK AC+1*, BC1+21*, PAR+1*, PAR+2*, EX+1!
RETSK BC1+27, PAR+18, EX+1!, MSG*
RXP BC+1, BC+4*, BC+5, BC1+1, BC1+4, BC1+5, BC1+6, BC1+7, BC1+8, BC1+12
, BC1+13, BC1+14, BC1+15, BC1+16, BC1+17, BC1+23, BC1+26, BC1+40, BC1+42, BC1+44
, BC1+45, BC1+46, BC1+47, BC1+48, BC1+51, REF, REF+3, PAR, PAR+2, PAR+3
, PAR+5, PAR+6, PAR+7, PAR+12, PAR+16, PAR+17, PAR+27, PAR+30, PAR+31, PAR+34
, PAR+37, PAR+38, PAR+41, PAR+45, PAR+47, PAR+55, PAR+56, EX+1!, BCI*, RXP*
, UL+1, NPF, NPF+1, NPF+2, NPF+5, NPF+6, NPF+7
>> SVRELDT PAR+37*, PAR+38*, PAR+48
TYPE PAR*, PAR+1, PAR+2, PAR+3, PAR+5, PAR+6, PAR+12, PAR+16, PAR+17, PAR+27
, PAR+30, PAR+31, PAR+34, PAR+37, PAR+38, PAR+41, PAR+45, PAR+47, PAR+55, EX+1!
, NPF, NPF+1, NPF+2, NPF+4
U BC1+49, PAR+53
X BC+1, BC+2, BC+3*, BC+4, BC1+31!, BC1+35!, PAR+21!, PAR+26!, EX+1!, RXP
, NPF+2, NPF+3*, NPF+6*, NPF+7
X1 EX+1!, NPF+1*, NPF+2*, NPF+5*
X2 EX+1!, NPF+1*, NPF+2*, NPF+5*
XDT EX+1!
XTYPE BC!, BC1+11*, REF+3*, PAR*, PAR+2, PAR+3, PAR+5, PAR+6, PAR+12, PAR+16
, PAR+27, PAR+31, PAR+34, PAR+37, PAR+38, PAR+41, PAR+45, PAR+47, PAR+48, PAR+52
, PAR+55, PAR+56, EX+1!
Y BC1+8*, BC1+11, BC1+19, BC1+31!, BC1+35!, BC1+44, REF+3, PAR+9, PAR+21!, PAR+26!
, EX+1!
YY PAR*, EX+1!

Marked Items

Name Field # of Occurrence
$T(PSDRTS^PSDOPT0 BC1+26, PAR+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All