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

Package: Inpatient Medications

Routine: PSIVOPT2


Information

PSIVOPT2 ;BIR/PR,MLM-OPTION DRIVER (CONT) ;02 Mar 99 / 9:27 AM

Source Information

Source file <PSIVOPT2.m>

Call Graph

Call Graph

Call Graph Total: 30

Package Total Call Graph
Inpatient Medications 24 ($$REQPROV,AC,ASET)^PSGOEC  ($$EXPIRED,EXPOE)^PSGOER  $$ENRNAT^PSGOU  $$PRNOK^PSGS0  ENQ^PSIV  ^PSIVCHK  EDIT^PSIVEDT  ^PSIVHLP  
OC^PSIVOC  (ENARI,ENLBL)^PSIVOPT  HL^PSIVORA  LOG^PSIVORAL  GTPD^PSIVORE2  (NATURE,ORPARM,RUPDATE,STIX)^PSIVOREN  SET55^PSIVORFB  ^PSIVORLB  
($$DOW,GTOT)^PSIVUTL  ^PSJCOMR  EN1^PSJHL2  VF1^PSJLIACT  IN^PSJOCDS  ENUDTX^PSJOREN  EFDIV^PSJUTL  ($$DATE,$$DATE2)^PSJUTL2  
VA FileMan 4 NOW^%DTC  FILE^DICN  FILE^DIE  ^DIR  
List Manager 1 PAUSE^VALM1  
Pharmacy Data Management 1 ($$LS,UNL)^PSSLOCK  

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

Package Total Caller Graph
Inpatient Medications 7 PSGOEC  PSIVOPT  PSIVOPT1  PSIVORA  PSIVOREN  PSIVSPDC  PSJADT0  

Entry Points

Name Comments DBIA/ICR reference
D ; Discontinue order.
D1
R ; Renew order.
R1 ;
RD ; Delete for renew.
OK ;Print example label, run order through checker, ask if it is ok.
RI ; Reinstate Auto-DC'ed order.
UPDREN(DFN,ORD,RNWDT,PROV,OSTOPDT,PSJNOO) ;

External References

Name Field # of Occurrence
NOW^%DTC D+12, R1+7, RI+3
FILE^DICN UPDREN+6
FILE^DIE D1+9
^DIR RI+2, RI+4
$$REQPROV^PSGOEC D+3
AC^PSGOEC D+13
ASET^PSGOEC D+13
$$EXPIRED^PSGOER R1+1
EXPOE^PSGOER R1+20
$$ENRNAT^PSGOU R1+11
$$PRNOK^PSGS0 R1+5
ENQ^PSIV OK+8
^PSIVCHK OK+2
EDIT^PSIVEDT R1+9, RI+6
^PSIVHLP OK+8
OC^PSIVOC R1+10
ENARI^PSIVOPT RI+7
ENLBL^PSIVOPT D1+11, R1+25
HL^PSIVORA D+11
LOG^PSIVORAL D+6, D+11
GTPD^PSIVORE2 OK+1
NATURE^PSIVOREN D+1, R1+15
ORPARM^PSIVOREN D1+12, R1+14
RUPDATE^PSIVOREN R1+18
STIX^PSIVOREN R1+26
SET55^PSIVORFB R1+17
^PSIVORLB OK+4
$$DOW^PSIVUTL R1+5
GTOT^PSIVUTL OK+1
^PSJCOMR R+2
EN1^PSJHL2 R1+22
VF1^PSJLIACT R1+24
IN^PSJOCDS R1+10
ENUDTX^PSJOREN R1+22
EFDIV^PSJUTL OK+6
$$DATE^PSJUTL2 D1+1
$$DATE2^PSJUTL2 R1+8
$$LS^PSSLOCK D+9, R1+19
UNL^PSSLOCK R1+24
PAUSE^VALM1 R1+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"Order Unchanged."
  • Line Location: D+1
Function Call: WRITE
  • Prompt: !,$C(7),"Order Unchanged."
  • Line Location: D+3
Function Call: WRITE
  • Prompt: !!?3,"This order contains an invalid schedule and CANNOT be renewed!"
  • Line Location: R1+6
Function Call: WRITE
  • Prompt: !
  • Line Location: R1+10
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: !,"*** This change will cause a new order to be created. ***"
  • Line Location: OK+7
Function Call: WRITE
  • Prompt: !!,$C(7),"This order has been Auto-DC'ed."
  • Line Location: RI+1
Function Call: WRITE
  • Prompt: !!,$C(7),"This order's provider is no longer valid. Please enter a valid provider."
  • Line Location: RI+6
Function Call: WRITE
  • Prompt: $C(7),"Order unchanged."
  • Line Location: RI+6
Routine Call
  • DIE
  • Line Location:
    • D1+9
Routine Call
  • DIR
  • Line Location:
    • RI+2
    • RI+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" OK+4
^PS(51.1 - [#51.1] R1+5
^PS(53.1 - [#53.1] D+13
^PS(55 - [#55] D+6, D+8, D+10, D+11, D1+1, D1+4, R1+8, R1+11, R1+18, R1+19
, RI+3
^VA(200 - [#200] RI+5

Label References

Name Line Occurrences
D1 D+5, D+11
OK R1+12, OK+8
R1 R1+12
RD R1+12, R1+15
RI R+3
UPDREN R1+22

Naked Globals

Name Field # of Occurrence
^(4 D+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% D+12, D1~, R1+7, RI+3
>> CF D+13*
COMFLG D+7~*, D+8~*, D+9*, D+10
>> COMQUIT D+1*, D+3*, R+3*, R+4*, OK+2*, OK+3*
DA D+12!*, D1~, RI+1~, UPDREN+3~
DA(1 D+12*, UPDREN+5*
DA(2 UPDREN+5*
DD UPDREN+3~
DFN D+6, D+9, D+11, D+12, D1+1, D1+3, D1+4, D1+5, D1+6, D1+7
, D1+11, R1+1, R1+8, R1+11, R1+18, R1+19, R1+20, R1+22, R1+24, R1+25
, R1+26, RI+3, RI+7, UPDREN~, UPDREN+1, UPDREN+4, UPDREN+5
DIC UPDREN+3~, UPDREN+4*, UPDREN+5*
DIC("DR" UPDREN+6*
DIC("P" UPDREN+5*
DIC(0 UPDREN+5*
DIE D1~, RI+1~, UPDREN+3~
DINUM UPDREN+3~, UPDREN+5*
DIR RI+1~, RI+2!, RI+4!
DIR("A" RI+2*, RI+4*
DIR(0 RI+2*, RI+4*
DIU D1~, RI+1~
DO UPDREN+3~
>> DONE RI+6
DR RI+1~, UPDREN+3~
DT RI+5
>> DUOUT OK+2
DUZ D+13, D1+11, R1+25, RI+7, UPDREN+6
>> EDIT R1+9*, RI+6*
ERR R+3~, OK+3, OK+8, RI+2*, RI+4*, RI+5*, RI+6*
>> HELP OK+8*
ND0 UPDREN+3~, UPDREN+4*
>> ND14 UPDREN+5*
NSTOP D1~, D1+1*, D1+3, D1+7
O D+8~*, D+10~*
>> OD R1+23*
>> ON D+6*, D+11*, R1+16*, RI+7, UPDREN+4
>> ON55 D+6, D+8, D+9, D+11*, D1+1, D1+3, D1+4, D1+5, D1+6, D1+7
, D1+11, R1+1, R1+8, R1+10, R1+11, R1+16, R1+18, R1+19, R1+20, R1+22
, R1+24, R1+25, R1+26, RI+3
OO D+8~*, D+9, D+10~*, D+11, D+12
ORD UPDREN~, UPDREN+1, UPDREN+4, UPDREN+5
OREASON R1+8~, R1+14*, R1+17
OSTOPDT UPDREN~, UPDREN+1, UPDREN+6
>> P("21FLG" R1+17*
>> P("FRES" R1+14*
>> P("NAT" D+1, D+12, R1+14, R1+15, R1+22
>> P("PD" OK+1
>> P("RES" R1+14*, R1+17*, R1+21*
>> P(11 R1+11*
>> P(12 R+3
>> P(16 R1+17*
>> P(17 D1+1*, R+3, R1+14*
>> P(2 R1+8, R1+9*, R1+18, R1+23, OK+4
>> P(3 D+6*, D+11*, OK+4
>> P(4 OK+1
>> P(6 R1+22, RI+5
>> P(9 R1+5, R1+11
>> P16 OK+1*
P2 R1+9*!
PROV UPDREN~, UPDREN+1, UPDREN+6
>> PROVQUIT D+3*
PSGALO D1+11, RI+7~*
>> PSGALR D+12*
>> PSGDT D+12*, R1+7*, R1+8
PSGOEORD UPDREN+3~, UPDREN+4*, UPDREN+6
>> PSGOLDOE UPDREN+4
PSGORD D+12~*, D+13
PSGORQF R+4, R1+10~!
>> PSGP D+12*
>> PSGUOW D1+11
>> PSIVAC D1+11
PSIVACT D1+8*, R1+17*, RI+1~
PSIVALCK D+6*, D+11*, RI+1~
PSIVALT D+6*, D+11*, RI+1~
>> PSIVCHG R1+13*, OK+7
>> PSIVCT OK+1*
PSIVEXAM OK+1*, OK+4!
>> PSIVNOL OK+1*
>> PSIVOK R1+9*, RI+6*
PSIVREA D+6*, D+11*, OK+7, RI+1~
PSIVRNFG R1+10*!
>> PSJCOM D+4, D+7, D+8, D+10, R+2
>> PSJIVORF D1+12, R1+14, R1+19
PSJNOO D+12~*, UPDREN~, UPDREN+1
PSJOCFLG R+7~*, R1+10!
PSJORD D+11~*, D+12~*
>> PSJORIFN R1+17*
PSJOSTOP R1+8~*, R1+22, R1+26
>> PSJREN R1+21*
PSJRNWDT R1+8~*, R1+9, R1+22
>> PSJSYSP0 D+13
>> PSJSYSU D+12
>> PSJSYSW0 D1+11
RNWDT UPDREN~, UPDREN+1, UPDREN+6
STP D1~, D1+1*, D1+4
>> T D+12*
TMP D1+2!, D1+10!
TMP( D1+3*, D1+4*, D1+5*, D1+6*, D1+7*
U D+6, D+11, D+13, D1+1, D1+4, D1+11, R1+8, R1+11, R1+12, R1+18
, R1+19, RI+3, RI+5
>> VAIN(4 R1+11
>> X D1+11*, R1+9, R1+12, R1+19*, OK+2*, OK+3*, OK+8*, RI+5*, UPDREN+6*
>> Y OK+4*, RI+2, RI+4
>> ZZND OK+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All