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 |  Local Variables  | All
Print Page as PDF
Routine: PSJLIACT

Package: Inpatient Medications

Routine: PSJLIACT


Information

PSJLIACT ;BIR/MV - IV ACTION ;28 Jul 98 8:50 AM

Source Information

Source file <PSJLIACT.m>

Call Graph

Call Graph Total: 35

Package Total Call Graph
Inpatient Medications 29 $$ENDTC^PSGMI  ENCOM^PSGOEM  OC^PSIVOC  (H,O,R)^PSIVOPT  (ACCEPT,E)^PSIVOPT1  DC^PSIVORA  LOG^PSIVORAL  (DISCONT,EDIT)^PSIVORC  
COMPLTE^PSIVORC1  ACTIVE^PSIVORC2  OK^PSIVORE  (,GSTRING)^PSIVORE1  GT531^PSIVORFA  GT55^PSIVORFB  GTFLDS^PSIVORFE  EN^PSIVVW1  
NAME^PSJBCMA1  CMPLX^PSJCOM1  EN1^PSJHL2  NOTIFY^PSJHL4  (CIMOI,KILL531)^PSJIMO1  GTDATA^PSJLIFN  EN^PSJLIORD  ($$GETDUR,EN)^PSJLIVMD  
$$CHKSCHD^PSJMISC2  SETOC^PSJNEWOC  IN^PSJOCDS  HOLDHDR^PSJOE  $$DATE2^PSJUTL2  
VA FileMan 4 NOW^%DTC  (FILE,YN)^DICN  ^DIE  ^DIR  
List Manager 1 (FULL,PAUSE)^VALM1  
Text Integration Utility 1 MAIN^TIUEDIT  

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

Package Total Caller Graph
Inpatient Medications 15 PSIVOPT1  PSIVOPT2  PSIVORC2  PSIVORE  PSJ LM IV AC/EDIT  PSJ PC IV ACCEPT  PSJ PC IV LOG  PSJCOMR  
PSJI LM DISCONTINUE  PSJI LM EDIT  PSJI LM VERIFY  PSJI PC HOLD  PSJI PC ONCALL  PSJI PC RENEWAL  PSJOCDC  

Entry Points

Name Comments DBIA/ICR reference
DC ; Discontinue order
ACEDIT ; Display LM screen and AC and EDit actions
AEEXIT ; Call for EXIT CODE in PSJ LM IV AC/EDIT
EDIT ; Edit order
EDIT1 ;
ACCEPT ; Accept order
R ; Renewal
H ; Hold
L ; Activity Log
O ; On Call
VF ; Make the order active **ENHANCEMENTS MADE IN PSJ*5.0*260
VF1(PSIVREA,PSIVAL,PSIVLOG) ;

External References

Name Field # of Occurrence
NOW^%DTC VF1+13
FILE^DICN VF1+37
YN^DICN DC+5
^DIE VF1+18, VF1+25, VF1+48
^DIR VF1+28
$$ENDTC^PSGMI VF1+43, VF1+44
ENCOM^PSGOEM DC+5
OC^PSIVOC VF+11
H^PSIVOPT H+4
O^PSIVOPT O+4
R^PSIVOPT R+8
ACCEPT^PSIVOPT1 ACCEPT+5
E^PSIVOPT1 EDIT1+17
DC^PSIVORA DC+8
LOG^PSIVORAL VF1+41, VF1+43, VF1+44
DISCONT^PSIVORC DC+9
EDIT^PSIVORC EDIT1+20
COMPLTE^PSIVORC1 ACCEPT+7
ACTIVE^PSIVORC2 VF+17
OK^PSIVORE EDIT1+14, ACCEPT+3
^PSIVORE1 VF1+7
GSTRING^PSIVORE1 EDIT1+13
GT531^PSIVORFA AEEXIT+2
GT55^PSIVORFB AEEXIT+1, VF1+54
GTFLDS^PSIVORFE EDIT1+13
EN^PSIVVW1 L+2
NAME^PSJBCMA1 VF1+33
CMPLX^PSJCOM1 DC+4
EN1^PSJHL2 VF1+25, VF1+50, VF1+51
NOTIFY^PSJHL4 VF1+57
CIMOI^PSJIMO1 VF1+52
KILL531^PSJIMO1 VF1+53
GTDATA^PSJLIFN AEEXIT+2
EN^PSJLIORD DC+8, EDIT1+18, R+9, H+6, O+6
$$GETDUR^PSJLIVMD VF1+45
EN^PSJLIVMD ACEDIT+1, AEEXIT+3, EDIT+5, L+3
$$CHKSCHD^PSJMISC2 R+6, VF+6
SETOC^PSJNEWOC VF1+50
IN^PSJOCDS VF+11
HOLDHDR^PSJOE DC+2, EDIT1+9, ACCEPT+1, R+3, H+3, O+3
$$DATE2^PSJUTL2 VF1+43, VF1+44
MAIN^TIUEDIT VF1+30
FULL^VALM1 VF+4
PAUSE^VALM1 EDIT+2, EDIT1+5, EDIT1+7, H+5, O+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This order is part of a complex order. If you discontinue this order the",!,"following orders will be discontinued too (unless the stop date has already",!,"been reached)."
  • Line Location: DC+4
Function Call: WRITE
  • Prompt: !!,"Do you want to discontinue this order"
  • Line Location: DC+5
Function Call: WRITE
  • Prompt: !,"This order may not be edited."
  • Line Location: EDIT+2
Function Call: WRITE
  • Prompt: !,"You cannot edit an inactive order"
  • Line Location: EDIT1+7
Function Call: WRITE
  • Prompt: !!,">>> Verify may not be selected at this point."
  • Line Location: VF+7
Function Call: WRITE
  • Prompt: !
  • Line Location: VF1+28
Routine Call
  • DIE
  • Line Location:
    • VF1+18
    • VF1+25
    • VF1+48
Routine Call
  • DIR
  • Line Location:
    • VF1+28

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(53.1 - [#53.1] DC+3, VF+3, VF1+42
^PS(53.3 - [#53.3] VF1+36
^PS(55 - [#55] DC+3, R+5, VF+3, VF1+10, VF1+52, VF1+54, VF1+55
^TMP("PSODAOC" ACCEPT+8!, R+10!, VF1+49*

Label References

Name Line Occurrences
EDIT1 EDIT+3
VF1 VF+13, VF+14, VF+15, VF+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DC+5*, DC+6, VF1+15, VF1+16
DA VF1+8~, VF1+14*, VF1+23*, VF1+26!, VF1+33~, VF1+46*
DA(1 VF1+14*, VF1+23*, VF1+34*, VF1+35, VF1+46*
DA(2 VF1+34*, VF1+35
>> DFN DC+3, DC+8, AEEXIT+2, EDIT1+18, R+5, R+9, H+4, H+6, O+4, O+6
, VF1+10, VF1+14, VF1+23, VF1+25, VF1+30, VF1+34, VF1+45, VF1+46, VF1+50, VF1+51
, VF1+52, VF1+53, VF1+54, VF1+55, VF1+57
DIC VF1+33~, VF1+35*
DIC("DR" VF1+36*
DIC(0 VF1+34*
DIE VF1+8~, VF1+14*, VF1+20, VF1+23*, VF1+26!, VF1+46*
DIR VF1+28~
DIR("A" VF1+28*
DIR("B" VF1+28*
DIR(0 VF1+28*
DO VF1+33~
>> DONE EDIT1+14
DR VF1+8~, VF1+15*, VF1+16*, VF1+17*, VF1+24*, VF1+26!, VF1+46!, VF1+47*
DUR VF1+45~*, VF1+47
DUZ VF1+15, VF1+16
IVLIMIT VF1+47!
NODE0 VF1+55~*, VF1+56
NODEP2 VF1+55~*, VF1+56
OD VF1+6!
>> OLDON VF1+54*
ON DC+8, DC+9~*, AEEXIT+1, AEEXIT+2, EDIT1+18, ACCEPT+5, R+5, R+9, H+4, H+6
O+4, O+6, VF+3, VF+13, VF+14, VF+15, VF+16
>> ON55 DC+7, EDIT1+8*, EDIT1+12, EDIT1+14, EDIT1+17, EDIT1+20, VF+13*, VF+14*, VF+15*, VF+16*
, VF1+10, VF1+14, VF1+20, VF1+34, VF1+46, VF1+49, VF1+50, VF1+51, VF1+52, VF1+54
, VF1+55, VF1+57
>> ORIGSTOP VF1+24*
>> P EDIT1+3
>> P("21FLG" EDIT1+12
>> P("IVRM" VF1+17
>> P("OLDON" VF1+54*
>> P("OT" AEEXIT+2
>> P("OVRIDE" EDIT1+21!
>> P("PACT" VF1+32, VF1+33, VF1+36
>> P("PON" EDIT1+3*
>> P("PRY" VF1+17, VF1+27
>> P("RES" VF1+22
>> P(17 EDIT1+7, H+4, H+5, O+4, O+5, VF+10
>> P(3 H+4, O+4
PREREN VF1+20*!, VF1+21*, VF1+22, VF1+23, VF1+25
PRERENOD VF1+22~*
>> PSGACT EDIT+2
>> PSGDEF VF+15
>> PSGDT VF1+24
PSGFDX R+4!
>> PSGORD VF+11
PSGORQF DC+1!, AEEXIT+1!, EDIT+8, EDIT1+1!, EDIT1+19, ACCEPT+5, R+1!, H+1!, O+1!, VF+1~
VF+3, VF+6*, VF+11, VF+12, VF+13, VF1+5!
>> PSGP DC+4, VF+3
>> PSGRDTX VF1+42*, VF1+43, VF1+44
>> PSGSCH VF+5
>> PSGSTAT VF+10
PSIEDITO EDIT1+10~*
PSIVAC R+4~*
>> PSIVACEP ACEDIT+2
PSIVACT VF1+8~, VF1+9*
PSIVAL VF1~, VF1+40*, VF1+41!, VF1+43*, VF1+44*
PSIVALCK VF1+38~
>> PSIVALT VF1+39*, VF1+42*, VF1+44*
PSIVCHG VF+1~*
>> PSIVCOPY EDIT+4, VF+16
PSIVENO AEEXIT+4!, EDIT+4, EDIT+8!, EDIT1+19!, R+1!
PSIVFN1 EDIT+1!, EDIT+6, ACCEPT+6*, VF+14
PSIVLAB L+1~*
PSIVLN VF1+41!
PSIVLOG L+1~*, VF1~, VF1+31
>> PSIVNBD EDIT+4, EDIT1+3*, EDIT1+15*
>> PSIVOORD DC+7
PSIVREA VF1~, VF1+39*, VF1+41!, VF1+42*, VF1+44*
>> PSJCOM DC+3*, DC+4, DC+5, DC+6
>> PSJDSVFY ACCEPT+5*, VF+11
PSJEDIT1 EDIT1+17~
>> PSJENHOC VF+11
PSJHIS L+1~
PSJIVBD EDIT1+18!, ACCEPT+3!
>> PSJNEWOE VF+10
PSJOCCHK EDIT+8!, EDIT1+19!, R+1!
>> PSJOCFG VF+10
>> PSJOCFLG DC+8
PSJOLDNM R+4~, R+6!, R+7!, VF+1~, VF+6
PSJOLDNM("ORD_SCHD" R+5*, R+6, VF+5*
>> PSJORD DC+3, DC+4, DC+7*, DC+8, DC+9, EDIT1+8, VF1+42, VF1+45, VF1+52, VF1+53
PSJPRIO VF1+55~, VF1+56*, VF1+57
PSJREN R+2*, R+10!
PSJRQND VF1+8~
PSJSCH VF1+55~, VF1+56*, VF1+57
>> PSJSYSU VF1+7, VF1+15, VF1+16, VF1+27, VF1+40, VF1+51
PSJVFF VF+1~, VF+11*!
PSJX VF1+8~, VF1+10*, VF1+11, VF1+12
TEX H+2~*, O+2~*
>> TIUDA VF1+30
U R+5, VF+3, VF1+11, VF1+12, VF1+15, VF1+16, VF1+32, VF1+33, VF1+36, VF1+43
, VF1+44
>> VALMBCK DC+10*, ACEDIT+2*, EDIT+6*, EDIT+8*, EDIT1+6*, EDIT1+15*, ACCEPT+3*, ACCEPT+9*, L+4*
>> VALMBK DC+6*
X VF1+33~, VF1+34*
>> XQORQUIT EDIT1+3*
XX VF1+8~, VF1+10*, VF1+11*, VF1+12*, VF1+15, VF1+16, VF1+33~, VF1+36
Y VF1+29, VF1+33~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All