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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SCRPW3

Package: Scheduling

Routine: SCRPW3


Information

SCRPW3 ;RENO/KEITH,BWF - Clinic Utilization Statistical Summary (cont.) ;MAY 13, 2023

Source Information

Source file <SCRPW3.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 $$S^%ZTLOAD  $$DOW^XLFDT  
Registration 1 $$PRIM^VASITE  
Scheduling 1 (FOOT,HDR)^SCRPW2  
VA FileMan 1 (C,H)^%DTC  

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

Package Total Caller Graph
Scheduling 1 SCRPW2  

Entry Points

Name Comments DBIA/ICR reference
START ;Print statistics
STOP ;Check for stop task request
AC ;Evaluate all clinics
A1
SC ;Evaluate selected clinics
RC ;Evaluate a range of clinics
RS ;Evaluate a range of stop codes
RC1
CG ;Evaluate by clinic group
DIV() ;Check division
CNT ;Evaluate a clinic
CCPAT ;Count clinic patterns and patients
CTPAT(SDDAY) ;Count slots in availability pattern and master pattern
PCT(SDPATT) ;Pattern count
ADJUST ;SD*562 calculate clinic capacity for partially cancelled day
SET ;Set stats into ^TMP global
SET1(SDIV)
CLINE ;Print a clinic statistics line
F1
PLINE ;Print a provider statistics line
ACT ;Count appointments, addl. variable appt. slots and no-shows
SPAT(SC,SDSTRTDT,MAX,SDS) ;Set patterns into ^TMP (modified clone of OVR^SDAUT1)
EN1
X1
W
W1
L
H
WM
ACTIVE(X,SDIN,SDRE) ;Determine if the clinic is active on a given date

External References

Name Field # of Occurrence
C^%DTC SPAT+14, X1+1, L
H^%DTC CTPAT+8
$$S^%ZTLOAD STOP+1
FOOT^SCRPW2 START+2, START+4, START+7, CLINE+1, PLINE+1
HDR^SCRPW2 START+2, START+5, CLINE+1, PLINE+1
$$PRIM^VASITE DIV+1
$$DOW^XLFDT EN1+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: START+2
Function Call: WRITE
  • Prompt: ?(22+(SDI*10)),"--------"
  • Line Location: START+2
Function Call: WRITE
  • Prompt: ?112,"--------- ---------",!,"*** CLINIC TOTALS ***"
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!,"*** PROVIDER SUMMARY (based on clinic default provider definition) ***"
  • Line Location: START+5
Function Call: WRITE
  • Prompt: " (No ava. found)"
  • Line Location: CLINE+1
Function Call: WRITE
  • Prompt: ?32,$J(SDAP,8),?42,$J(SDVSL,8),?52,$J(SDNS,8),?62,$J(SDNSVS,8),?72,$J(SDOB,8),?82,$J(SDOS,8),?92,$J((SDSL-SDAP-SDVSL),8)
  • Line Location: F1+1
Function Call: WRITE
  • Prompt: ?102,$J(SDCAP,8),?112,$J($S(SDCAP=0:0,1:(SDAP+SDVSL*100)/SDCAP),8,2),"%"
  • Line Location: F1+2
Function Call: WRITE
  • Prompt: ?123,$J($S(SDCAP=0:0,1:((SDAP+SDVSL-SDNS-SDNSVS)*100)/SDCAP),8,2),"%"
  • Line Location: F1+3
Function Call: WRITE
  • Prompt: !!,SDPRN," (",SDPR,")"
  • Line Location: PLINE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(40.7 - [#40.7] RC1
^DPT - [#2] ACT+5
^HOLIDAY - [#40.5] W+2
^SC - [#44] AC+1, A1, SC+1, RC+1, RC+2, RS+1, CG+1, CNT+1, CCPAT+2, CTPAT+6
, CTPAT+8, CTPAT+9, SET+1, SPAT+10, SPAT+12, SPAT+13, EN1, EN1+2, EN1+4, EN1+5
, W+1, W+2, W+3
^SC("ADPR" SET+1
^SC("ASCRPW" CG+1
^SC("B" RC+2
^TMP( CCPAT+1, CTPAT+3, SPAT+8!, EN1+5*, W+1*, W+3*, H*
^TMP("SCRPW" START+1, START+4, START+6, SET1*, SET1+1, SET1+2*, CLINE+1, PLINE+1
^VA(200 - [#200] SET+1

Label References

Name Line Occurrences
$$ACTIVE X1+1
$$DIV AC+1, SC+1, RC+1, RC+2, RS+1, CG+1
$$PCT CTPAT+5, CTPAT+6, CTPAT+9
A1 AC+1, SC+1, RC+1, RC+2, RS+1, CG+1
ACT CCPAT+2
ADJUST CTPAT+6, CTPAT+9
CCPAT CNT+2
CLINE START+1
CNT AC+1, SC+1, RC+1, RC+2, RC1, CG+1
CTPAT CCPAT+1
F1 START+4, CLINE+2, PLINE+1
H W+2
L W+2
PLINE START+6
RC1 RS+1
SET AC+1, SC+1, RC+1, RC+2, RC1, CG+1
SET1 SET+2
SPAT CNT+2
STOP AC+1, SC+1, RC+1, RC+2, RS+1, CG+1
W L
W1 W+1, H
WM EN1+1, W1
X1 X1+1, L

Naked Globals

Name Field # of Occurrence
^( H

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%H CTPAT+7~
%T CTPAT+7~
%Y CTPAT+7~, CTPAT+8
CT ADJUST+3*, ADJUST+5*, ADJUST+7, ADJUST+8!
D SPAT+9~, EN1+1*, EN1+4*, EN1+5, W+2, L*
DAY SPAT+9~, SPAT+11*, W+3
ENDATE SPAT+9~, SPAT+14*, EN1+4, X1, L
I PCT+2~, PCT+4*, ADJUST+5*, ADJUST+8!, SPAT+9~, EN1+1*
IOSL START+2, CLINE+1, PLINE+1
J SPAT+9~, EN1+2!, EN1+3
J( EN1+2*, W+2
MAX SPAT~, SPAT+14
SC SPAT~, SPAT+10, SPAT+12, SPAT+13, EN1, EN1+2, EN1+4, EN1+5, W+1, W+2
, W+3, H
>> SD( PCT+4
>> SDAC AC+1*, A1*, SC+1*, RC+1*, RC+2*, RS+1*, CG+1*
>> SDAP CNT+1*, CNT+2, SET1, SET1+2, CLINE+2, F1*, F1+1, F1+2, F1+3, ACT+4*
>> SDBCS RS+1*, RC1
>> SDBDAY A1, CNT+1, CNT+2, CCPAT+2
>> SDCAP F1+2*, F1+3
>> SDCG CG+1*
>> SDCL START+1*, AC+1*, A1, SC+1*, RC+1*, RC+2*, RS+1*, CG+1*, CNT+1, CNT+2
, CCPAT+1, CCPAT+2, CTPAT+3, CTPAT+6, CTPAT+8, CTPAT+9, SET+1, SET1, CLINE+1
>> SDCL( SC+1, RC+1, RS+1
>> SDCL("" RC+1, RS+1
>> SDCL(0 CG+1
>> SDCL0 AC+1*, A1, SC+1*, RC+1*, RC+2*, RS+1*, RC1, CG+1*, SET1
>> SDCLI A1*
>> SDCLN START+1*, RC+1*, RC+2*, CLINE+1
>> SDCP0 CCPAT+2*, ACT+1, ACT+2, ACT+3, ACT+5
>> SDCSC RC1*
>> SDCT START+3*, CLINE+1*, F1, PLINE+1*
SDDAY CNT+1*, CCPAT+1*, CCPAT+2*, CTPAT~, CTPAT+3, CTPAT+6, CTPAT+8, ACT+5
>> SDDIV DIV+2
>> SDDIV( DIV+2
SDDW CTPAT+7~, CTPAT+8*, CTPAT+9
>> SDECL RC+1*, RC+2
>> SDECS RS+1*, RC1
>> SDEDAY A1, CCPAT+1, CCPAT+2
>> SDF1 CNT+1*, CTPAT+5*, SET+1, SET1, ACT+4*
SDFLAG CTPAT+2~, CTPAT+4*, CTPAT+6*, CTPAT+9
SDHLDPAT CTPAT+2~, CTPAT+4*, CTPAT+6*, ADJUST+3
>> SDI START+2*, CCPAT+2*
SDIN SPAT+9~, SPAT+10*, SPAT+14*, X1+1, ACTIVE~, ACTIVE+5
SDIV START+1, START+4, START+6, AC+1*, SC+1*, RC+1*, RC+2*, RS+1*, CG+1*, DIV+1*
, DIV+2, SET+2, SET1~, SET1+1, SET1+2, CLINE+1, PLINE+1
>> SDLAP CNT+1*, ACT+2
>> SDMAX CNT+2
>> SDMD SET+2
SDMPDT CTPAT+7~, CTPAT+8*, CTPAT+9
>> SDNS CNT+1*, SET1, SET1+2, CLINE+2, F1*, F1+1, F1+3, ACT+5*
>> SDNSVS CNT+1*, SET1, SET1+2, CLINE+2, F1*, F1+1, F1+3, ACT+5*
>> SDOB CNT+1*, CNT+2*, SET1, SET1+2, CLINE+2, F1*, F1+1
>> SDOS CNT+1*, CTPAT+5*, SET1, SET1+2, CLINE+2, F1*, F1+1
>> SDOUT START+1, START+2, START+5, START+6, START+7, STOP+1*, AC+1, SC+1, RC+1, RC+2
, RS+1, CG+1, CLINE+1, PLINE+1
>> SDPAS ACT+5*
SDPATT CTPAT+2~, CTPAT+3*, CTPAT+4, CTPAT+5, CTPAT+6*, CTPAT+9*, PCT~, PCT+3*, PCT+4, ADJUST+6*
, ADJUST+7*
SDPCT CTPAT+2~, CTPAT+9*, SET1+1*, SET1+2
>> SDPESL ACT+2*, ACT+5
>> SDPLAP ACT+2*
>> SDPR START+6*, SET+1*, SET1+1, SET1+2, PLINE+1
>> SDPRN START+6*, SET+1*, SET1+1, SET1+2, PLINE+1
SDRE SPAT+9~, SPAT+10*, X1+1, ACTIVE~, ACTIVE+5
SDS SPAT~, SPAT+8*, EN1+5, W+1, W+3, H
>> SDSL CNT+1*, CNT+2, CTPAT+6*, CTPAT+9*, SET1, SET1+2, CLINE+2, F1*, F1+1, F1+2
SDSOH SPAT+9~, SPAT+13*, W+2
SDSTRTDT SPAT~, SPAT+14, EN1+4
>> SDSUB CCPAT+1, CTPAT+3
>> SDTAP START+3, CLINE+2*
>> SDTNS START+3, CLINE+2*
>> SDTNSVS START+3, CLINE+2*
>> SDTOB START+3, CLINE+2*
>> SDTOS START+3, CLINE+2*
>> SDTSL START+3, CLINE+2*
>> SDTVSL START+3, CLINE+2*
SDUP ADJUST+3*, ADJUST+4*, ADJUST+5, ADJUST+8!
>> SDVSL CNT+1*, SET1, SET1+2, CLINE+2, F1*, F1+1, F1+2, F1+3, ACT+2*
SI SPAT+9~, SPAT+12*, W+3
SM SPAT+9~, EN1+1*, W1, WM*
SS SPAT+9~, W+2*, W+3
U START+3, AC+1, A1, SC+1, RC+1, RC+2, RS+1, RC1, CG+1, CNT+1
, SET+1, SET1, SET1+2, F1, ACT+1, ACT+2, ACT+5, SPAT+10, SPAT+12, W+3
, H
X CTPAT+7~, CTPAT+8*, PCT+2~*, PCT+4*, PCT+5, SPAT+9~, SPAT+14*, EN1*, EN1+1, EN1+5*
, X1, X1+1, W*, W+1, W+2, W+3, W1, L*, H, WM
, ACTIVE~, ACTIVE+5
X1 SPAT+9~, SPAT+14*, X1*, X1+1*, L
X2 SPAT+9~, SPAT+14*, X1+1*, L*
Y SPAT+9~, EN1+1*, EN1+2*, W+2*, W+3
>> ZTQUEUED STOP+1
>> ZTSTOP STOP+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All