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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSGPR

Package: Inpatient Medications

Routine: PSGPR


Information

PSGPR ;BIR/CML3-PATIENT PROFILE ;29-May-2012 14:31;PLS

Source Information

Source file <PSGPR.m>

Call Graph

Call Graph Total: 17

Package Total Call Graph
Inpatient Medications 12 (,BOT,ENPR)^PSGO  ENVO^PSGOE0  (ENGORD,ENL)^PSGOU  ^PSGSEL  (ENCV,ENKV)^PSGSETU  ENDEV^PSGTI  L^PSGVBW  EN2^PSGVW  
(ALC,ENA)^PSGVW0  ^PSJAC  (G,P,RBPPN,W)^PSJPDIR  READ^PSJUTL  
VA Fileman 2 ^DIC  ^DIR  
IHS Changes To Pharmacy 1 SETPTCX^APSPFUNC  
Kernel 1 ^%ZISC  
Registration 1 ^VADPT  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Inpatient Medications 4 PSGOE5  PSJU OR PAT PR  PSJU OR PR  PSJU PR  

Entry Points

Name Comments DBIA/ICR reference
C ;
ENDEV ;
ENLM
PW ;
G ; get ward group
P ; get patient
PC
PP ;
CDIC ;
PP0 ;
L ;
ENQ ;
PP1 ;
SET ;
DONE ;
PG ;
W ; get ward
GO ;
PH ;
ENOR
PL

External References

Name Field # of Occurrence
^%ZISC ENQ+2
SETPTCX^APSPFUNC PP0+1
^DIC CDIC+1
^DIR GO+2, C+2, PP1+3
^PSGO PW+3
BOT^PSGO PP0+6
ENPR^PSGO PP0+2
ENVO^PSGOE0 PW+3
ENGORD^PSGOU PP0+2
ENL^PSGOU PSGPR+18, ENLM+4
^PSGSEL PSGPR+11
ENCV^PSGSETU PSGPR+8, ENLM+2
ENKV^PSGSETU DONE+1
ENDEV^PSGTI ENDEV+2
L^PSGVBW L+1
EN2^PSGVW PP1+2
ALC^PSGVW0 GO+3
ENA^PSGVW0 PP1+2
^PSJAC PG+4, PW+3, SET+2, ENLM+4
G^PSJPDIR PSGPR+12
P^PSJPDIR PSGPR+12
RBPPN^PSJPDIR PSGPR+15
W^PSJPDIR PSGPR+12
READ^PSJUTL PW+3, PP0+3, ENLM+7
^VADPT ENLM+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: GO+2
Function Call: READ
  • Timeout: DTIME
  • Line Location: GO+3
Function Call: WRITE
  • Prompt: !
  • Line Location: C+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PP1+3
Function Call: WRITE
  • Prompt: !!?2,"Enter a 'P' to print ONLY the PROFILE of orders for this patient. Enter an",!,"'E' to print ONLY the EXPANDED VIEW of the orders for this patient. Enter a",!,"'B' to have BOTH the profile (first) and the expanded views print."
  • Line Location: PH+1
Function Call: WRITE
  • Prompt: " Enter an '^'to exit."
  • Line Location: PH+2
Routine Call
  • DIC
  • Line Location:
    • CDIC+1
Routine Call
  • DIR
  • Line Location:
    • GO+2
    • C+2
    • PP1+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SC - [#44] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] PG+1
^DPT - [#2] PG+3, PW+2, PC+1, ENLM+3
^DPT("CN" PG+2, PW+2
^PS(53.1 - [#53.1] PC+1
^PS(57.5 - [#57.5] PG+1
^PS(57.7 - [#57.7] PW+5, SET+1
^PS(57.8 - [#57.8] PL
^SC - [#44] PC
^TMP("PSG" PP0+3, PP0+5, PP0+6!
^TMP("PSGPR" DONE+1!, ENQ+1!, PG+3*, PG+4*, PG+5, PW+6, PC+3, SET+2*, SET+3*
^TMP("PSJSELECT" PSGPR+11!

Label References

Name Line Occurrences
@( PSGPR+18, ENQ+2
DONE ENDEV+2, ENQ+3, ENLM+7
ENDEV GO+1
GO PSGPR+18, ENLM+6
PC PL
PP0 PG+5, PW+6, PC+3, PP+1
PP1 PP0+5
SET PW+4, PW+5, PC+2

Naked Globals

Name Field # of Occurrence
^(0 PG+1, PC

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTION PSGPR+5~
AND DONE+1!
AT DONE+1!, GO+3*, PP1+2*
ATM ENQ+2~
C DONE+1!
CA DONE+1!
>> CG PL
>> CL CDIC+1*, PL*, PC, PC+1
CONT PSGPR+5~
>> DFN ENOR*, ENLM+3, ENLM+6
DIC CDIC+1!*
DIC(0 CDIC+1*
DIR GO+2!, C+1!
DIR("?" GO+2*, C+2*
DIR("A" GO+2*, C+1*
DIR("B" GO+2*
DIR(0 GO+2*, C+1*, PP1+3*
>> DIRUT PP1+3
DOB DONE+1!
DRGI DONE+1!
DTIME GO+3
FQC DONE+1!
HDT DONE+2!
IO ENQ+2, PP0+2
IO("Q" ENDEV+2
IO(0 ENQ+2
IOF ENQ+2
IOST ENQ+2
LD PSGPR+5~
LN2 PSGPR+5~
MF DONE+1!
ND DONE+1!
NF DONE+1!
O DONE+1!
OD DONE+2!
ON DONE+1!
>> ORVP ENOR
PAT PSGPR+5~, P+1~*, PP+1*
PDRG DONE+2!
PFLG PSGPR+5~
PG DONE+1!
PN DONE+1!
>> POP ENDEV+2
PPAGE PSGPR+5~, PSGPR+10*, PSGPR+18*, ENLM~, ENLM+1*
PRI DONE+1!
PSGAPTM DONE+2!
PSGAPTM( W+2*
PSGLI PSGPR+4~
PSGODT DONE+2!
PSGOE PSGPR+4~
PSGOEEWF PSGPR+4~
PSGOEPRF PSGPR+5~, DONE+1, ENDEV+2, ENQ+3, ENLM~
PSGOH PSGPR+4~
PSGOL PSGPR+18, DONE+2!, ENLM+4
PSGON DONE+1!, PW+3
PSGONC DONE+1!, PW+3*
>> PSGONF PW+3*
PSGONR DONE+1!, PW+3*
PSGONV DONE+1!, PW+3*
PSGORD DONE+1!, PP1+2*
PSGOS DONE+2!
>> PSGP PSGPR+10*, PSGPR+18*, P+1, PG+2*, PG+3, PG+4, PG+5*, PW+2*, PW+6*, PC+1*
, PC+3*, SET+2, SET+3, PP+1*, PP0+1, ENOR*
>> PSGP( P+1*, PP+1, ENLM+6*
>> PSGP(0 PG+4, SET+2, ENLM+6!
PSGPATM DONE+2!, PW+4
PSGPATM( PW+1*, PW+5
PSGPATM("ALL" PW+5
PSGPR PSGPR+10*, DONE+2!, ENQ+2*, PW+3, PP0+3, PP0+6, PP1+3
PSGPRA DONE+2!, GO+1*, GO+3*, GO+4, PP1+2
PSGPRF PW+3*!
PSGPRP DONE+2!, GO+1*, GO+2*, GO+3, PW+3, PP0+2
PSGPRWD PSGPR+10*, DONE+2!, W+1*, PG+1*, PW+5, SET+1, ENLM+5*
PSGPRWDN PSGPR+10*, DONE+2!, W+1*, PG+1*, PG+2, PG+3, PG+4, PW+2, ENLM+5*
PSGPRWG PSGPR+10*, DONE+2!, G+1*, PG+1, ENLM+5*
PSGPRWGN PSGPR+10*, DONE+2!, G+1*, ENLM+5*
PSGPTMP PSGPR+5~, PSGPR+10*, PSGPR+18*, ENLM~, ENLM+1*
PSGSEL DONE+1!
PSGSS PSGPR+11, PSGPR+17, PSGPR+18, DONE+2!, GO+1*, ENQ+2, PP0+3, ENLM+5*
PSGSSH PSGPR+10*, DONE+2!
>> PSGTIR ENDEV+1*
PSGVBY ENQ+2!
PSGWD PSGPR+4~
PSGX PG+5~*, PW+6~*, PC+3~*
PSJACNWP PW+3~*
PSJNEW PSGPR+5~*, ENLM~*
>> PSJNKF ENLM+7*
PSJOPC PSGPR+7*, DONE+2!, ENLM+1*
PSJPWDO PSGPR+4~
PSJSEL PSGPR+11!, DONE+2!
PSJSEL("P" PSGPR+17, P+1, ENLM+3*
PSJSEL("RBP" ENQ+2
PSJSEL("SELECT" PSGPR+10, PSGPR+11*, PSGPR+12, PSGPR+15, GO+1, ENLM+3*
PSJSEL("TM" W+2, PW+1
PSJSEL("W" W+1
PSJSEL("WG" G+1
PSJSTOP PSGPR+4~, PSGPR+11*, PSGPR+14, PSGPR+16
PSJTEAM PSGPR+4~
PX DONE+1!
>> Q GO+3
QFLG DONE+2!
RB ENQ+2~, PG+3*, PW+2*, PW+5, PC+1*, SET+1*, SET+3
RBP ENQ+2~*, PG+3, PG+4, SET+2, SET+3
RCT DONE+2!
RF DONE+2!
S1 DONE+2!, PP0+4*, PP0+5*, PP1+2, PP1+3*
S2 DONE+2!, PP0+4*, PP0+5*, PP1+3*
S3 DONE+2!, PP0+4*, PP0+5*, PP1+2, PP1+3*
S4 DONE+2!
SD DONE+2!
SLS DONE+2!
SSN DONE+2!
TF DONE+2!
TM DONE+2!, W+2*, PW+1*, PW+2*, PW+5*, PC+1*, SET+1*, SET+2, SET+3
U ENLM+3
UD DONE+2!
UDU DONE+2!
WD PSGPR+18*, DONE+2!
>> WDN PC*
WDP DONE+2!
>> WG PSGPR+18*
WT DONE+2!
>> X ENDEV+1*, CDIC+2, PG+5, PW+3, PW+6, PC+3, PP+1, PP0+4*, PP0+6, PP1+3*
>> XQUIT PSGPR+10, ENLM+2
Y PSGPR+11!, PSGPR+17, PSGPR+18, GO+2, CDIC+1
>> ZTDESC ENDEV+1*
ZTOUT DONE+2!
ZTSAVE ENDEV+1!
ZTSAVE( ENDEV+1*
ZTSK DONE+2!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All