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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: DGJOTP3

Package: Incomplete Records Tracking

Routine: DGJOTP3


Information

DGJOTP3 ;ALB/MAF - TOTALS PAGE FOR TRANS PROD REPORT ; SEP 26 1991@1100

Source Information

Source file <DGJOTP3.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Incomplete Records Tracking 1 QUIT^DGJOTP  

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

Package Total Caller Graph
Incomplete Records Tracking 2 DGJOTP1  DGJOTP2  

Entry Points

Name Comments DBIA/ICR reference
QUIT
SET
TOT
HEAD1
RET1
RELP
HEAD
PH
SV
LIST
WR
EXT
CNTWR
DIVTOT

External References

Name Field # of Occurrence
QUIT^DGJOTP QUIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"------------------------",?30,"-------",?45,"-------",?60,"-------",?75,"-------",?88,"-------",?100,"-------",?112,"-------",?125,"-------"
  • Line Location: TOT+0
Function Call: WRITE
  • Prompt: !,"DIVISION TOTAL",?30
  • Line Location: TOT+1
Function Call: WRITE
  • Prompt: ?45
  • Line Location: TOT+1
Function Call: WRITE
  • Prompt: ?45
  • Line Location: TOT+1
Function Call: WRITE
  • Prompt: ?45
  • Line Location: TOT+1
Function Call: WRITE
  • Prompt: ?45
  • Line Location: TOT+1
Function Call: WRITE
  • Prompt: ?100,$J(+DGJTOT(DGJTOTAL),7),?112,$S($P(DGJTOT(DGJTOTAL),"^",2)]"":$J($P(DGJTOT(DGJTOTAL),"^",2),7),1:$J(0,7)),?125
  • Line Location: TOT+2
Function Call: WRITE
  • Prompt: @IOF,"TOTALS PAGE FOR "_DGJTOTAL,?100,DGJTDAT,!
  • Line Location: HEAD1+0
Function Call: WRITE
  • Prompt: $S(DGJTL="PHY":"PHYSICIAN",1:"SERVICE/SPECIALTY"),?30,"AVG DAYS",?45,"AVG DAYS",?60,"AVG DAYS",?75,"AVG TOT",?88,"AVG DAYS",?100,"TOT REC",?111,"REC DELQ",?123,"% DELQ>30",!
  • Line Location: HEAD1+1
Function Call: WRITE
  • Prompt: ?30,"D/C-DIC",?45,"DIC-TRAN",?60,"TRAN-COD",?75,"DAYS DELQ",?88,"DELQ>30",!,DGJTLN
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: RET1+0
Function Call: READ
  • Formatting: ?22
  • Prompt: "Enter <RET> to continue or ^ to QUIT "
  • Variable: X
  • Timeout: DTIME
  • Line Location: RET1+2
Function Call: WRITE
  • Prompt: @IOF,"TRANSCRIPTION PRODUCTIVITY REPORT BY "_$S(DGJTL="PHY":"PHYSICIAN",1:"SERVICE/SPECIALTY"),?97,DGJTDAT," ","PAGE "
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: DGJTPAG
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !,"PATIENT",?19,"PT ID",?26,"EVT DATE",?39
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,"PATIENT",?23,"PT ID",?31,"EVT DATE",?44
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: "LOCATION"
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: ?53,"PHYSICIAN"
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: ?65,"TYP"
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: ?70,"STATUS"
  • Condition for execution: DGJTDIR=2
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: ?78,"DIC DATE",?88,"D/C-DIC",?97,"DIC-TRN",?106,"TRN-COD",?115,"TOT DAYS",?125,"DELQ>30",!,DGJTLN,!
  • Line Location: HEAD+7
Function Call: WRITE
  • Prompt: !,"------------------------",!,"COUNT: ",DGJSPTOT(DGJTDV,DGJTSV,DGJTSP)
  • Line Location: SV+0
Function Call: WRITE
  • Prompt: !,$E(DGJDOC,1,20),?30
  • Line Location: WR+0
Function Call: WRITE
  • Prompt: ?45
  • Line Location: WR+0
Function Call: WRITE
  • Prompt: ?45
  • Line Location: WR+0
Function Call: WRITE
  • Prompt: ?75
  • Line Location: WR+1
Function Call: WRITE
  • Prompt: ?88
  • Line Location: WR+1
Function Call: WRITE
  • Prompt: ?100,$J($P(DGJX,"^",1),7),?112
  • Line Location: WR+2
Function Call: WRITE
  • Prompt: ?125
  • Line Location: WR+2
Function Call: WRITE
  • Prompt: $J(X,7)
  • Line Location: EXT+1
Function Call: WRITE
  • Prompt: $J(X,7)
  • Line Location: EXT+2
Function Call: WRITE
  • Prompt: ?70,"AVG DAYS"
  • Line Location: CNTWR+0
Function Call: WRITE
  • Prompt: ?88
  • Line Location: CNTWR+0
Function Call: WRITE
  • Prompt: ?97
  • Line Location: CNTWR+1
Function Call: WRITE
  • Prompt: ?106
  • Line Location: CNTWR+1
Function Call: WRITE
  • Prompt: ?106
  • Line Location: CNTWR+1
Function Call: WRITE
  • Prompt: ?106
  • Line Location: CNTWR+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^UTILITY("VAS" PHSVSV+1

Label References

Name Line Occurrences
CNTWR PH+1, SV+2
DIVTOT WR+2
EXT TOT+1, TOT+2, WRWR+1, WR+2, CNTWRCNTWR+1
HEAD RELP
HEAD1 DGJOTP3+4, RELP
LIST DGJOTP3+4
RELP WR+2
RET1 TOT+2, RELPPH+1, SV+2
SET DGJOTP3+4
TOT DGJOTP3+4
WR LIST

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN PHSV
>> DGFLAG RET1+2*
>> DGJ2CNT CNTWR*, CNTWR+1
>> DGJCNTX CNTWR*, CNTWR+1
>> DGJDOC DGJOTP3+3*, LIST*, WR
>> DGJJX WR*, WR+1
>> DGJPHTOT( PH+1, LISTWRCNTWR
>> DGJSPTOT( SV
>> DGJSVTOT( SV+2, LISTWRCNTWR
>> DGJTCOD SET*, TOT+1, DIVTOT*
>> DGJTDAT HEAD1HEAD+1
>> DGJTDIC SET*, TOT+1, DIVTOT*
>> DGJTDIR HEAD+1*, HEAD+6
>> DGJTDV HEADPHPH+1, SVSV+1, SV+2, CNTWR
>> DGJTDV1 HEAD
>> DGJTL HEAD1+1, HEAD+1, HEAD+2, HEAD+3, HEAD+5, LISTWRCNTWR
>> DGJTLN HEAD1+2, HEAD+7
>> DGJTLPG RELP
>> DGJTO30 SET*, TOT+1, DIVTOT*
>> DGJTOREC SET*, TOT+1, DIVTOT*
>> DGJTOT( DGJOTP3+4, TOT+2
>> DGJTOTAL DGJOTP3+3*, DGJOTP3+4*, TOT+2, HEAD1LISTWR
>> DGJTPAG HEAD*, HEAD+1*
>> DGJTPHY PHPH+1, CNTWR
>> DGJTPT PHSV
>> DGJTSP SVSV+1
>> DGJTSV SVSV+1, SV+2, CNTWR
>> DGJTTI LIST*
>> DGJTTO DGJOTP3+4*
>> DGJTTODY SET*, TOT+1, DIVTOT*
>> DGJTTRN SET*, TOT+1, DIVTOT*
>> DGJX WR*, WR+1, WR+2, DIVTOT
>> DGU DGJOTP3+4, TOT+2, RET1+2*, RELPLISTWR+2
DTIME RET1+2
>> IFN PHSV
IOF HEAD1HEAD+1
IOSL RET1RELP
IOST RET1+1, RELPPH+1, SV+2
>> X TOT+1*, TOT+2*, RET1*, RET1+2*, WR*, WR+1*, WR+2*, EXT*, EXT+1*, EXT+2
, CNTWR*, CNTWR+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All