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

Package: Inpatient Medications

Routine: PSJ0099


Information

PSJ0099 ;BIR/JLC - EVALUATE IV ORDER PROBLEMS ;12/03/2002

Source Information

Source file <PSJ0099.m>

Entry Points

Name Comments DBIA/ICR reference
ENNV ; Begin check of existing orders
START ;run through entries in XTMP("PSOPOST7"
SENDMSG ;Send mail message when check is complete.
NOSTOP

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 MESSAGE WHEN TASK #"_ZTSK_" HAS COMPLETED."
  • Line Location: ENNV+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: START+7
Function Call: WRITE
  • Prompt: S1," = ",@S1,!
  • Line Location: START+8
Info |  Source |  Entry Points |  Interaction Calls