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

Package: Inpatient Medications

Routine: PSIVVW1


Information

PSIVVW1 ;BIR/PR-PRINT ACTIVITY LOG ;06 APR 97 / 5:47 PM

Source Information

Source file <PSIVVW1.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Inpatient Medications 9 (AL1,NPAGE)^PSGVW0  ^PSIVHLP  ^PSIVHLP2  DATA^PSIVLTR1  $$CODES^PSIVUTL  NAME^PSJBCMA1  ENHIS^PSJHIS  ENHIS^PSJINHIS  
HOLDHDR^PSJOE  
VA FileMan 2 YN^DICN  ^DIR  
List Manager 1 FULL^VALM1  

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

Package Total Caller Graph
Inpatient Medications 8 PSGVBWP  PSIVPGE  PSIVPR  PSJCLOR4  PSJI LM ACTIVITY LOG  PSJI LM LABEL LOG  PSJLIACT  PSJPR  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
BEG ;Ask to view activity log
BEG1 ;Ask to view label log
EN ; Show activity, label, or history log.
ENPR ;Entry from profile.
Q
EN1 ;Entry for Inmed functionality and viewing the log from IV order entry
ACT ;This module is used for the screen profile
ACTW ;
PAUSE ;
HDR
LOG1 ;This module is used for profile report. (hard printer copy usually)
ENLOG ;Entry for patient profile report OR patient purge report

External References

Name Field # of Occurrence
YN^DICN BEG+1, BEG1+1
^DIR EN+4, ENPR+4, PAUSE+1
AL1^PSGVW0 EN1+4
NPAGE^PSGVW0 EN1+4
^PSIVHLP BEG+1
^PSIVHLP2 BEG1+1
DATA^PSIVLTR1 EN+6, ENPR+3
$$CODES^PSIVUTL ACT+1, LOG1+2
NAME^PSJBCMA1 ACT+2
ENHIS^PSJHIS EN+4
ENHIS^PSJINHIS EN+4
HOLDHDR^PSJOE ENPR+1
FULL^VALM1 EN+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"View activity log"
  • Line Location: BEG+1
Function Call: WRITE
  • Prompt: !!,"View label log"
  • Line Location: BEG1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+5
Function Call: WRITE
  • Prompt: !!,"No activity LOG to report."
  • Line Location: EN1+6
Function Call: WRITE
  • Prompt: !,JJ,?3,$P(Y,"@")," ",$P(Y,"@",2),?24
  • Line Location: ACT+1
Function Call: WRITE
  • Prompt: X
  • Line Location: ACT+1
Function Call: WRITE
  • Prompt: ?50,X
  • Line Location: ACT+2
Function Call: WRITE
  • Prompt: !?3,"Comment: ",$P(P1,"^",4)
  • Line Location: ACT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ACT+5
Function Call: WRITE
  • Prompt: !?10,"Field: '",$P(P1,"^"),"'"
  • Line Location: ACTW+4
Function Call: WRITE
  • Prompt: !?3,"Changed from: '",$P(P1,"^",2),"'"
  • Line Location: ACTW+4
Function Call: WRITE
  • Prompt: !?3,"Changed from: '",$P(P1,"^",2),"'"
  • Line Location: ACTW+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ACTW+5
Function Call: WRITE
  • Prompt: !?10,"Field: '",$P(P1,"^"),"'"
  • Line Location: ACTW+5
Function Call: WRITE
  • Prompt: !?10,"Field: '",$P(P1,"^"),"'"
  • Line Location: ACTW+5
Function Call: WRITE
  • Prompt: !?4,"'",^(TXTLN,0)
  • Line Location: ACTW+8
Function Call: WRITE
  • Prompt: "'",!
  • Line Location: ACTW+19
Function Call: WRITE
  • Prompt: !!!
  • Line Location: PAUSE+1
Function Call: WRITE
  • Prompt: !!,"ACTIVITY LOG:",!,"#",?3,"DATE",?14,"TIME",?24,"REASON",?50,"USER",!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,JJ,?3,$P(Y,"@")," ",$P(Y,"@",2),?24
  • Line Location: LOG1+2
Function Call: WRITE
  • Prompt: X
  • Line Location: LOG1+2
Function Call: WRITE
  • Prompt: ?50,$P(P1,"^",3),!?3,"Comment: ",$P(P1,"^",4)
  • Line Location: LOG1+3
Function Call: WRITE
  • Prompt: !!?10,"Field: '",$P(P1,"^"),"'",!?3,"Changed from: '",$P(P1,"^",2),"'",!?13,"To: '",$P(P1,"^",3),"'"
  • Line Location: LOG1+4
Routine Call
  • DIR
  • Line Location:
    • EN+4
    • ENPR+4
    • PAUSE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" ACT+1, LOG1+2
^PS(53.1 - [#53.1] EN1+4
^PS(55 - [#55] EN1+6, EN1+7, ACT+4, ACTW+7, ACTW+13, ACTW+14, ACTW+16, ACTW+17, ACTW+18, LOG1+4
ENLOG+2, ENLOG+4

Label References

Name Line Occurrences
ACT EN1+7, ENLOG+4
ACTW ACT+4
EN EN+4, EN+7
EN1 EN+6, ENPR+2
ENPR BEG1+2
HDR EN1+7, ENLOG+2
PAUSE EN+6, ENPR+2, ENPR+3, ACT+3, ACTW+4, ACTW+5, ACTW+9, ACTW+11, ACTW+18, ACTW+20
LOG1+3, LOG1+4
Q BEG+2, BEG1+2, EN+4, EN1+6, ENLOG+5

Naked Globals

Name Field # of Occurrence
^( EN1+4, EN1+7, ACT+4, ACTW+8, ACTW+9, ACTW+14, ACTW+16, ACTW+17, ACTW+18, LOG1+4
ENLOG+4
^(0 EN1+4, ENLOG+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% BEG+1*, BEG+2, BEG1+1*, BEG1+2, Q!
>> A1 ACT+4*
>> AND EN1+4*
AT EN1+3~, EN1+4*
COU Q!
>> DFN EN+4, EN+6, ENPR+3, EN1+6, EN1+7, ACT+4, ACTW+7, ACTW+13, ACTW+14, ACTW+16
ACTW+17, ACTW+18, LOG1+4, ENLOG+2, ENLOG+4
DIR EN+3!, EN+4!, ENPR+4!, PAUSE+1!
DIR("A" EN+3*
DIR(0 EN+3*, ENPR+4*, PAUSE+1*
>> DIRUT EN+4
>> DTOUT PAUSE+1
>> DUOUT PAUSE+1
>> HELP BEG+1*, BEG1+1*
I Q!, HDR*
II ACTW+1~, ACTW+14*, ACTW+16*, ACTW+17*, ACTW+18*, ACTW+19
IOSL PAUSE+1, LOG1+3, LOG1+4
IOST EN1+1, ENLOG+4
>> JJ EN1+7*, ACT+1, ACT+4, ACTW+7, ACTW+13, ACTW+14, ACTW+18, LOG1+2, LOG1+4, ENLOG+4*
L Q!
N Q!
NXTOPI ACTW+1~, ACTW+12*, ACTW+14*, ACTW+15, ACTW+17
OD EN1+3~
OG Q!
>> ON EN+2, EN1+2, EN1+4, LOG1+4, ENLOG+2*, ENLOG+4
>> ON55 EN+2*, EN+4, EN+6, ENPR+3, EN1+6, EN1+7, ACT+4, ACTW+7, ACTW+13, ACTW+14
ACTW+16, ACTW+17, ACTW+18, ENLOG+2*
P1 Q!, EN1+7*, ACT+1, ACT+2, ACT+3, ACT+4*, ACTW+2, ACTW+3, ACTW+4, ACTW+5
ACTW+6, ACTW+12, LOG1+2, LOG1+3, LOG1+4*, ENLOG+4*
P17 Q!
PN EN1+3~, EN1+4*
PSIVLAB BEG+1!, BEG1+2*, ENPR+3
PSIVLOG BEG+1!, BEG+2*, ENPR+2
>> PSIVSCR EN+6, ENPR+2, ENPR+3, ENPR+4, EN1+1*, PAUSE+1, LOG1+3, LOG1+4, ENLOG+4*
PSIVX Q!, LOG1+4*
PSJDNE EN+6, ENPR+2!, ENPR+3, EN1+1!, EN1+7, ACT+3, ACT+4, PAUSE+1*, ENLOG+4!
PSJHIS EN+5!
PSJHISEL EN+4~*, EN+6
>> PSJORD ENLOG+2
>> PSJPR PAUSE+1*
>> PSJS1 PAUSE+1*
>> PSJS2 PAUSE+1*
>> PSJS3 PAUSE+1*
>> PSJS4 PAUSE+1*
PX EN1+3~, EN1+4*
>> Q BEG+1*, BEG1+1*, EN1+4*
TXTLN ACTW+7~*, ACTW+8, ACTW+9, ACTW+17~*, ACTW+18~*
U ACT+2
UD EN1+3~
USER Q!
>> X ACT+1*, ACT+2, LOG1+2*
>> Y EN+4, EN1+7*, ACT+1, LOG1+2, ENLOG+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All