Set Function

The Set function must set a date depending on the state of the calendar. Click Set, with no date selected, or select one or two dates and click Set. Depending on the setting, a range is set as >= start date or <= end date.
function rangecalActivate(mySection){
   Qiq_enter("rangecalActivate() ",trl+1,thisSection)
   var blnWork = true
   blnWork = blnWork && ... 
...Hysl_doesShapeExist(mySection,"picDatePicture^Qiq_cal^1")
   blnWork = blnWork && ... 
...Hysl_doesShapeExist(mySection,"picDatePicture^Qiq_cal^2")
   blnWork = blnWork && Hysl_doesShapeExist(mySection,"cbtSet_1")
   blnWork = blnWork && Hysl_doesShapeExist(mySection,"cbtSet_2")
   if (!blnWork) {
      Qiq_exit("rangecalActivate() all required shapes not ... 
...found",trl+1,thisSection)
      return
   }
   // call the calendar constructor and reference it to the calendar ... 
...UI picture
   mySection.Shapes["picDatePicture^Qiq_cal^1"].Qiq_objCalDate = ... 
...new Qiq_objCal(mySection,"1")
   mySection.Shapes["picDatePicture^Qiq_cal^2"].Qiq_objCalDate = ... 
...new Qiq_objCal(mySection,"2")
   var objStaCal = ... 
...mySection.Shapes["picDatePicture^Qiq_cal^1"].Qiq_objCalDate
   var objEndCal = ... 
...mySection.Shapes["picDatePicture^Qiq_cal^2"].Qiq_objCalDate
   var strFilter = getFilterName(mySection.cbtSet_1)
   var harValues = Qiq_objDocFilters.Qiq_getSelectedValues(... 
...strFilter, true)
   var blnIgnore = Qiq_objDocFilters.Qiq_isIgnore(strFilter)
   var limOp = Qiq_objDocFilters.Qiq_getOperator(strFilter)
   var blnStaSel = false
   var blnEndSel = false
   var objStaDate = null
   var objEndDate = null
   if (!blnIgnore) {
      for (var a in harValues){
         // identify the first and last selected items
         switch (limOp){
            case bqLimitOperatorGreaterThanOrEqual:
               objStaDate = harValues[a]
               blnStaSel = true
               break
            case bqLimitOperatorLessThanOrEqual :
               objEndDate = harValues[a]
               blnEndSel = true
               break
            case bqLimitOperatorBetween :
               objStaDate == null? objStaDate = harValues[a] : ... 
...objEndDate = harValues[a]
               !blnStaSel ? blnStaSel = true : blnEndSel = true
               break
            default :
         }
      }
   }
   if (Qiq_getHarLength(harValues) < 2){
      harValues = Qiq_objDocFilters.Qiq_getAvailableValues(... 
...strFilter, true)
      for (var a in harValues){
         if (objStaDate == null) {
            objStaDate = harValues[a]
            if (objEndDate != null) {
               break
            }
         }
         objEndDate = harValues[a]
      }
   }
   objStaCal.Qiq_showDate(objStaDate,true,blnStaSel,blnStaSel)
   objEndCal.Qiq_showDate(objEndDate,true,blnEndSel,blnEndSel)
   mySection.Shapes["picDatePicture^Qiq_cal^1"].objDateSet = objStaDate
   mySection.Shapes["picDatePicture^Qiq_cal^2"].objDateSet = objEndDate
   
   Qiq_exit("rangecalActivate() ",trl+1,thisSection)
}