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 |  Marked Items  | All
Print Page as PDF
Routine: SDAMOWP1

Package: Scheduling

Routine: SDAMOWP1


Information

SDAMOWP1 ;ALB/CAW - Appointment Waiting Time Print Routine ; 12/1/91

Source Information

Source file <SDAMOWP1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
List Manager 1 ($$FDATE,$$NOW,PAUSE)^VALM1  
Scheduling 1 ($$HRS,PAUSE)^SDAMOWP  

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
Scheduling 2 SDAMOW1  SDAMOWP  

Entry Points

Name Comments DBIA/ICR reference
HDR ; -- print header
HDR1
HDRQ
HDRD ; Print header with dates
HDRDQ
HDRT(SORT) ; Print header for totals
TOT(WHAT,LEVEL1,DIV) ; Print totals
TOTQ
SORT1 ; -- hdr labels for sort
TOTP(SORT,DIV,LEVEL1) ; Print totals
CHECK(SORT) ; check to see if header should be printed
LEGEND ; Print legend on bottom
LEGENDQ
NODIV ; Print divisions when no appts found
NODIVQ
NO ; Print stop code or clinic when no appts found
NOQ

External References

Name Field # of Occurrence
$$HRS^SDAMOWP TOT+9, TOT+10, TOT+11, TOT+12, TOT+13
PAUSE^SDAMOWP TOTP+9
$$FDATE^VALM1 HDRD+6
$$NOW^VALM1 HDRD+2
PAUSE^VALM1 CHECK+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?70," Clinic: ",$E(LEVEL1,1,23)
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,?70,"Stop Code: ",$E(LEVEL1,1,23)
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !,"Sorted By: ",$P($T(SORT1+SDSORT),";;",2)
  • Line Location: HDR1+0
Function Call: WRITE
  • Prompt: ?70," Total: ",+^("PRIM")
  • Line Location: HDR1+1
Function Call: WRITE
  • Prompt: ?70," Total: ",+^("DIV")
  • Line Location: HDR1+2
Function Call: WRITE
  • Prompt: !,SDASH
  • Line Location: HDR1+4
Function Call: WRITE
  • Prompt: !,"Patient",?20,"ID",?26,$S("^3^4^5^"[(U_SDSORT_U):"Clinic",1:""),?46,"Check-In",?62,"Appointment",?78,"Elapsed",?92,"Check-Out",?109,"Elapsed",?120,"Total"
  • Line Location: HDR1+5
Function Call: WRITE
  • Prompt: !,?46,"Date/Time",?62,"Date/Time",?78,"Time",?92,"Date/Time",?109,"Time",?120,"Time",!,SDASH
  • Line Location: HDR1+6
Function Call: WRITE
  • Prompt: @IOF,"Appointment Waiting Time Report",?51,"Report Date: ",$P($$NOW^VALM1,":",1,2)
  • Line Location: HDRD+2
Function Call: WRITE
  • Prompt: ?108,"Page: ",SDPAGE
  • Line Location: HDRD+3
Function Call: WRITE
  • Prompt: !,SDASH
  • Line Location: HDRD+4
Function Call: WRITE
  • Prompt: !,"Dates : ",$$FDATE^VALM1(SDBEG)," to ",$$FDATE^VALM1(SDEND)
  • Line Location: HDRD+6
Function Call: WRITE
  • Prompt: ?70," Division: ",SDDIVNAM
  • Line Location: HDRD+9
Function Call: WRITE
  • Prompt: !,$S("^1^2^"[(U_SRT_U):"Clinic","^3^4^"[(U_SRT_U):"Stop Code",1:"Division"),?40,"Appointments",?56,"Total CI Time",?71,"Total CO Time",?86,"Average Pre",?101,"Average Post",?116,"Average Total"
  • Line Location: HDRT+3
Function Call: WRITE
  • Prompt: !,?86,"Waiting Time",?101,"Waiting Time",?116,"Waiting Time"
  • Line Location: HDRT+4
Function Call: WRITE
  • Prompt: !,SDASH
  • Line Location: HDRT+5
Function Call: WRITE
  • Prompt: !,$G(LEVEL1)
  • Line Location: TOT+7
Function Call: WRITE
  • Prompt: ?40,TOTAL1
  • Line Location: TOT+8
Function Call: WRITE
  • Prompt: ?56,$$HRS^SDAMOWP(TOTAL2)
  • Line Location: TOT+9
Function Call: WRITE
  • Prompt: ?71,$$HRS^SDAMOWP(TOTAL3)
  • Line Location: TOT+10
Function Call: WRITE
  • Prompt: ?86,$$HRS^SDAMOWP($P((TOTAL2/TOTAL1),"."))
  • Line Location: TOT+11
Function Call: WRITE
  • Prompt: ?101,$$HRS^SDAMOWP($P((TOTAL3/TOTAL1),"."))
  • Line Location: TOT+12
Function Call: WRITE
  • Prompt: ?116,$$HRS^SDAMOWP($P((TOTAL4/TOTAL1),"."))
  • Line Location: TOT+13
Function Call: WRITE
  • Prompt: !,SDASH1
  • Line Location: TOTP+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CHECK+3
Function Call: WRITE
  • Prompt: !!,?5,"o Check-In Date/Time - Time the patient first checks in at the clinic reception area."
  • Line Location: LEGEND+2
Function Call: WRITE
  • Prompt: !,?5,"o Appointment Date/Time - Time of the veteran's scheduled appointment."
  • Line Location: LEGEND+3
Function Call: WRITE
  • Prompt: !,?5,"o Elapsed Time(s) - 1. The elapsed period of time from the patient checking in at the clinic to the appointment time. "
  • Line Location: LEGEND+4
Function Call: WRITE
  • Prompt: !,?5," (Appointment time minus Check-In time)"
  • Line Location: LEGEND+5
Function Call: WRITE
  • Prompt: !,?5,"o 2. The elapsed period of time from the appointment time to the time the patient checks out."
  • Line Location: LEGEND+6
Function Call: WRITE
  • Prompt: !,?5," (Check-Out time minus Appointment Time)"
  • Line Location: LEGEND+7
Function Call: WRITE
  • Prompt: !,?5,"o Total Waiting Time - The elapsed period of time from the patient's check-in date/time to the time leaving the clinic"
  • Line Location: LEGEND+8
Function Call: WRITE
  • Prompt: !,?5," after service is completed. (Check-Out time minus Check-In time)"
  • Line Location: LEGEND+9
Function Call: WRITE
  • Prompt: !,?70,"Division(s): "
  • Line Location: NODIV+2
Function Call: WRITE
  • Prompt: "All"
  • Line Location: NODIV+3
Function Call: WRITE
  • Prompt: ?83,VAUTD(DIV),!
  • Line Location: NODIV+4
Function Call: WRITE
  • Prompt: !,?72,$S(SDSORT=1!(SDSORT=2):"Clinic(s): ",SDSORT=3!(SDSORT=4):"Stop Code(s): ",1:"")
  • Line Location: NO+2
Function Call: WRITE
  • Prompt: "All"
  • Line Location: NO+3
Function Call: WRITE
  • Prompt: ?83,VAUTC(SDWHAT),!
  • Line Location: NO+4
Function Call: WRITE
  • Prompt: "All"
  • Line Location: NO+5
Function Call: WRITE
  • Prompt: ?87,VAUTS(SDWHAT),!
  • Line Location: NO+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] HDRD+8
^TMP("SDWTTOT" HDR1+1, TOT+3, TOTP+3
^TMP("SDWTTOTD" HDR1+2, TOT+4
^TMP("SDWTTOTG" TOT+5

Label References

Name Line Occurrences
CHECK TOTP+4
HDR1 HDR+5
HDRD HDR+3, TOTP+2
HDRDQ HDRD+7
HDRT TOTP+2, CHECK+1, CHECK+3
LEGEND TOTP+8
NO HDR+5
NODIV HDRD+7
NODIVQ NODIV+3
NOQ NO+3, NO+5
TOT TOTP+5, TOTP+8

Naked Globals

Name Field # of Occurrence
^("DIV" HDR1+2
^("PRIM" HDR1+1
^(0 HDRD+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIV TOT~, TOT+3, TOT+4, TOTP~, TOTP+3, TOTP+5, TOTP+8, NODIV+2~*, NODIV+4*
IOF HDRD+2, CHECK+3
IOSL CHECK+2, CHECK+3
IOST CHECK+2
LEVEL1 HDR+6, HDR+7, HDR1+1, TOT~, TOT+3, TOT+7, TOTP~, TOTP+3*, TOTP+5
>> SDASH HDR1+4, HDR1+6, HDRD+4, HDRT+5
>> SDASH1 TOTP+7
>> SDBEG HDRD+6
>> SDDIV HDR1+1, HDR1+2, HDRD+8
>> SDDIVNAM HDRD+8*, HDRD+9
>> SDEND HDRD+6
>> SDLEN HDRD+8
>> SDNO HDR+5, HDRD+7
>> SDPAGE HDRD+3*, CHECK+1
>> SDQUIT TOTP+3, TOTP+4, TOTP+6, CHECK+2*
>> SDSEL HDR1+5, HDR1+6
>> SDSORT HDR+6, HDR+7, HDR1+1, HDR1+2, HDR1+5, NO+2, NO+3, NO+4, NO+5, NO+6
SDWHAT NO+2~*, NO+4*, NO+6*
SORT HDRT~, HDRT+2, TOTP~, TOTP+2, TOTP+4, CHECK~, CHECK+1, CHECK+3
SRT HDRT+2~*, HDRT+3
TOTAL TOT+2~, TOT+3*, TOT+4*, TOT+5*, TOT+6
TOTAL1 TOT+2~, TOT+6*, TOT+8, TOT+11, TOT+12, TOT+13
TOTAL2 TOT+2~, TOT+6*, TOT+9, TOT+11
TOTAL3 TOT+2~, TOT+6*, TOT+10, TOT+12
TOTAL4 TOT+2~, TOT+6*, TOT+13
U HDR1+5, HDRD+8, HDRT+3, TOT+6
>> VAUTC NO+3
>> VAUTC( NO+4
>> VAUTD NODIV+3
>> VAUTD( NODIV+4
>> VAUTS NO+5
>> VAUTS( NO+6
WHAT TOT~, TOT+3, TOT+4, TOT+5
Y HDR+2~, CHECK+2

Marked Items

Name Field # of Occurrence
$T(SORT1+SDSORT HDR1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All