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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSJ089B

Package: Inpatient Medications

Routine: PSJ089B


Information

PSJ089B ;BIR/MLV-Check for Orderable Items ;02 MAY 02 / 4:29 PM

Source Information

Source file <PSJ089B.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Inpatient Medications 2 EN1^PSJHL2  $$ACTIVE^PSJORREN  
Kernel 2 ^%ZTLOAD  $$FMDIFF^XLFDT  
MailMan 1 ^XMD  
VA Fileman 1 NOW^%DTC  

Entry Points

Name Comments DBIA/ICR reference
DONE ;
SET ;
ENQN ; Check of existing Pharmacy orders.
ENNV ; Begin check of existing orders
SENDMSG ;Send mail message when check is complete.

External References

Name Field # of Occurrence
NOW^%DTC ENQN+3, SENDMSG+5
^%ZTLOAD ENNV+2
EN1^PSJHL2 ENQN+14
$$ACTIVE^PSJORREN ENQN+9
$$FMDIFF^XLFDT SENDMSG+8
^XMD SENDMSG+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Your DUZ is not defined. It must be defined to run this routine."
  • Line Location: ENNV+1
Function Call: WRITE
  • Prompt: !!,"The check of existing Pharmacy orders is",$S($D(ZTSK):"",1:" NOT")," queued",!
  • Line Location: ENNV+3
Function Call: WRITE
  • Prompt: " (to start NOW).",!!,"YOU WILL RECEIVE A MAILMAN MESSAGES WHEN TASK #"_ZTSK_" HAS COMPLETED."
  • Line Location: ENNV+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" SENDMSG+5
^PS(55 - [#55] ENQN+6, ENQN+7, ENQN+10*, ENQN+12*, ENQN+13

Label References

Name Line Occurrences
SENDMSG ENQN+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ENQN+3, SENDMSG+5, SENDMSG+8
BDT ENQN+1~, ENQN+5*, ENQN+6
CREAT ENQN+1~, ENQN+3*
DAYS DONE+1!, SENDMSG+9*, SENDMSG+12
DUZ ENNV+1, SENDMSG+4
HOURS DONE+1!, SENDMSG+10*, SENDMSG+12
MINS DONE+1!, SENDMSG+10*, SENDMSG+12
ND0 ENQN+1~, ENQN+7*, ENQN+8, ENQN+11, ENQN+12
ND2 ENQN+1~, ENQN+7*, ENQN+8
OCNT ENQN+1~, SENDMSG+17*, SENDMSG+18*
PSG DONE+1!, SENDMSG+1!
PSG( SENDMSG+18*
PSG(1 SENDMSG+6*
PSG(2 SENDMSG+7*
PSG(3 SENDMSG+11*
PSG(4 SENDMSG+12*
PSG(5 SENDMSG+12*
PSG(6 SENDMSG+13*
PSG(7 SENDMSG+14*, SENDMSG+15*, SENDMSG+16*
PSG(8 SENDMSG+16*
PSG(9 SENDMSG+17*
PSJBEG ENQN+1~
PSJCNTX ENQN+1~, ENQN+2*, ENQN+15*, SENDMSG+15, SENDMSG+16
PSJCNTY ENQN+1~, ENQN+2*, ENQN+14*, SENDMSG+14, SENDMSG+15
PSJOI ENQN+1~, ENQN+13*, ENQN+14, ENQN+15
PSJORD ENQN+1~, ENQN+6*, ENQN+7, ENQN+9, ENQN+10, ENQN+12, ENQN+13, ENQN+14, ENQN+15
PSJPDFN ENQN+1~, ENQN+6*, ENQN+7, ENQN+9, ENQN+10, ENQN+12, ENQN+13, ENQN+14, ENQN+15
PSJSTART ENQN+3*, DONE+1!, SENDMSG+8
PSJX ENQN+1~
PSJX( ENQN+15*, SENDMSG+18
U ENQN+8, ENQN+10, ENQN+11, ENQN+12, ENQN+15, SENDMSG+18
WBDT ENQN+1~, ENQN+6*
X DONE+1!, SENDMSG+1~, SENDMSG+8*, SENDMSG+9*, SENDMSG+10, SENDMSG+18*
XMDUZ DONE+1!, SENDMSG+2*
XMSUB DONE+1!, SENDMSG+3*
XMTEXT DONE+1!, SENDMSG+4*
XMY DONE+1!, SENDMSG+1!
XMY( SENDMSG+4*
XX ENQN+9~*, ENQN+10, ENQN+11
Y DONE+1!, SENDMSG+5*, SENDMSG+7
ZTDESC ENNV+2*, DONE+1!
ZTDTH DONE+1!
ZTIO ENNV+2*, DONE+1!
ZTREQ DONE+1!*
ZTRTN ENNV+2*, DONE+1!
ZTSAVE ENNV+2!, DONE+1!
ZTSK ENNV+2!, ENNV+3, ENNV+4, ENNV+5, DONE+1!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All