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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSIVORE

Package: Inpatient Medications

Routine: PSIVORE


Information

PSIVORE ;BIR/PR,MLM - ORDER ENTRY ;Apr 07, 2020@09:19:06

Source Information

Source file <PSIVORE.m>

Call Graph

Call Graph

Call Graph Total: 28

Package Total Call Graph
Inpatient Medications 22 ENQL^PSGLW  ENGNN^PSGOETO  (ENCHS1,ENGETP,ENQ,Q)^PSIV  ^PSIVCHK  ^PSIVHLP  (,ENLBL)^PSIVOPT  VF^PSIVORC2  (DEL55,GTPD,NEW)^PSIVORE2  
(CLINIC,NATURE,ORPARM)^PSIVOREN  PUT531^PSIVORFA  (NEW55,SET55)^PSIVORFB  SET^PSIVORFE  ^PSIVORLB  ($$GTPCI,GTOT)^PSIVUTL  ^PSIVXU  WP^PSJAC  
EN1^PSJHL2  VF1^PSJLIACT  IN^PSJOCDS  (HOLDHDR,LOCKERR)^PSJOE  CM^PSJOE1  ($$ENORL,EFDIV)^PSJUTL  
VA FileMan 2 FILE^DICN  ^DIR  
List Manager 1 EN^VALM  
Order Entry Results Reporting 1 (LK,ULK)^ORX2  
Pharmacy Data Management 1 ($$L,UL)^PSSLOCK  
Registration 1 (DEM,INP)^VADPT  

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

Package Total Caller Graph
Inpatient Medications 8 PSIVOPT1  PSIVORC  PSIVORC2  PSJCLOR2  PSJCOMR  PSJI ORDER  PSJLIACT  PSJOE0  

Entry Points

Name Comments DBIA/ICR reference
BEG ;Get patient and make sure he is living.
ASK ;See if patient has been admitted.
SETN ;Set up patient 0 node if needed.
NEW ;Ask to enter new order.
INMED
Q ; Kill and exit.
ULK ;
HK ;Queue job to print MAR labels generated for this patient.
SITE ;See if site parameters are ok.
OK ;Print example label, run order through checker, ask if it is ok.
BAD ;; I X["N" D GSTRING^PSIVORE1,^PSIVORV2,GTFLDS^PSIVORFE G OK
DOA
OK1
CAL ;Calculate doses.
EN ;Update schedule interval P(15) only on continuous orders.
ENQ
SPSOL
ENIN ;Entry for Combined IV/UD order entry. Called by PSJOE0.
ENIN1 ;
NONVF(PSJOC)
DEL55 ;

External References

Name Field # of Occurrence
FILE^DICN SETN+1
^DIR ASK+2, NEW+2, ENIN1+6
LK^ORX2 NEW+3
ULK^ORX2 ULK+2
ENQL^PSGLW BEG+6, HK+3
ENGNN^PSGOETO NONVF+4
ENCHS1^PSIV SETN+5
ENGETP^PSIV BEG+5
ENQ^PSIV OK+9
Q^PSIV Q+1
^PSIVCHK OK+2
^PSIVHLP BAD+3
^PSIVOPT CAL+2
ENLBL^PSIVOPT OK1+7
VF^PSIVORC2 NONVF+15
DEL55^PSIVORE2 INMED+3, DOAOK1+2, DEL55+5
GTPD^PSIVORE2 OK+1, NONVF+5
NEW^PSIVORE2 INMED+3
CLINIC^PSIVOREN OK1+4, NONVF+7
NATURE^PSIVOREN OK1+2, NONVF+6
ORPARM^PSIVOREN SITE+3, OK1+1
PUT531^PSIVORFA NONVF+9
NEW55^PSIVORFB INMED
SET55^PSIVORFB OK1+3
SET^PSIVORFE OK1+5
^PSIVORLB OK+4
$$GTPCI^PSIVUTL INMED+3
GTOT^PSIVUTL OK+1
^PSIVXU SITE+1
WP^PSJAC HK+3
EN1^PSJHL2 OK1+5, NONVF+10
VF1^PSJLIACT OK1+6
IN^PSJOCDS OK+7
HOLDHDR^PSJOE ENIN+1
LOCKERR^PSJOE BEG+1
CM^PSJOE1 ENIN1+4
$$ENORL^PSJUTL OK1
EFDIV^PSJUTL OK+6
$$L^PSSLOCK BEG+5
UL^PSSLOCK BEG+5
DEM^VADPT NEW+1
INP^VADPT HK+3
EN^VALM BAD+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"Patient has died."
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: $C(7),$C(7),!!,"You have no IV ROOM parameters ... PLEASE ... PLEASE ...",!,"Exit this package and reenter properly !!",!!
  • Line Location: SITE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: OK+4
Function Call: WRITE
  • Prompt: !,"Start date: "
  • Line Location: OK+4
Function Call: WRITE
  • Prompt: !,"Start date: "
  • Line Location: OK+4
Function Call: WRITE
  • Prompt: !,"Start date: "
  • Line Location: OK+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ENIN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ENIN1+4
Function Call: WRITE
  • Prompt: !,"...transcribing this non-verified order...."
  • Line Location: NONVF+8
Routine Call
  • DIR
  • Line Location:
    • ASK+2
    • NEW+2
    • ENIN1+6
Routine Call
  • VALM
  • Line Location:
    • BAD+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(55 - [#55] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" OK+4
^PS(53.1 - [#53.1] DEL55+3*
^PS(53.45 - [#53.45] BEG+1, Q+1
^PS(55 - [#55] SETN+1*, SETN+3*, INMED+4, EN+2, EN+3*, EN+4*, SPSOLDEL55+2, DEL55+3
^TMP("PSODAOC" ENIN1+3!

Label References

Name Line Occurrences
$$NONVF DOA+1
@( ENIN1+12
ASK BEG+5
BAD OK+3
DEL55 OK+7, NONVF+6, NONVF+13
DOA OK+2
EN CAL+2
ENIN ENIN1+13
ENIN1 ENIN1+10
ENQ EN+3
HK SETN+5
INMED ENIN1+13
NEW INMEDINMED+3, INMED+4
OK INMED+4, BAD+3
OK1 OK+9
Q BEG+1, BEG+7, INMED
SITE PSIVORE+15
SPSOL EN+3
ULK INMEDINMED+3, INMED+4

Naked Globals

Name Field # of Occurrence
^( SPSOL
^(0 EN+2
^(2 DEL55+3*
^(5.1 SETN+1!

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA SETN+1!, ENIN1+2~, NONVF+4!
DD SETN+1!
DFN BEG+5, SETN+1, SETN+3, SETN+5, NEW+3, INMED+4, ULK+2, HK+1, HK+2~*, HK+4
OK1+5, OK1+7, EN+2, EN+3, EN+4, SPSOL, NONVF+10, DEL55+2, DEL55+3
DIC SETN+1!*
DIC(0 SETN+1*
DIK ASK+2!
DINUM SETN+1*!
DIR ASK+2!, NEW+2!, ENIN1+2~
DIR("??" ASK+2*, NEW+2*
DIR("A" ASK+2*, NEW+2*, ENIN1+6*
DIR("B" ASK+2*, NEW+2*
DIR(0 ASK+2*, NEW+2*, ENIN1+6*
DO SETN+1!
>> DONE ENIN+3*
>> DTOUT ENIN1+11
>> DUOUT OK+2
DUZ BEG+1, Q+1, OK1+7
>> ERR OK+3, OK+9
FIL Q+2!
FLAG PSIVORE+13~, ENIN+3*, ENIN1+11, ENIN1+12*
>> HELP BAD+3*
I1 Q+2!
ND Q+2!
>> OD OK1+5*, CAL+2*
>> ON BAD+2*, OK1*, OK1+5*, NONVF+4*, NONVF+10, NONVF+14, DEL55+3
ON55 INMED!, INMED+3, INMED+4, OK+7, BAD+1, BAD+2, OK1OK1+5, OK1+7, EN+2
EN+3, EN+4, SPSOL, NONVF+6, NONVF+13, NONVF+14*, DEL55+1, DEL55+2, DEL55+3
>> ORNATR OK1+5*
>> ORSTS OK1*
P NEW+2!, ENIN1+3!
P("APPT" ENIN1+5*
P("CLIN" ENIN1+5*
P("FRES" INMED*
P("INS" BAD+2*
P("NAT" OK1+2, OK1+5, NONVF+6
P("OT" INMED*
P("PD" OK+1
P("PON" INMED+3*
P("REN" NONVF+4*
P("RES" INMED+3*
P(15 EN+3*, EN+4*
P(17 BAD+1*, OK1*, NONVF+4*
P(2 INMED+3, OK+4, OK1+5, CAL+2
P(21 BAD+1
P(22 OK1+4
P(23 ENIN1+12*
P(3 OK+4
P(4 INMED*, OK+1
P(5 ENIN1+12*
P(6 OK1
>> P16 OK+1*
PC Q+2!
PDM Q+2!
PPAGE PSIVORE+13~, BEG+5*
PSGDT Q+2!
PSGEBN BAD+2~*
PSGID Q+2!
PSGLI BAD+2~*
PSGLMT Q+2!
PSGOEAV NONVF+1~*, NONVF+2, NONVF+3
>> PSGOP PSIVORE+15*, BEG+6, HK+1, HK+2, HK+4*
>> PSGORQF OK+7
>> PSGP SETN+5*
PSGPTMP PSIVORE+13~, BEG+5*
PSGSI Q+2!
PSIVAC SETN+5*, INMED+3*, Q+2!, OK+9, ENIN+3*
>> PSIVBR SETN+5*
PSIVCHG NEW+2!, Q+2!, OK+8, ENIN1+3!
>> PSIVCOPY OK+9
>> PSIVCT OK+1*
PSIVEXAM OK+1*, OK+4!
PSIVFN SETN+1!*
>> PSIVNOL OK+1*
PSIVORFA DEL55+4~*
PSIVQ PSIVORE+15!, SITE+1!, SITE+3*
>> PSIVSITE SITE+2
>> PSIVSN SITE+2
PSIVTYPE NEW+2!, ENIN1+12*
PSIVUP INMED+3*, Q+2!
PSIVX Q+2!
PSJACNWP HK+2~
PSJACPF HK+2~, HK+3*
PSJALLGY ENIN1+2~
>> PSJCLAPP ENIN1+4, ENIN1+5, ENIN1+9
>> PSJCM01 ENIN1+4
PSJCMF ENIN1+4!, ENIN1+9*
>> PSJCMO ENIN1+4
PSJCOM ENIN1+3!
PSJEXMSG ENIN1+2~
>> PSJIVBD OK+10*
>> PSJIVORF OK1+1, OK1+2, OK1+4, OK1+5
PSJLK BEG+4~, BEG+5*
PSJLSORX NEW+3*, ULK+1, ULK+2!
PSJNARC SETN+4*, Q+2!
PSJNEW PSIVORE+13~*
>> PSJNKF Q+1*
PSJOC NONVF~, NONVF+10
PSJOCFG INMED+1~, INMED+2*, INMED+4!
PSJOE NEW+2!, INMEDINMED+3, INMED+4, Q+1, ENIN1+2~, ENIN1+6*
>> PSJOEPF ENIN1+7*, ENIN1+8*
PSJOPC Q+2!
PSJORD BAD+2*, NONVF+14~*
>> PSJORL OK1*
>> PSJORNP OK1*
>> PSJORQF ENIN1+11*, ENIN1+13*
PSJOUT PSIVORE+13~, INMED!, ENIN+3~, ENIN1+13
PSJPCAF ENIN1+2~
PSJPWD SETN+5*, HK+2~, HK+3*
PSJSYSL BEG+6, HK+2~, HK+3, ENIN1+2~
>> PSJSYSP0 NONVF+1
>> PSJSYSU NONVF+2, NONVF+3
PSJSYSW HK+2~
PSJSYSW0 HK+2~
SPSOL EN+3, ENQ!, SPSOL*
U HK+3, EN+2, EN+3, EN+4, SPSOLENIN1+12, NONVF+1, DEL55+3
>> VADM(1 NEW+1, NEW+2
>> VADM(6 ASK+1
VAERR HK+2~
VAIN HK+2~
VAIN(4 ASK+2, ASK+3, SETN+5, HK+3, OK1ENIN1+2, NONVF+7
>> VALMBCK BAD+2*
WSCHADM BEG+5!, ASK+3*, ENIN1+2~*
X SETN+1*, NEW+3~*, ULK+2~*, OK+2*, OK+3*, OK+9*, BAD+2, BAD+3, DOAENIN1+7
ENIN1+8, ENIN1+10, ENIN1+11*, DEL55+2*, DEL55+3
>> XQUIT SITE+1
XXX EN+3*, EN+4, ENQ!, SPSOL*, SPSOL+1!
>> Y ASK+2, NEW+2, NEW+3, OK+4*, ENIN1+12
>> ZZND OK+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All