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

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

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Inpatient Medications 5 PSGVBWP  PSIVPGE  PSIVPR  PSJLIACT  PSJPR  

Entry Points

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

External References

Name Field # of Occurrence
YN^DICN BEG+1, BEG1+1
^DIR EN+3, ENPR+4, PAUSE+1
AL1^PSGVW0 EN1+4
NPAGE^PSGVW0 EN1+4
^PSIVHLP BEG+1
^PSIVHLP2 BEG1+1
DATA^PSIVLTR1 ENPR+3
$$CODES^PSIVUTL ACT+1, LOG1+2
NAME^PSJBCMA1 ACT+3
ENHIS^PSJHIS EN+3
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+3
Function Call: WRITE
  • Prompt: !?3,"Comment: ",$P(P1,"^",4)
  • Line Location: ACT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ACT+6
Function Call: WRITE
  • Prompt: !
  • Line Location: ACTW+1
Function Call: WRITE
  • Prompt: !?10,"Field: '",$P(P1,"^"),"'"
  • Line Location: ACTW+1
Function Call: WRITE
  • Prompt: !?10,"Field: '",$P(P1,"^"),"'"
  • Line Location: ACTW+1
Function Call: WRITE
  • Prompt: !?10,"Field: '",$P(P1,"^"),"'"
  • Line Location: ACTW+1
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+3
    • 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+5, LOG1+4, ENLOG+2, ENLOG+4

Label References

Name Line Occurrences
@( EN+5
ACT EN1+7, ENLOG+4
ACTW ACT+5
EN EN+3, EN+6
EN1 ENPR+2
ENPR BEG1+2
HDR EN1+7, ENLOG+2
PAUSE EN+5, ENPR+2, ENPR+3, ACT+4, ACTW+1, LOG1+3, LOG1+4
Q BEG+2, BEG1+2, EN+3, EN1+6, ENLOG+5

Naked Globals

Name Field # of Occurrence
^( EN1+4, EN1+7, ACT+5, 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+5*
>> AND EN1+4*
AT EN1+3~, EN1+4*
COU Q!
>> DFN EN+3, ENPR+3, EN1+6, EN1+7, ACT+5, LOG1+4, ENLOG+2, ENLOG+4
DIR EN+3!, ENPR+4!, PAUSE+1!
DIR("A" EN+3*
DIR(0 EN+3*, ENPR+4*, PAUSE+1*
>> DIRUT EN+3
>> DTOUT PAUSE+1
>> DUOUT PAUSE+1
>> HELP BEG+1*, BEG1+1*
I Q!, HDR*
IOSL PAUSE+1, LOG1+3, LOG1+4
IOST EN1+1, ENLOG+4
>> JJ EN1+7*, ACT+1, ACT+5, LOG1+2, LOG1+4, ENLOG+4*
L Q!
N Q!
OD EN1+3~
OG Q!
>> ON EN+2, EN1+2, EN1+4, LOG1+4, ENLOG+2*, ENLOG+4
>> ON55 EN+2*, EN+3, ENPR+3, EN1+6, EN1+7, ACT+5, ENLOG+2*
P1 Q!, EN1+7*, ACT+1, ACT+3, ACT+4, ACT+5*, ACTW+1, 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+5, ENPR+2, ENPR+3, ENPR+4, EN1+1*, PAUSE+1, LOG1+3, LOG1+4, ENLOG+4*
PSIVX Q!, LOG1+4*
PSJDNE EN+5, ENPR+2!, ENPR+3, EN1+1!, EN1+7, ACT+4, ACT+5, PAUSE+1*, ENLOG+4!
PSJHIS EN+4!
>> 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*
U ACT+3
UD EN1+3~
USER Q!
>> X ACT+1*, ACT+3, LOG1+2*
>> Y EN+3, EN+5, 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