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

Package: Inpatient Medications

Routine: PSIVREC


Information

PSIVREC ;BIR/CCH,PR-RECOMPILE IV STATS ;16 DEC 97 / 1:40 PM

Source Information

Source file <PSIVREC.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Inpatient Medications 2 ENIVKV^PSGSETU  ^PSIVHLP2  
Kernel 1 ^%ZTLOAD  
VA FileMan 1 ^DIC  

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

Package Total Caller Graph
Inpatient Medications 1 PSIVRQ  

Entry Points

Name Comments DBIA/ICR reference
REC
QUE
DONE
LOOKUP
FOUND
ENQ ; done as background job to fix correct cost in stats file 50.8
FNDRG
FIX

External References

Name Field # of Occurrence
^%ZTLOAD QUE+2
^DIC LOOKUP, LOOKUP+1
ENIVKV^PSGSETU DONE
^PSIVHLP2 REC

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Line Location: REC+0
Function Call: WRITE
  • Prompt: !,"Enter Name of Drug to be recompiled"
  • Line Location: REC+0
Function Call: WRITE
  • Prompt: DONE
  • Condition for execution: '$T $C(7) G:'$T!("^"[STR)
  • Line Location: REC+0
Function Call: WRITE
  • Prompt: !
  • Line Location: REC+1
Function Call: WRITE
  • Prompt: !,NM
  • Line Location: LOOKUP+0
Function Call: WRITE
  • Prompt: !!,NM_" NOT FOUND"
  • Line Location: LOOKUP+1
Function Call: WRITE
  • Prompt: !,$P(Y(0),"^")_" in the "_$S(DIC[52.6:"Additive",1:"Solution")_" File"
  • Line Location: FOUND+0
Routine Call
  • DIC
  • Line Location:
    • LOOKUP
    • LOOKUP+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.6 - [#52.6] Classic Fileman Calls
^PS(52.7 - [#52.7] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS( FIX
^PS(50.8 - [#50.8] ENQ+1, FNDRG, FIX*

Label References

Name Line Occurrences
DONE REC, ENQ+2
FIX FNDRG, FNDRG+1
FNDRG ENQ+1
LOOKUP REC+1
REC REC, REC+1

Naked Globals

Name Field # of Occurrence
^( FIX

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DONE!
ADDSTR REC+1*, DONE!, FOUND+1*, FNDRG
C DONE!
COST DONE!, FIX*
D DONE!, FNDRG*, FNDRG+1*, FIX
DA DONE!, FIX*
DAT DONE!, ENQ+1*, FNDRG, FIX
DATA DONE!
DIC LOOKUP!*, LOOKUP+1*!, FOUND, FOUND+1, FOUND+3!
DIC("W" LOOKUP*, LOOKUP+1*
DIC(0 LOOKUP*
DTIME REC
FLE DONE!, FNDRG*, FNDRG+1*, FIX
G QUE+1*, DONE!
HELP REC*, DONE!
I7 DONE!, ENQ+1
I8 DONE!, ENQ+1
IV DONE!, ENQ+1*, FNDRG, FIX
NM REC+1*, DONE!, LOOKUP, LOOKUP+1
PCE DONE!, FNDRG*, FNDRG+1*
SOLSTR REC+1*, DONE!, FOUND+2*, FNDRG+1
STR REC*, REC+1, DONE!
X DONE!, LOOKUP*, LOOKUP+1*
Y DONE!, LOOKUP+1, FOUND+1, FOUND+2
Y(0 FOUND
Z REC+1*, DONE!
>> ZTDESC QUE*
>> ZTDTH QUE*
>> ZTIO QUE*
>> ZTQUEUED ENQ+2
>> ZTREQ ENQ+2*
>> ZTRTN QUE*
>> ZTSAVE( QUE+1*
ZTSK QUE+2, DONE!
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