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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
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>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Inpatient Medications 2 GTPD^PSIVORE2  ($$DOW,$$ENU)^PSIVUTL  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Inpatient Medications 1 PSIVCHK  

Entry Points

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

External References

Name Field # of Occurrence
^DIR PSIVCHK1+25
GTPD^PSIVORE2 PSIVCHK1+15
$$DOW^PSIVUTL PSIVCHK1+10, PSIVCHK1+11
$$ENU^PSIVUTL AD+2

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+13
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+16
Function Call: WRITE
  • Prompt: !,"WARNING, You have not defined an additive."
  • Line Location: PSIVCHK1+21
Function Call: WRITE
  • Prompt: !,"ERROR, You have not defined any additives or solutions."
  • Line Location: PSIVCHK1+22
Function Call: WRITE
  • Prompt: !,"ERROR, No solution entered for order."
  • Line Location: PSIVCHK1+23
Function Call: WRITE
  • Prompt: !,"WARNING, This order should have one solution defined, you have ",DRGSOL,!," solutions defined."
  • Line Location: PSIVCHK1+24
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: PSIVCHK1+25
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
Routine Call
  • DIR
  • Line Location:
    • PSIVCHK1+25

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS( AD+1, SOL+1, DRG+2
^PSDRUG - [#50] DRG+2

Label References

Name Line Occurrences
@( PSIVCHK1+17
DRG PSIVCHK1+17

Naked Globals

Name Field # of Occurrence
^("I" DRG+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHK PSIVCHK1+17*, PSIVCHK1+26!, DRG+1
DIR PSIVCHK1+25!
DIR(0 PSIVCHK1+25*
>> DRG( PSIVCHK1+14, PSIVCHK1+17, DRG+1*
>> DRG("AD" PSIVCHK1+20
>> DRG("SOL" PSIVCHK1+19
>> DRG(1 AD+1, AD+2, SOL+1, DRG+2
>> DRG(2 AD+2, AD+3, SOL+2, DRG+2
>> DRG(3 AD+2, SOL+2
>> DRG(4 AD+3
DRGAD PSIVCHK1+18~*, PSIVCHK1+20*, PSIVCHK1+21, PSIVCHK1+22
>> DRGI PSIVCHK1+14*, PSIVCHK1+17*
DRGSOL PSIVCHK1+18~*, PSIVCHK1+19*, PSIVCHK1+22, PSIVCHK1+23, PSIVCHK1+24
>> DRGT PSIVCHK1+14*, PSIVCHK1+17*
DT DRG+2
>> ERR PSIVCHK1+9*, PSIVCHK1+12*, PSIVCHK1+13*, PSIVCHK1+16*, PSIVCHK1+21*, PSIVCHK1+22*, PSIVCHK1+23*, PSIVCHK1+24*, PSIVCHK1+25, AD+1*
, AD+2*, AD+3*, SOL+1*, SOL+2*, DRG+2*
>> FIL PSIVCHK1+17*, AD+1, SOL+1, DRG+2
>> P("OT" PSIVCHK1+15, PSIVCHK1+16
>> P("PD" PSIVCHK1+14
>> P("TYP" PSIVCHK1+9, PSIVCHK1+10, PSIVCHK1+21, PSIVCHK1+23, PSIVCHK1+24, PSIVCHK1+26!, AD+3
>> P(11 PSIVCHK1+10
>> P(15 PSIVCHK1+10, PSIVCHK1+11*, PSIVCHK1+12
>> P(9 PSIVCHK1+9, PSIVCHK1+10, PSIVCHK1+11
>> PDM PSIVCHK1+14*, PSIVCHK1+15*, PSIVCHK1+16
U PSIVCHK1+10, PSIVCHK1+14, DRG+1, DRG+2
X PSIVCHK1+18~, PSIVCHK1+19*, PSIVCHK1+20*, DRG+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All