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

Package: CMOP

Routine: PSXTNRPT


Information

PSXTNRPT ;BIR/WPB-Routine to Provide Turnaround Reports at Host & Remote Facilities ; 04/08/97 2:06 PM

Source Information

Source file <PSXTNRPT.m>

Entry Points

Name Comments DBIA/ICR reference
REMOTE
R1
DEVICE
QUE
REMOTE1
RPT1
EXIT
HOST
HOST1
RPT
STHMS(X)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: R1+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: R1+1
Function Call: WRITE
  • Prompt: !,"Beginning date must be before ending date."
  • Line Location: R1+3
Function Call: WRITE
  • Prompt: !,"You must select a printer."
  • Line Location: DEVICE+0
Function Call: WRITE
  • Prompt: !!,"Job Canceled"
  • Line Location: QUE+2
Function Call: WRITE
  • Prompt: !!,"Job Queued"
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: REMOTE1+15
Function Call: WRITE
  • Prompt: !!!,"TURNAROUND TIME FOR PERIOD"
  • Line Location: RPT1+0
Function Call: WRITE
  • Prompt: !,$$FMTE^XLFDT(BB,"1P")," - ",$$FMTE^XLFDT(EE,"1P")
  • Line Location: RPT1+1
Function Call: WRITE
  • Prompt: !,"No Rx's completed during this period."
  • Line Location: RPT1+2
Function Call: WRITE
  • Prompt: !!,"Total Rx's Completed : ",CNT
  • Line Location: RPT1+3
Function Call: WRITE
  • Prompt: !,"Maximum turnaround time: ",LTT," Rx: ",$P(^PSRX(LRX,0),"^",1)
  • Line Location: RPT1+4
Function Call: WRITE
  • Prompt: !,"Minimum turnaround time: ",STT," Rx: ",$P(^PSRX(SRX,0),"^",1)
  • Line Location: RPT1+5
Function Call: WRITE
  • Prompt: !,"Average turnaround time: ",AVTTM
  • Line Location: RPT1+6
Function Call: WRITE
  • Prompt: !!,"Number of Rx's missing refill node: ",CNTA
  • Line Location: RPT1+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: HOST+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RPT+0
Function Call: WRITE
  • Prompt: !!!,"TURNAROUND TIME REPORT FOR "_SNAME
  • Line Location: RPT+1
Function Call: WRITE
  • Prompt: !,"FOR "_$$FMTE^XLFDT(BB,"1P")," - ",$$FMTE^XLFDT(EE,"1P")
  • Line Location: RPT+2
Function Call: WRITE
  • Prompt: !!,"No Rx's completed during this time period."
  • Line Location: RPT+3
Function Call: WRITE
  • Prompt: !!,"Total Rx's Completed : ",CNT
  • Line Location: RPT+4
Function Call: WRITE
  • Prompt: !,"Number of Rx's not processed at remote: ",CNTA
  • Line Location: RPT+5
Function Call: WRITE
  • Prompt: !,"Maximum turnaround time: ",$P($$STHMS^PSXTNRPT(LT),".")," Rx: ",LRX
  • Line Location: RPT+6
Function Call: WRITE
  • Prompt: !,"Minimum turnaround time: ",$P($$STHMS^PSXTNRPT(ST),".")," Rx: ",SRX
  • Line Location: RPT+7
Function Call: WRITE
  • Prompt: !,"Average turnaround time: ",$P($$STHMS^PSXTNRPT(AVT),"."),!
  • Line Location: RPT+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSX(552 - [#552] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call