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

Entry Points

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

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
Info |  Source |  Entry Points |  Interaction Calls