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
Print Page as PDF
Routine: RTREP1

Package: Record Tracking

Routine: RTREP1


Information

RTREP1 ;JLU/TROY ISC;RPW/BUF;RT Pull List Retrieval Rates; 2-19-87

Source Information

Source file <RTREP1.m>

Entry Points

Name Comments DBIA/ICR reference
RTLP ; Request Loop
APRT ; Alpha Prnt
DPRT ; Institution Print
PRNT ;Summary Print
HDR
INITS2
SS
RSS
CHK

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?9,RTNB
  • Line Location: RTLP+6
Function Call: WRITE
  • Prompt: !,$P(^RTV(194.2,RTPLN,0),U),?48,RTX,?63,$J(RTXP,6,2),"%",?81,RTST(1,"c"),?93,RTST(1,"x"),?109,RTST(1,"n"),?124,RTST(1,"r")
  • Line Location: RTLP+7
Function Call: WRITE
  • Prompt: !!!,"Total Entire Pull List"
  • Line Location: PRNT+3
Function Call: WRITE
  • Prompt: !!,?$X+5,"#Charged:",?$X+5,"#Cancelled:",?$X+5,"#Not Fillable:",?$X+5,"#Requested:",!,?$X+5,"---------",?$X+5,"-----------",?$X+5,"--------------",?$X+5,"-----------"
  • Line Location: PRNT+4
Function Call: WRITE
  • Prompt: !,?$X+9,RTST(0,"c"),?$X+14,RTST(0,"x"),?$X+16,RTST(0,"n"),?$X+16,RTST(0,"r")
  • Line Location: PRNT+5
Function Call: WRITE
  • Prompt: !!!!,"TOTAL REQUESTS=> ",RTX,!!,"RETRIEVAL RATE=> ",$J(RTXP,6,2)," %"
  • Line Location: PRNT+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,?24
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: ?$X+27
  • Condition for execution: IOM=132
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: "***** PULL LIST STATS *****",!,RTINE
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"Pull List: ",$S(RTX1=3:RTLN,RTX1=2:"One Day",RTX1=1:"Date Range"),?44
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?$X+52
  • Condition for execution: IOM=132
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: "Date Ranges: "
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: " to ",$TR($$FMTE^XLFDT(RTDT2,"5DF")," ","0")
  • Condition for execution: RTX1'=3 $TR($$FMTE^XLFDT(RTDT1,"5DF")," ","0") W:$D(RTDT2)&(RTX1'=3)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"Run Date: ",RTDTT,?44
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?$X+52
  • Condition for execution: IOM=132
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "PAGE: ",RTPAGE,!,RTINE
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !!,?6,"Pull List",?42,"Total Requests",?60,"Retrieval Rate",?78,"#Charged",?90,"Cancelled",?103,"Not Fillable",?119,"#Requested"
  • Line Location: INITS2+0
Function Call: WRITE
  • Prompt: !,?6,"---------",?42,"--------------",?60,"--------------",?78,"--------",?90,"----------",?103,"-------------",?119,"----------"
  • Line Location: INITS2+1
Function Call: WRITE
  • Prompt: !,?46,"-----",?63,"---------",?79,"-----",?91,"-----",?107,"-----",?122,"-----"
  • Line Location: SS+2
Function Call: WRITE
  • Prompt: !,?48,RTX2,?63,$J(RTXP2,6,2),"%",?81,RTST(2,"c"),?93,RTST(2,"x"),?109,RTST(2,"n"),?124,RTST(2,"r"),!
  • Line Location: SS+3
Info |  Source |  Entry Points |  Interaction Calls