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" PH, SV, SV+1

Label References

Name Line Occurrences
CNTWR PH+1, SV+2
DIVTOT WR+2
EXT TOT+1, TOT+2, WR, WR+1, WR+2, CNTWR, CNTWR+1
HEAD RELP
HEAD1 DGJOTP3+4, RELP
LIST DGJOTP3+4
RELP WR+2
RET1 TOT+2, RELP, PH+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 PH, SV
>> DGFLAG RET1+2*
>> DGJ2CNT CNTWR*, CNTWR+1
>> DGJCNTX CNTWR*, CNTWR+1
>> DGJDOC DGJOTP3+3*, LIST*, WR
>> DGJJX WR*, WR+1
>> DGJPHTOT( PH+1, LIST, WR, CNTWR
>> DGJSPTOT( SV
>> DGJSVTOT( SV+2, LIST, WR, CNTWR
>> DGJTCOD SET*, TOT+1, DIVTOT*
>> DGJTDAT HEAD1, HEAD+1
>> DGJTDIC SET*, TOT+1, DIVTOT*
>> DGJTDIR HEAD+1*, HEAD+6
>> DGJTDV HEAD, PH, PH+1, SV, SV+1, SV+2, CNTWR
>> DGJTDV1 HEAD
>> DGJTL HEAD1+1, HEAD+1, HEAD+2, HEAD+3, HEAD+5, LIST, WR, CNTWR
>> 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, HEAD1, LIST, WR
>> DGJTPAG HEAD*, HEAD+1*
>> DGJTPHY PH, PH+1, CNTWR
>> DGJTPT PH, SV
>> DGJTSP SV, SV+1
>> DGJTSV SV, SV+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*, RELP, LIST, WR+2
DTIME RET1+2
>> IFN PH, SV
IOF HEAD1, HEAD+1
IOSL RET1, RELP
IOST RET1+1, RELP, PH+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