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

Package: Incomplete Records Tracking

Routine: DGJPDEF3


Information

DGJPDEF3 ;ALB/MAF - TOTALS PAGE FOR REPORTS - SEP 26 1991@1100

Source Information

Source file <DGJPDEF3.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Incomplete Records Tracking 1 QUIT^DGJPDEF  

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 DGJPDEF1  DGJPDEF2  

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^DGJPDEF 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,$J($P(DGJTOT(DGJTOTAL),"^",2),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",?124,"% DELINQ",!
  • 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,"PHYSICIAN DEFICIENCY LIST BY "_$S(DGJTL="PHY":"PHYSICIAN",DGJTL="PAT":"PATIENT",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",?27,"ADMISSION",?40
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,"PATIENT",?23,"PT ID",?31,"ADMISSION",?44
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !,"PHYSICIAN",?23,"PT ID",?31,"ADMISSION",?44
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: "DEFICIENCY"
  • Line Location: HEAD+5
Function Call: WRITE
  • Prompt: ?55,"PHYSICIAN",?70,"EVT DATE"
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: ?70,"EVT DATE"
  • Line Location: HEAD+7
Function Call: WRITE
  • Prompt: ?82,"STATUS",?95,"BORROWER",?107,"PHONE/RM",?121,"D/T CHARGED"
  • Line Location: HEAD+8
Function Call: WRITE
  • Prompt: !,DGJTLN,!
  • Line Location: HEAD+9
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)
^TMP("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 DGJPDEF3+4
LIST DGJPDEF3+4
RELP WR+2
RET1 TOT+2, RELP, PH+1, SV+2
SET DGJPDEF3+4
TOT DGJPDEF3+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 DGJPDEF3+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*
>> DGJTDV HEAD, PH, PH+1, SV, SV+1, SV+2, CNTWR
>> DGJTDV1 HEAD
>> DGJTL HEAD1+1, HEAD+1, HEAD+2, HEAD+3, HEAD+4, HEAD+6, HEAD+7, LIST, WR, CNTWR
>> DGJTLN HEAD1+2, HEAD+9
>> DGJTO30 SET*, TOT+1, DIVTOT*
>> DGJTOREC SET*, TOT+1, DIVTOT*
>> DGJTOT( DGJPDEF3+4, TOT+2
>> DGJTOTAL DGJPDEF3+3*, DGJPDEF3+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 DGJPDEF3+4*
>> DGJTTODY SET*, TOT+1, DIVTOT*
>> DGJTTRN SET*, TOT+1, DIVTOT*
>> DGJX WR*, WR+1, WR+2, DIVTOT
>> DGU DGJPDEF3+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