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 |  Local Variables  | All
Print Page as PDF
Routine: PSORESUS

Package: Outpatient Pharmacy

Routine: PSORESUS


Information

PSORESUS ;BIR/EJW - Queue/Requeue an Rx to CMOP ;Jan 04, 2022@07:41:19

Source Information

Source file <PSORESUS.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 3 NOW^%DTC  $$GET1^DIQ  ^DIR  
Outpatient Pharmacy 2 ^PSOBUILD  TEST^PSOCMOP  
List Manager 1 FULL^VALM1  
Registration 1 KVA^VADPT  

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

Package Total Caller Graph
Outpatient Pharmacy 2 PSO LM QUEUE TO CMOP  PSO RX QUEUE CMOP  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
TOP ;
END
CM ; ENTRY POINT FOR SPEED QUEUE/REQUEUE TO CMOP
OS
KILL ; CLEAN UP VARIABLES
SENDRX ; SET RX INTO SUSPENSE FILE FOR CMOP

External References

Name Field # of Occurrence
NOW^%DTC SENDRX+5
$$GET1^DIQ SENDRX+10
^DIR TOP+4, OS
^PSOBUILD OS+18
TEST^PSOCMOP SENDRX+12
KVA^VADPT OS+19
FULL^VALM1 OS+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Rx # "_RX_" not found"
  • Line Location: TOP+6
Function Call: WRITE
  • Prompt: !!,$P(^PSRX(PSOIEN,0),"^")," cannot be suspended for CMOP. Make sure the last fill has a Mail routing, the drug is marked for CMOP, the last fill has not been released, etc...",!!
  • Line Location: TOP+8
Function Call: WRITE
  • Prompt: !!,$P(^PSRX(PSOIEN,0),"^")," is not active or suspended"
  • Line Location: OS+5
Function Call: WRITE
  • Prompt: !!,$P(^PSRX(PSOIEN,0),"^")," is not active or suspended"
  • Line Location: OS+9
Function Call: WRITE
  • Prompt: !!,$P(^PSRX(PSOIEN,0),"^")," is not active or suspended. Prescription must be unparked to be filled."
  • Line Location: OS+10
Function Call: WRITE
  • Prompt: !!,$P(^PSRX(PSOIEN,0),"^")_" cannot be suspended for CMOP. Make sure the last fill has a Mail routing, the drug is marked for CMOP, the last fill has not been released, etc...",!
  • Line Location: OS+16
Function Call: WRITE
  • Prompt: !,"Cannot suspend for CMOP. Patient's mail status not a CMOP mail status"
  • Line Location: SENDRX+11
Routine Call
  • DIR
  • Line Location:
    • TOP+4
    • OS

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(55 - [#55] SENDRX+9
^PSRX - [#52] TOP+8, OS+7, OS+9, OS+10, OS+12, OS+16, SENDRX+2, SENDRX+4, SENDRX+9
^PSRX("B" TOP+6

Label References

Name Line Occurrences
END TOP+4, TOP+6, TOP+9
KILL OS+1, OS+19
SENDRX TOP+7, OS+15
TOP TOP+6, TOP+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% END!, SENDRX+12
CHECK END!
CT END!
DFN SENDRX+9*!
DIC KILL+1!
DIR TOP+4!, END!, OS!, OS+1!
DIR("?" TOP+3*
DIR("A" TOP+2*, OS*
DIR(0 TOP+2*, OS*
DIROUT END!
DIRUT TOP+4, END!, OS!, OS+1!
DT SENDRX+11
DTOUT OS!, OS+1!
DUOUT OS!
I SENDRX+1~, SENDRX+2*
II CM+2~, OS+14*
LAST END!, SENDRX+1~, SENDRX+2*, SENDRX+4
LST OS*, OS+1, OS+3, OS+4, KILL+1!
NODE END!
ORD OS+3*, OS+4, KILL+1!
ORN OS+4*, KILL+1!
PNM KILL+1!
PPL TOP+1, TOP+8, END!, END+2*, CM+1, OS+3*, OS+12*, OS+14, OS+16, KILL+1!
, KILL+2*, SENDRX+7*, SENDRX+8, SENDRX+11!
>> PSOCNT CM+4, OS
PSOIEN TOP+6*, TOP+8, END!, CM+3~, OS+4*, OS+7, OS+9, OS+10, OS+12, OS+14*
, OS+16, KILL+1!, SENDRX+2, SENDRX+4, SENDRX+7, SENDRX+10, SENDRX+12
>> PSOLST( OS+4
PSOMC SENDRX+1~, SENDRX+9*, SENDRX+10*, SENDRX+11
PSOMDT SENDRX+1~, SENDRX+9*, SENDRX+10*, SENDRX+11
PSOOELSE CM+3~, OS+1!, OS+2*, OS+17
PSOQUIT OS+6~, OS+7, OS+8*, OS+11*
PSOREPX OS+1!
>> PSOSITE SENDRX+3, SENDRX+4*, SENDRX+13*
PSOSTA CM+2~, OS+7*, OS+9
PSX END!
PSXPPL END!
PSXSITEA END+1!, SENDRX+3*, SENDRX+13
PSZIP KILL+1!
RF END!
RX TOP+5*, TOP+6, END!, KILL+1!
SAVEPPL TOP+1*, END+2!, CM+1*, OS+14*, OS+18!, KILL+2!
SSNP KILL+1!
TRX SENDRX+1~, SENDRX+8*, SENDRX+9!
VA KILL+1!
VADDR1 KILL+1!
VADM KILL+1!
VAEL KILL+1!
>> VALMBCK CM+4*, OS*, OS+1*, OS+13*, OS+17*
VALMCNT CM+3~
>> VALMSG CM+4*
VAPA KILL+1!
VASTREET KILL+1!
X END!
Y TOP+5!, END!, OS
ZD END!, SENDRX+6~
ZD( SENDRX+12*
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 |  Local Variables  | All