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

Call Graph Total: 5

Package Total Call Graph
Inpatient Medications 4 ($$ODD,$$PRNOK)^PSGS0  ($$ONCALL,$$ONETIME)^PSIVEDT1  GTPD^PSIVORE2  ($$DOW,$$ENU)^PSIVUTL  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Inpatient Medications 1 PSIVCHK  

Entry Points

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

External References

Name Field # of Occurrence
^DIR PSIVCHK1+27
$$ODD^PSGS0 PSIVCHK1+13
$$PRNOK^PSGS0 PSIVCHK1+14
$$ONCALL^PSIVEDT1 PSIVCHK1+14
$$ONETIME^PSIVEDT1 PSIVCHK1+14
GTPD^PSIVORE2 PSIVCHK1+17
$$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+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
Routine Call
  • DIR
  • Line Location:
    • PSIVCHK1+27

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+19
DRG PSIVCHK1+19

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHK PSIVCHK1+19*, PSIVCHK1+28!, DRG+1
DIR PSIVCHK1+27!
DIR(0 PSIVCHK1+27*
>> DRG( PSIVCHK1+16, PSIVCHK1+19, DRG+1*
>> DRG("AD" PSIVCHK1+22
>> DRG("SOL" PSIVCHK1+21
>> 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+20~*, PSIVCHK1+22*, PSIVCHK1+23, PSIVCHK1+24
>> DRGI PSIVCHK1+16*, PSIVCHK1+19*
DRGSOL PSIVCHK1+20~*, PSIVCHK1+21*, PSIVCHK1+24, PSIVCHK1+25, PSIVCHK1+26
>> DRGT PSIVCHK1+16*, PSIVCHK1+19*
DT DRG+2
>> ERR PSIVCHK1+9*, PSIVCHK1+12*, PSIVCHK1+15*, PSIVCHK1+18*, PSIVCHK1+23*, PSIVCHK1+24*, PSIVCHK1+25*, PSIVCHK1+26*, PSIVCHK1+27, AD+1*
, AD+2*, AD+3*, SOL+1*, SOL+2*, DRG+2*
>> FIL PSIVCHK1+19*, AD+1, SOL+1, DRG+2
>> P("OT" PSIVCHK1+17, PSIVCHK1+18
>> P("PD" PSIVCHK1+16
>> P("TYP" PSIVCHK1+9, PSIVCHK1+10, PSIVCHK1+23, PSIVCHK1+25, PSIVCHK1+26, PSIVCHK1+28!, AD+3
>> P(11 PSIVCHK1+10
>> P(15 PSIVCHK1+10, PSIVCHK1+11*, PSIVCHK1+12, PSIVCHK1+13
>> P(9 PSIVCHK1+9, PSIVCHK1+10, PSIVCHK1+11, PSIVCHK1+14
>> PDM PSIVCHK1+16*, PSIVCHK1+17*, PSIVCHK1+18
U PSIVCHK1+16, DRG+1, DRG+2
X PSIVCHK1+20~, PSIVCHK1+21*, PSIVCHK1+22*, 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