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

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  
Kernel 1 ^ORD(101  

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