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

Package: Inpatient Medications

Routine: PSIVPR


Information

PSIVPR ;BIR/PR,CML3-PRINT PROFILE REPORT ;16 JUL 97 / 9:49 AM

Source Information

Source file <PSIVPR.m>

Call Graph

Call Graph Total: 19

Package Total Call Graph
Inpatient Medications 13 (ENCV,ENIVKV)^PSGSETU  ENGETP^PSIV  ENNA^PSIVACT  ^PSIVHLP  ^PSIVHLP1  ^PSIVHLP2  DATA^PSIVLTR1  ENNH^PSIVORV2  
^PSIVPRO  ENLOG^PSIVVW1  ^PSIVXU  ENIV^PSJAC  ENTRY^PSJHEAD  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 3 NOW^%DTC  YN^DICN  ^DIR  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Inpatient Medications 3 PSJI OR PAT PR  PSJI OR PR  PSJI PROFILE REPORT  

Entry Points

Name Comments DBIA/ICR reference
Q
EN ; Entry from option.
PAT ;Get patient
DEQ ;
DEQ1 ;
BEG ;Ask for order view.
QUEUE ;Queue logic.
EN1 ; Start here if from OE/RR.
ENOR
WD
ENLM ;* S PSIVOEDF=1 D ENCV^PSGSETU,EN1 K PSIVOEDF,J,N2,ORIFN,P17 D READ^PSJUTL
BEG2 ;
DISPLAY ;Display the patient's profile.
PAUSE ;
BEG1 ;Ask for activity log.

External References

Name Field # of Occurrence
NOW^%DTC DEQ+12
^%ZIS PAT+2
^%ZISC Q
^%ZTLOAD QUEUE+3
YN^DICN BEG+1, BEG1+1, BEG2+1
^DIR DISPLAY+5, PAUSE+1
ENCV^PSGSETU ENLM+1
ENIVKV^PSGSETU Q
ENGETP^PSIV PAT+1
ENNA^PSIVACT DEQ+8
^PSIVHLP BEG+1
^PSIVHLP1 BEG1+1
^PSIVHLP2 BEG2+1
DATA^PSIVLTR1 DEQ1+5
ENNH^PSIVORV2 DEQ1+2
^PSIVPRO DEQ+8
ENLOG^PSIVVW1 DEQ1+3
^PSIVXU EN+1
ENIV^PSJAC DEQ+8
ENTRY^PSJHEAD DISPLAY+2, DISPLAY+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"View each order in the profile"
  • Line Location: BEG+1
Function Call: WRITE
  • Prompt: !,"View each activity log in the profile"
  • Line Location: BEG1+1
Function Call: WRITE
  • Prompt: !,"View the label log in the profile"
  • Line Location: BEG2+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PAT+2
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED"
  • Line Location: PAT+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: DEQ+12
Function Call: WRITE
  • Prompt: !!,"PATIENT PROFILE REPORT on "
  • Line Location: DEQ+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISPLAY+5
Function Call: WRITE
  • Prompt: !,!,^TMP("PSJPRO",$J,1,0),!
  • Line Location: DISPLAY+6
Function Call: WRITE
  • Prompt: !,^TMP("PSJPRO",$J,PSIVX,0)
  • Line Location: DISPLAY+7
Function Call: WRITE
  • Prompt: $P(Y,"@")," ",$P(Y,"@",2)
  • Line Location: WD+0
Routine Call
  • DIR
  • Line Location:
    • DISPLAY+5
    • PAUSE+1
Routine Call
  • %ZIS
  • Line Location:
    • PAT+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" WD
^TMP("PSIV" PSIVPR+2!, DEQ+3, DEQ+13, Q+2!, Q+4*
^TMP("PSIVSV" DEQ+3*, Q+4, Q+9!
^TMP("PSJI" DEQ+6, DEQ+7, Q+2!, Q+7*, Q+8*
^TMP("PSJISV" DEQ+6*, DEQ+7*, Q+7, Q+8, Q+9!
^TMP("PSJPRO" DEQ+4, DEQ+5, Q+2!, Q+5*, Q+6*, DISPLAY+3, DISPLAY+4, DISPLAY+6, DISPLAY+7
^TMP("PSJPROSV" DEQ+4*, DEQ+5*, Q+5, Q+6, Q+9!

Label References

Name Line Occurrences
@( PAT+1, DEQ1+2
DEQ PAT+3
DEQ1 DEQ+13
DISPLAY DEQ+9
EN1 ENLM+1
PAT BEG+2
PAUSE DEQ1+1, DEQ1+3, DEQ1+5
Q BEG+2, BEG1+2, BEG2+2, QUEUE+3, DEQ+8
WD DEQ+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% BEG+1*, BEG+2, BEG1+1*, BEG1+2, BEG2+1*, BEG2+2, DEQ+12, Q+1!
%I Q+1!
%ZIS PAT+2!*
%ZIS("A" PAT+2*
A Q+1!
COU Q+1!
D Q+1!
DA Q+1!
DFN PAT+1, Q+1!, DEQ1+2, DEQ1+5, DISPLAY+2, DISPLAY+6, ENOR*
DIC Q+1!
DIR DISPLAY+5~, PAUSE+1!
DIR(0 DISPLAY+5*, PAUSE+1*
>> DTOUT DISPLAY+3, PAUSE+1
>> DUOUT DISPLAY+3, PAUSE+1
>> HELP BEG+1*, BEG1+1*, BEG2+1*
I Q+1!
IO("Q" PAT+2!, PAT+3
IOF DEQ+12, Q, DISPLAY+1, DISPLAY+5
ION PAT+1, QUEUE+1
IOP PAT+2!
IOSL DISPLAY+4
IOST DEQ+10, DISPLAY+1, DISPLAY+5
J Q+1!, ENLM+1!
JJ Q+1!
KEY Q+1!, DEQ1+2*
L Q+1!
N Q+1!
N2 Q+1!, ENLM+1!
NOLOG BEG+2*, DEQ+12, Q+1!
OG Q+1!
ON DEQ+13*, Q+1!, DEQ1+2, DEQ1+5
>> ON1 DEQ+13*
>> ON55 DEQ+13*
ORIFN ENLM+1!
>> ORVP ENOR
P Q+1!
P("PON" DEQ+13*
P1 Q+1!
P17 Q+1!, ENLM+1!
>> POP PAT+2
PPAGE PSIVPR+2~
PRX DEQ+13*, Q+1!
PRY Q+1!
PS Q+1!
>> PSGP(0 DEQ+8*
PSGPTMP PSIVPR+2~
PSIV Q+1!
PSIVAC DEQ1+2~*
PSIVLAB EN1+1*, BEG2+2*, Q+1!, DEQ1+5
PSIVLOG EN1+1*, BEG1+2*, Q+1!, DEQ1+3
PSIVOEDF PAT+1, QUEUE+1, ENLM+1*!
PSIVPPR EN1+1*, Q+1!
PSIVPR PAT+1, QUEUE+1, Q+1!
PSIVPR1 EN1+1*, BEG+3*, DEQ+13, Q+1!
PSIVREA Q+1!
PSIVSCR DEQ+10*, DEQ+12, Q, Q+1!, DEQ1+1, DEQ1+3, DEQ1+5
PSIVX DISPLAY+3~*, DISPLAY+4, DISPLAY+7
PSJDNE DEQ+8!, DEQ+13, Q+1!, DEQ1+1, DEQ1+3, PAUSE+1*
PSJNEW PSIVPR+2~*
>> PSJOL EN1+1*
PSJOPC Q+1!
>> PSJORD DEQ1+2*
PSQ Q+1!
>> Q BEG+1*, BEG1+1*, BEG2+1*
SUB3 DEQ+2~, DEQ+3*, DEQ+5*, DEQ+7*, Q+3~, Q+4*, Q+6*, Q+8*
SUB4 DEQ+2~, DEQ+3*, Q+3~, Q+4*
USER Q+1!
>> VADM(1 DEQ+8
VAERR Q+1!
>> VAIN DEQ+8
X QUEUE+1*, QUEUE+2*, DEQ+2~, DEQ+4*, DEQ+6*, DEQ+8, Q+2!, Q+3~, Q+5*, Q+7*
, DISPLAY+5~
X1 Q+2!
X2 Q+2!
XQUIT EN+1~
Y DEQ+12*, Q+1!, Q+2!, DISPLAY+5~, WD
Z Q+2!
Z1 Q+2!
Z2 Q+2!
>> ZTDESC QUEUE+1*
>> ZTIO QUEUE+1*
>> ZTQUEUED Q
>> ZTREQ Q*
>> ZTRTN QUEUE+1*
>> ZTSAVE( QUEUE+1*, QUEUE+2*
ZTSK QUEUE+3, Q+2!
ZZ Q+2!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All