Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

Entry Points

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

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

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
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call