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

Package: Inpatient Medications

Routine: PSIVRQ


Information

PSIVRQ ;BIR/PR,MLM,MV-REPORT DRIVER ; 9/25/08 12:31pm

Source Information

Source file <PSIVRQ.m>

Entry Points

Name Comments DBIA/ICR reference
DTS ;Get start and stop dates for all reports
RECOM ;Recompile IV cost data for date range
LS ;Ask for long or short report if user is running the drug cost report.
IV ;Ask user for IV room to run reports for.
K ;Kill variables

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"The IV BACKGROUND JOB [PSJI BACKGROUND JOB] that compiles IV cost data",!,"was last successfully run on: ",Y
  • Line Location: DTS+1
Function Call: WRITE
  • Prompt: !!,$C(7),"**WARNING** that was <",X,"> days ago. PLEASE contact your site manager.",!?12,"Cost data is probably not accurate because of this."
  • Line Location: DTS+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DTS+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DTS+5
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"End date must be GREATER than start date."
  • Line Location: DTS+6
Function Call: WRITE
  • Prompt: $P("^ALL",X,2)
  • Line Location: IV+4
Function Call: WRITE
  • Prompt: $P(Y,X,2)
  • Line Location: IV+5
Info |  Source |  Entry Points |  Interaction Calls