Changeset 1106 for Scheduling/trunk/cs/bsdx0200GUISourceCode/CGDocument.cs

Timestamp:

Mar 20, 2011, 3:22:11 AM (13 years ago)

Author:

Sam Habiel

Message:

CalendarGrid:

• Support for Autoscrolling corrected.
• A little optimization: Grid is only drawn once now when starting, not twice (don't know why original code did that).

CGAppointment:

• Added member Patient (new Class)

CGDocument:

• OnOpenDocument now accepts input of DateTime to decide where to open document.
• SlotsAvailable algorithm now includes code for scaling according to timescale and code to merge Blocks if they are adjacent.

CGDocumentManager:

• Fix bug having to do with canceling log-in after first retry. BMX lib threw an exception which was not caught.

CGView: Many changes:

• SlotsAvailable signature changed in CGDocument. All references to it had to be changed.
• Opening a node in the tvSchedules by clicking on the plus sign did not select it. Code changes to make it select it.
• UpdateStatusBar now uses a string builder; and shows a more comprehensive message on the availability in the Status Bar.
• Focus issues on various controls.
• Support for printing a slip after an appointment is made automatically has been added.

CustomPrinting:

• now includes a method to print a single appointment slip

DAppointPage:

• Checkbox to decide whether to print appt slip added.
• New readonly property to get the appointment that has been made (of type CGAppointment).

DApptSearch:

• StartDate and EndDate now autoadjust based on each other.
• lblMessage added to show user message if no appointments are found.

File:

• Scheduling/trunk/cs/bsdx0200GUISourceCode/CGDocument.cs (modified) (7 diffs)

Scheduling/trunk/cs/bsdx0200GUISourceCode/CGDocument.cs

@@ -8 +8 @@
 using IndianHealthService.BMXNet;
 using System.Linq;
+using System.Collections.Generic;
 
 namespace IndianHealthService.ClinicalScheduling
@@ -321 +322 @@
         }
 
-        public void OnOpenDocument()
+        public void OnOpenDocument(DateTime dDate)
         {
             try
@@ -328 +329 @@
                 m_ScheduleType = (m_sResourcesArray.Count == 1) ? ScheduleType.Resource : ScheduleType.Clinic;
                 bool bRet = false;
-
-                //Set initial From and To dates based on current day
-                DateTime dDate = DateTime.Today;
+                
                 if (m_ScheduleType == ScheduleType.Resource)
                 {
@@ -396 +395 @@
         private bool RefreshSchedule()
         {
-            try
-            {
-                bool bRet = this.RefreshAvailabilitySchedule();
-                if (bRet == false)
-                {
-                    return bRet;
-                }
-                bRet = this.RefreshDaysSchedule();
-                return bRet;
-            }
-            catch (ApplicationException aex)
-            {
-                Debug.Write("CGDocument.RefreshSchedule Application Error:  " + aex.Message + "\n");
-                return false;
-            }
-            catch (Exception ex)
-            {
-                MessageBox.Show("CGDocument.RefreshSchedule error:  " + ex.Message + "\n");
-                return false;
-            }
+            this.RefreshAvailabilitySchedule();
+            this.RefreshDaysSchedule();
+            return true;
         }
 
@@ -637 +619 @@
         /// <param name="sAvailabilityMessage">Out: Access Note</param>
         /// <returns>Number of slots</returns>
-        public int SlotsAvailable(DateTime dSelStart, DateTime dSelEnd, string sResource, out string sAccessType, out string sAvailabilityMessage)
-        {
-
-
-            sAccessType = "";               //default out value
-            sAvailabilityMessage = "";      //default out value
+        public int SlotsAvailable(DateTime dSelStart, DateTime dSelEnd, string sResource, int viewTimeScale, out CGAvailability resultantAV)
+        {
+
+            resultantAV = null;
 
             double slotsAvailable = 0;      //defalut return value
+
+            double effectiveSlotsAvailable = 0;    //Slots available based on the time scale.
+
 
             //NOTE: What's this lock? This lock makes sure that nobody is editing the availability array
@@ -660 +643 @@
             {
                 //This foreach loop looks for an availability that overlaps where the user clicked.
-                //There can only be one, as availabilites cannot overlap each other (enforced at the DB level)
+                //Availabilites cannot overlap each other (enforced at the DB level)
                 //If selection hits multiple blocks, get the block with the most slots (reflected by the sorting here)
-                CGAvailability[] pAVs = (from pAV in this.m_pAvArray.Cast<CGAvailability>()
-                                         where (sResource == pAV.ResourceList && CalendarGrid.TimesOverlap(dSelStart, dSelEnd, pAV.StartTime, pAV.EndTime))
-                                         orderby pAV.Slots descending
-                                         select pAV)
-                                         .ToArray<CGAvailability>();
-
-                if ((pAVs.Length) == 0) return 0;
-
-                slotsAvailable = pAVs[0].Slots;
-                sAccessType = pAVs[0].AccessTypeName;
-                sAvailabilityMessage = pAVs[0].Note;
-
+                List<CGAvailability> lstAV = (from avail in this.m_pAvArray.Cast<CGAvailability>()
+                           where (sResource == avail.ResourceList && CalendarGrid.TimesOverlap(dSelStart, dSelEnd, avail.StartTime, avail.EndTime))
+                           select avail).ToList();
+
+                //if we don't have any availabilities, then return with zero slots.
+                if (lstAV.Count == 0) return 0;
+                
+                CGAvailability pAV;
+
+                //if there is just one, that's it.
+                if (lstAV.Count == 1) pAV = lstAV.First();
+                //otherwise...
+                else
+                {
+                    //if availabilities are contigous to each other, need to join them together.
+
+                    //First, are they the same?
+                    string firsttype = lstAV.First().AccessTypeName;
+                    bool bAllSameType = lstAV.All(av => av.AccessTypeName == firsttype);
+
+                    //Second are they ALL contigous?
+                    DateTime lastEndTime = DateTime.Today; //bogus value to please compiler who wants it assigned.
+                    int index = 0;
+
+                    bool bContigous = lstAV.OrderBy(av => av.StartTime)
+                       .All(av =>
+                       {
+                           index++;
+                           if (index == 1)
+                           {
+                               lastEndTime = av.EndTime;
+                               return true;
+                           }
+                           if (av.StartTime == lastEndTime)
+                           {
+                               lastEndTime = av.EndTime;
+                               return true;
+                           }
+
+                           return false;
+                       });
+
+
+
+                    if (bContigous && bAllSameType)
+                    {
+                        var enumAVOrdered = lstAV.OrderBy(av => av.StartTime);
+
+                        pAV = new CGAvailability
+                        {
+                            StartTime = enumAVOrdered.First().StartTime,
+                            EndTime = enumAVOrdered.Last().EndTime,
+                            Slots = enumAVOrdered.Sum(av => av.Slots),
+                            AccessTypeName = enumAVOrdered.First().AccessTypeName,
+                            Note = enumAVOrdered.First().Note
+                        };
+                    }
+                    else
+                    {
+                        pAV = lstAV.OrderByDescending(av => av.Slots).First();
+                    }
+                }
+
+                resultantAV = pAV; // out var
+                
+                slotsAvailable = pAV.Slots;
+                
                 //Subtract total slots current appointments take up.
                 slotsAvailable -= (from appt in this.Appointments.AppointmentTable.Values.Cast<CGAppointment>()
                                    //If the resource is the same and the user selection overlaps, then...
-                                   where (sResource == appt.Resource && CalendarGrid.TimesOverlap(pAVs[0].StartTime, pAVs[0].EndTime, appt.StartTime, appt.EndTime))
+                                   where (sResource == appt.Resource && CalendarGrid.TimesOverlap(pAV.StartTime, pAV.EndTime, appt.StartTime, appt.EndTime))
                                    // if appt starttime is before avail start time, only count against the avail starting from the availability start time
-                                   let startTimeToCountAgainstBlock = appt.StartTime < pAVs[0].StartTime ? pAVs[0].StartTime : appt.StartTime
+                                   let startTimeToCountAgainstBlock = appt.StartTime < pAV.StartTime ? pAV.StartTime : appt.StartTime
                                    // if appt endtime is after the avail ends, only count against the avail up to where the avail ends
-                                   let endTimeToCountAgainstBlock = appt.EndTime > pAVs[0].EndTime ? pAVs[0].EndTime : appt.EndTime
+                                   let endTimeToCountAgainstBlock = appt.EndTime > pAV.EndTime ? pAV.EndTime : appt.EndTime
                                    // theoretical minutes per slot for the availability
-                                   let minPerSlot = (pAVs[0].EndTime - pAVs[0].StartTime).TotalMinutes / pAVs[0].Slots
+                                   let minPerSlot = (pAV.EndTime - pAV.StartTime).TotalMinutes / pAV.Slots
                                    // how many minutes does this appointment take away from the slot
                                    let minPerAppt = (endTimeToCountAgainstBlock - startTimeToCountAgainstBlock).TotalMinutes
@@ -691 +729 @@
                                    // add up SlotsConsumed to substract from slotsAvailable
                                    .Sum();
-            }
-
-            return (int)slotsAvailable;
+
+                //theoretical minutes per slot for the availability
+                double minPerSlot2 = (pAV.EndTime - pAV.StartTime).TotalMinutes / pAV.Slots;
+                
+                //Convert it to the view's time scale.
+                effectiveSlotsAvailable = (minPerSlot2 / viewTimeScale) * slotsAvailable;
+
+            }
+            
+            //round it down.
+            return (int)effectiveSlotsAvailable;
 
             /* OLD ALGOTHRIM 2