Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

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

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
Info |  Source |  Entry Points |  Interaction Calls