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

Package: Inpatient Medications

Routine: PSIVCHK1


Information

PSIVCHK1 ;BIR/PR,MLM-CHECK ORDER FOR INTEGRITY ;23 Oct 98 / 10:00 AM

Source Information

Source file <PSIVCHK1.m>

Entry Points

Name Comments DBIA/ICR reference
AD ; Check additives.
SOL ; Check solutions.
DRG ; Put drug data in DRG and check if active.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"*** No schedule exists for this order!"
  • Line Location: PSIVCHK1+9
Function Call: WRITE
  • Prompt: !,"*** This is a 'DAY OF THE WEEK' schedule and MUST have admin times!"
  • Line Location: PSIVCHK1+12
Function Call: WRITE
  • Prompt: !,"*** There are no administration times defined for this order!"
  • Line Location: PSIVCHK1+15
Function Call: WRITE
  • Prompt: !!,"ERROR,",!,"The Orderable item does not match any of the additives or solutions entered.",!,"At least 1 additive or solution must match the Orderable item entered",!,"for this order!",!!
  • Line Location: PSIVCHK1+18
Function Call: WRITE
  • Prompt: !,"WARNING, You have not defined an additive."
  • Line Location: PSIVCHK1+23
Function Call: WRITE
  • Prompt: !,"ERROR, You have not defined any additives or solutions."
  • Line Location: PSIVCHK1+24
Function Call: WRITE
  • Prompt: !,"ERROR, No solution entered for order."
  • Line Location: PSIVCHK1+25
Function Call: WRITE
  • Prompt: !,"WARNING, This order should have one solution defined, you have ",DRGSOL,!," solutions defined."
  • Line Location: PSIVCHK1+26
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: PSIVCHK1+27
Function Call: WRITE
  • Prompt: !,"ERROR, Additive entered does not exist in additive file."
  • Line Location: AD+1
Function Call: WRITE
  • Prompt: !,"ERROR, Invalid strength entered for ",DRG(2),!,"... should be in ",$$ENU^PSIVUTL(DRG(1))," ... please reenter."
  • Line Location: AD+2
Function Call: WRITE
  • Prompt: !,"ERROR, Piggyback or intermittent syringe type order and you have a bottle #",!,"defined for ",DRG(2)
  • Line Location: AD+3
Function Call: WRITE
  • Prompt: !,"ERROR, Solution entered does not exist in solution file."
  • Line Location: SOL+1
Function Call: WRITE
  • Prompt: !,"ERROR, Volume on ",DRG(2)," is an invalid strength."
  • Line Location: SOL+2
Function Call: WRITE
  • Prompt: !,"ERROR, ",DRG(2)," is an inactive drug!"
  • Line Location: DRG+2
Info |  Source |  Entry Points |  Interaction Calls