SDWLWTR ;IOFO BAY PINES/DMR - EWL WAIT TIME REPORT 8/1/06 ;1/11/16 10:21am
;;5.3;scheduling;**419,645**;AUG 13 1993;Build 7
START ;
W !,"EWL Wait Time Statistics"
W !,"The following fields from file SD WAIT LIST (#409.3) are included in this report."
W !!," Originating Date"
W !," Scheduling Date of Appt"
W !," Date Appt Made"
W !," Date of Disposition"
; SD*5.3*645 - replaced Desired Date with CID/Preferred Date
;W !," Desired Date of Appointment"
W !," CID/Preferred Date of Appointment"
W !!
CAL W !,"The following fields are computed calculations included in the report."
W !,"Refer to the following report key to translate field values:"
W !!," a = Scheduled Date of Appt - Originating Date"
; SD*5.3*645 replaced Desired Date with CID/Preferred Date
;W !," b = Desired Date of Appointment - Originating Date"
W !," b = CID/Preferred Date of Appointment - Originating Date"
;W !," c = Desired Date of Appointment - Scheduled Date of Appt"
W !," c = CID/Preferred Date of Appointment - Scheduled Date of Appt"
W !," d = Date of Disposition - Originating Date"
W !," e = Originating Date - Date Appt Made"
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HSDWLWTR 1182 printed Oct 16, 2024@19:03:51 Page 2
SDWLWTR ;IOFO BAY PINES/DMR - EWL WAIT TIME REPORT 8/1/06 ;1/11/16 10:21am
+1 ;;5.3;scheduling;**419,645**;AUG 13 1993;Build 7
START ;
+1 WRITE !,"EWL Wait Time Statistics"
+2 WRITE !,"The following fields from file SD WAIT LIST (#409.3) are included in this report."
+3 WRITE !!," Originating Date"
+4 WRITE !," Scheduling Date of Appt"
+5 WRITE !," Date Appt Made"
+6 WRITE !," Date of Disposition"
+7 ; SD*5.3*645 - replaced Desired Date with CID/Preferred Date
+8 ;W !," Desired Date of Appointment"
+9 WRITE !," CID/Preferred Date of Appointment"
+10 WRITE !!
CAL WRITE !,"The following fields are computed calculations included in the report."
+1 WRITE !,"Refer to the following report key to translate field values:"
+2 WRITE !!," a = Scheduled Date of Appt - Originating Date"
+3 ; SD*5.3*645 replaced Desired Date with CID/Preferred Date
+4 ;W !," b = Desired Date of Appointment - Originating Date"
+5 WRITE !," b = CID/Preferred Date of Appointment - Originating Date"
+6 ;W !," c = Desired Date of Appointment - Scheduled Date of Appt"
+7 WRITE !," c = CID/Preferred Date of Appointment - Scheduled Date of Appt"
+8 WRITE !," d = Date of Disposition - Originating Date"
+9 WRITE !," e = Originating Date - Date Appt Made"
