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 |  Local Variables |  All
Print Page as PDF
Routine: PSOCSTX

Package: Outpatient Pharmacy

Routine: PSOCSTX


Information

PSOCSTX ;BHAM ISC/SAB - COMMON CALL FOR ALL THE COST REPORTS ; 09/09/99 08:00

Source Information

Source file <PSOCSTX.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 5 ^%DT  ^%DTC  ^DIC  DT^DIO2  ^DIR  
Kernel 2 ^%ZIS  ^%ZISC  
Outpatient Pharmacy 1 (FTT,FTU)^PSOCSTX  

Caller Graph

Caller Graph Total: 10

Package Total Caller Graph
Outpatient Pharmacy 10 PSOCST11  PSOCST12  PSOCST2  PSOCST3  PSOCST4  PSOCST5  PSOCST6  PSOCST8  
PSOCST9  PSOCSTX  

Entry Points

Name Comments DBIA/ICR reference
PAS
CTP
SUB
CTR ;Check for valid month selection
DRS
CMC
DVC
HDC
HDN
DVS
CDT
PRT
PRV
HD
PTS
FTU
FTT
FTX
EX
HD0
ZER
TOT

External References

Name Field # of Occurrence
^%DT CDT, CDT+3
^%DTC CDT+4
^%ZIS DVC
^%ZISC EX
^DIC DRS+1, PRV+1, PTS+1, DVS+1
DT^DIO2 CTP, HD0+1
^DIR CTR+8, CMC+3, CTP+5, HD0
FTT^PSOCSTX FTX
FTU^PSOCSTX FTX

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: CDT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: CDT+3
Function Call: WRITE
  • Prompt: !!,"Report for the period: "
  • Line Location: CTP+0
Function Call: WRITE
  • Prompt: " to "
  • Line Location: CTP+0
Function Call: WRITE
  • Prompt: " to "
  • Line Location: CTP+0
Function Call: WRITE
  • Prompt: !!,$G(TT1),!,$G(TT2),!
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: @IOF,!,$G(TT0)
  • Line Location: HD0+1
Function Call: WRITE
  • Prompt: " to "
  • Line Location: HD0+1
Function Call: WRITE
  • Prompt: " to "
  • Line Location: HD0+1
Function Call: WRITE
  • Prompt: ?$S(RP=12:90,1:71),"Page: ",PAGE
  • Line Location: HD0+2
Function Call: WRITE
  • Prompt: !!,"**No Data Found for Requested Date Range for "
  • Line Location: HDN+0
Function Call: WRITE
  • Prompt: TTA_" ",@TTC
  • Line Location: HDN+1
Function Call: WRITE
  • Prompt: "All "_TTA_"s"
  • Line Location: HDN+2
Function Call: WRITE
  • Prompt: "**",!!
  • Line Location: HDN+3
Function Call: WRITE
  • Prompt: !,$G(TTX),?(C1-1),$J($P(Y,"^",2),5),?(C2-1),$J($P(Y,"^",3),5),?(C3-1),$J(FILLS,5),?59,$J($P(Y,"^",4),10,2),?72
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: $J(AVG,8,2)
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: !,"Total"
  • Line Location: FTX+0
Function Call: WRITE
  • Prompt: !
  • Line Location: FTX+0
Function Call: WRITE
  • Prompt: !,?(C1-1),"-----",?(C2-1),"-----",?(C3-1),"-----",?59,"----------",?72,"--------"
  • Line Location: FTU+0
Function Call: WRITE
  • Prompt: ?(C1-1),$J(CNTO,5),?(C2-1),$J(CNTR,5),?(C3-1),$J(CNT,5),?59,$J(COST,10,2),?72
  • Line Location: FTT+0
Function Call: WRITE
  • Prompt: $J(AVG,8,2)
  • Line Location: FTT+0
Routine Call
  • DIC
  • Line Location:
    • DRS+1
    • PRV+1
    • PTS+1
    • DVS+1
Routine Call
  • DIR
  • Line Location:
    • CTR+8
    • CMC+3
    • CTP+5
    • HD0
Routine Call
  • %ZIS
  • Line Location:
    • DVC

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^PSDRUG - [#50] Classic Fileman Calls
^PS(53 - [#53] Classic Fileman Calls
^PS(59 - [#59] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J EX+1!

Label References

Name Line Occurrences
CMC DRS, PRV, PTS, DVS
CTR CDT+1
EX HDN+3
FTX TOT
HD TOT
HD0 HD

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT CDT!*, CDT+3*, EX+2!
%DT("A" CDT*, CDT+3*
%DT(0 CDT*
%ZIS DVC!*, EX+1!
ANS EX+1!
AVG PRT+1*, FTT*, EX+1!, SUB*
BEGDATE CDT*, CDT+2*, CTR+9*, CTP, HD0+1, EX+1!
C1 HDC+5*, HDC+6*, HDC+8, HDC+9, PRT+1, FTU, FTT, EX+2!
C2 HDC+5*, HDC+6*, HDC+9, PRT+1, FTU, FTT, EX+2!
C3 HDC+5*, HDC+6*, HDC+8, HDC+9, PRT+1, FTU, FTT, EX+2!
CLA EX+2!
CLAX EX+2!
CNT PRT*, FTT, EX+1!, SUB*, TOT*, ZER*
CNTO PRT*, FTT, EX+1!, SUB*, TOT*, ZER*
CNTR PRT*, FTT, EX+1!, SUB*, TOT*, ZER*
COST PRT*, FTT, EX+1!, SUB*, TOT*, ZER*
CTR CDT*, CDT+1, CDT+3*, CTR+8*, CMC+3*, DRS, DRS+1*, CTP+5*, PRV, PRV+1*
, PTS, PTS+1*, HD0*, HDC*, DVC*, EX+1!, EX+2!, DVS, DVS+1*
DIC DRS+1*!, PRV+1*!, PTS+1*!, EX+1!, DVS+1*!
DIC("A" DRS+1*, PRV+1*, PTS+1*, DVS+1*
DIC("S" PRV+1*
DIC(0 DRS+1*, PRV+1*, PTS+1*, DVS+1*
DIR CTR+1!, CTR+8!, CMC!, CMC+3!, CTP+1!, CTP+5!
DIR("?" CTR+4*, CTR+5*, CTR+6*, CTR+7*, CMC+1*, CMC+2*, CTP+2*, CTP+3*, CTP+4*
DIR("A" CTR+1*, CTR+2*, CTR+3*, CMC*, CTP+1*
DIR("B" CTR+1*, CMC*, CTP+1*
DIR(0 CTR+1*, CMC*, CTP+1*, HD0*
>> DIRUT HD0
DIV EX+2!, DVS+1*
DIVX EX+2!
DRUG DRS+1*, EX+1!
DRUGX EX+1!
DT CDT, CDT+1, CDT+2, CDT+4, CDT+5, CDT+6, HD0+1
>> DTOUT CDT, CDT+3, CTR+8, CMC+3, CTP+5
>> DUOUT CTR+8, CMC+3, CTP+5
ENDDATE CDT+4*, CDT+5*, CDT+6*, CTP, HD0+1, EX+1!
FILLS PRT*, PRT+1, EX+1!
G EX+1!, PAS*
I HD+1*, EX+1!
IFN CMC+3*, DRS+1, PRV+1, PTS+1, HDN+1, EX+1!, DVS+1*
IFNX EX+1!
IOF HD0+1, EX
ION DVC
IOP DVC!*
IOSL TOT
IOST HD0, EX
PAGE HD0, HD0+2*, HDC*, EX+1!
PGM EX+1!
PHY PRV+1*, EX+1!
PHYX EX+1!
POP DVC!, EX+1!
PSDT EX+1!
PSI EX+1!
PSOION DVC*!
QUIT CDT!
RP CTP+5*, HD0+2, HDC, HDC+1, HDC+2, HDC+3, HDC+4, HDC+5, EX+1!, EX+2!
RRM CTP+1, HD+1, HDC*, EX+2!
STA PTS+1*, EX+2!
STAX EX+2!
T1 EX+2!, SUB*, TOT, ZER*
T2 EX+2!, SUB*, TOT, ZER*
T3 EX+2!, SUB*, TOT, ZER*
T4 EX+2!, SUB*, TOT, ZER*
TT HDC+1*, HDC+7, HDC+9, EX+2!
TT0 HD0+1, HDC+7*, EX+2!
TT1 HD+1, HDC+8*, EX+2!
TT2 HD+1, HDC+9*, EX+2!
TTA CMC, CMC+1, HDC+2*, HDC+3, HDN+1, HDN+2, EX+2!
TTB CMC+2, HDC+3*, EX+2!
TTC HDC+4*, HDN+1, EX+2!
TTX PRT+1, EX+2!
UTL EX+2!
VAL EX+2!
VAR EX+2!
X CDT+5, EX+2!
>> X1 CDT+4*
>> X2 CDT+4*
Y CDT, CDT+1, CDT+3, CDT+4, CDT+5, CDT+6, CTR+8, CMC+3, DRS+1, CTP*
, CTP+5, PRV+1, PTS+1, HD0+1*, PRT, PRT+1, EX+2!, DVS+1
ZTDESC EX+2!
>> ZTQUEUED EX+2
>> ZTREQ EX+2*
ZTRTN EX+2!
>> ZTSAVE( PAS*
ZTSK DVC!, EX+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 |  Local Variables |  All