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

Package: Inpatient Medications

Routine: PSGPRVR


Information

PSGPRVR ;BIR/CML3-PROVIDER COST TOTALS ;12 DEC 97 / 9:54 AM

Source Information

Source file <PSGPRVR.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Inpatient Medications 5 ENDTS^PSGAMS  ($$ENDDN,$$ENNPN)^PSGMI  ^PSGPRVR0  (ENCV,ENKV)^PSGSETU  EN3^PSGTI  
VA FileMan 2 ^DIC  YN^DICN  
Kernel 1 ^%ZISC  

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 PSJU PRVR  

Entry Points

Name Comments DBIA/ICR reference
DONE ;
ENQ ;
DRG ;
ADD ;
QUES ;
SH ;
SP ;
PAGE ;
SHC ;
SPH ;

External References

Name Field # of Occurrence
^%ZISC PSGPRVR+2
^DIC SP+1
YN^DICN PAGE+1
ENDTS^PSGAMS PSGPRVR+2
$$ENDDN^PSGMI DRG+2
$$ENNPN^PSGMI DRG+1
^PSGPRVR0 ENQ+4
ENCV^PSGSETU PSGPRVR+2
ENKV^PSGSETU DONE+1
EN3^PSGTI PSGPRVR+2

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "Show ALL or SELECTED providers? ALL// "
  • Variable: PSGPRVRF
  • Timeout: DTIME
  • Line Location: SH+1
Function Call: WRITE
  • Prompt: !!,"...SHOW PROVIDERS not selected, report terminated..."
  • Line Location: SH+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SP+1
Function Call: WRITE
  • Prompt: !!,"Select ",$S(PSGPRVRF>0:"another ",1:""),"PROVIDER: "
  • Line Location: SP+1
Function Call: WRITE
  • Prompt: X="^"
  • Condition for execution: '$T $C(7) S:'$T
  • Line Location: SP+1
Function Call: WRITE
  • Prompt: !!,"...PROVIDER(S) not selected, report terminated..."
  • Line Location: SP+2
Function Call: WRITE
  • Prompt: !!?2,"Enter 'YES' to have this report start a new page for each provider printed.",!,"Enter '^' to abort this print now."
  • Line Location: PAGE+1
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: SHC+1
Function Call: WRITE
  • Prompt: " (ALL)"
  • Line Location: SHC+2
Function Call: WRITE
  • Prompt: !!?2,"Enter 'A' (or press RETURN) to show ALL providers on this report. Enter 'S'",!,"to choose which providers you want to show on this report.",!,"PLEASE NOTE: If you choose to select which providers will print, a new "
  • Line Location: SHC+3
Function Call: WRITE
  • Prompt: "page",!,"will automatically be started for each provider."
  • Line Location: SHC+4
Function Call: WRITE
  • Prompt: $P(X,PSGPRVRF,2)
  • Line Location: SHC+5
Function Call: WRITE
  • Prompt: $C(7)," ??"
  • Line Location: SHC+6
Function Call: WRITE
  • Prompt: !!?2,"Select a PROVIDER for which you wish to have cost data print."
  • Line Location: SPH+1
Routine Call
  • DIC
  • Line Location:
    • SP+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(57.6 - [#57.6] ENQ+2, DRG+2
^PSDRUG - [#50] DRG+2
^TMP("PSG" ENQ+1!, ENQ+3, ENQ+4!, ADD+1

Label References

Name Line Occurrences
ADD DRG+2
DRG ENQ+2
ENQ PSGPRVR+2
PAGE SH+3
QUES PSGPRVR+2, SP+3
SHC SH+1
SPH SP+1

Naked Globals

Name Field # of Occurrence
^( ENQ+3!, DRG+2, ADD+1*
^(0 DRG+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PAGE+1*, PAGE+2
DIC SP+1*!
DIC("S" SP+1*
DIC(0 SP+1*
DRG DONE+1!, ENQ+3*, DRG+1*, DRG+2*
DRGN DONE+1!, DRG+2*, ADD+1
DTIME SH+1, SP+1
FD PSGPRVR+2, DONE+1!, ENQ+2
HLP PSGPRVR+2*, DONE+1!
IO PSGPRVR+2
IO("Q" PSGPRVR+2
IO(0 PSGPRVR+2
IOST PSGPRVR+2
ND DONE+1!, DRG+2*, ADD+1
NF DONE+1!, DRG+2*, ADD+1
NU DONE+1!, ADD+1*
P DONE+1!
PG DONE+1!
>> POP PSGPRVR+2
PR DONE+1!, ENQ+2*, ENQ+3*, DRG+1, DRG+2
PRN DONE+1!, DRG+1*, ADD+1
PSGPRVRF PSGPRVR+2, DONE+1!, ENQ+2, QUES+1!*, SH+1*, SH+2, SH+3, SP+1*, SP+2*, SP+3
, PAGE+1, SHC+1*, SHC+2*, SHC+3, SHC+4!, SHC+5*, SHC+6!
PSGPRVRF( ENQ+2, SP+1*
PSGPRVRP PSGPRVR+2, DONE+1!, QUES+1*, SP+4*, PAGE+2*
>> Q ENQ+3*
RTN PSGPRVR+2*, DONE+1!
SD PSGPRVR+2, DONE+1!, ENQ+2
ST DONE+1!, ENQ+2*, DRG+2
STOP DONE+1!
STRT DONE+1!
U DRG+2
W DONE+1!, ENQ+2*, DRG+2
WN DONE+1!
>> X SP+1*, SP+2, SHC+5*
>> XQUIT PSGPRVR+2
>> Y SP+1
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