We are using Active X Calendar Control for our PowerBuilder product. In our last release calendar control was great hit by our customers.

 

      As a enhancement request, they want to log the To-Do List for the users just to get reminders but not to show in calendar as it gets too crowded with the events.

 

   Is there a way in calendar control to create a event by not showing in the calendar but reminder to be poped up to the user.

 

Any help is greatly appreciated

 

Thanks

Karthik

https://forum.codejock.com/uploads/DemoVersion/CalendarControlUpdated.rar - https://forum.codejock.com/uploads/DemoVersion/CalendarControlUpdated.rar
E.g. it supported printpreview just clicking internal CalendarControl button and has many new features compare with 2008 version

 

See snaphots here

https://forum.codejock.com/uploads/DemoVersion/PowerBuilderDayView.jpg - https://forum.codejock.com/uploads/DemoVersion/PowerBuilderDayView.jpg
https://forum.codejock.com/uploads/DemoVersion/PowerBuilderWorkWeekView.jpg - https://forum.codejock.com/uploads/DemoVersion/PowerBuilderWorkWeekView.jpg
https://forum.codejock.com/uploads/DemoVersion/PowerBulderMonthView-EditEventWithBuiltInEditor.jpg - https://forum.codejock.com/uploads/DemoVersion/PowerBulderMonthView-EditEventWithBuiltInEditor.jpg
https://forum.codejock.com/uploads/DemoVersion/PowerBulderPrintPreview.jpg - https://forum.codejock.com/uploads/DemoVersion/PowerBulderPrintPreview.jpg
https://forum.codejock.com/uploads/DemoVersion/PowerBulderPrintPreviewFullScreen.jpg - https://forum.codejock.com/uploads/DemoVersion/PowerBulderPrintPreviewFullScreen.jpg

I can consider your idea to have event property Visible or have special Category or Importance value which Calendar will not show in all Views or in MonthView only if we will have enough clients who like to have such feature

 

Example of event for create or modify event using built-in editors:

event doubleclicked;
OleObject activeView
OleObject levent
OleObject hitTest
OleObject viewEvent
datastore lds

string ls_subject
long days
integer rc

levent = create OleObject
activeView= create OleObject
hitTest = create OleObject

activeView = Calendar.object.ActiveView

days = activeView.DaysCount

OlecalendarDialog = create OleObject
OlecalendarDialog.ConnectToNewObject("Codejock.CalendarDialogs.13.1.0")
OlecalendarDialog.Calendar(Calendar.object)

hitTest = activeView.HitTest ()

if isValid(hitTest) then
 viewEvent = hitTest.ViewEvent
 if isValid( viewEvent) then
  levent = viewEvent.Event()
  if IsValid(levent) then
    if OlecalendarDialog.ShowEditEvent(levent) then
      lds = create datastore
      lds.DataObject = 'd_events'
      lds.SetTransObject(SQLCA)
      rc = lds.InsertRow(0)
      lds.SetItem(rc,'Subject', levent.Subject )
      lds.SetItem(rc,'startdatetime', levent.StartTime)
      lds.SetItem(rc,'enddatetime', levent.EndTime)
      lds.SetItem(rc,'location', levent.Location)
      lds.SetItem(rc,'body', levent.Body)
      lds.update()
      destroy lds
   end if
  end if
 else 

   levent = Calendar.object.DataProvider.CreateEvent()
   levent.StartTime = hitTest .HitDateTime
   if OleCalendarDialog.ShowNewEvent2(levent) then
     lds.DataObject = 'd_events'
     lds.SetTransObject(SQLCA)
     rc = lds.InsertRow(0)
     lds.SetItem(rc,'Subject', levent.Subject )
     lds.SetItem(rc,'startdatetime', levent.StartTime)
     lds.SetItem(rc,'enddatetime', levent.EndTime)
     lds.SetItem(rc,'location', levent.Location)
     lds.SetItem(rc,'body', levent.Body)
     lds.update()
     destroy lds
     Calendar.object.DataProvider.AddEvent(levent)
  end if
 end if
end if

destroy OlecalendarDialog
destroy levent
destroy activeView
destroy hitTest
destroy viewEvent 

end event

https://forum.codejock.com/uploads/DemoVersion/PowerBuilderCalendarDemo.rar  

 

Hi,

 

I started already a threat some time ago for a Hide property. This is the same question, it would be nice to have this feature.

 

Regards,

Chris.

You can set it in PrePopulate function call based on your model logic

 

Private Sub CalendarControl_PrePopulate(ByVal ViewGroup As XtremeCalendarControl.CalendarViewGroup, ByVal Events As XtremeCalendarControl.CalendarEvents)
...................................

pEvent.EventVisible = False

...................................

 

Use fresh activex 13.1 upgrade from here -

https://forum.codejock.com/uploads/DemoVersion/CalendarControlUpdated.rar - https://forum.codejock.com/uploads/DemoVersion/CalendarControlUpdated.rar
unrar it on same place your official 13.1 located. Rename the same way as official filename use
No need to re-registrate as you already had it

 

I am interesting in your testing with hidden reminders - please post

PowerBuilder: Article

Implement a Calendar Component in PowerBuilder Applications

Enhance the look of the calendars within your scheduling modules

 

Now I tried the same thing what you mentioned your email. When I ran the official setup of Codejock calendar

 

Codejock.Calendar.v13.1.0.ocx  Size was 2572KB with Timestamped 8/19/2009 3.28 PM

 

When I unzip the file what you attached, still the same size & timestamp, But Once I renamed as per your steps, I tried the Eventvisible in Add Event method, it is not working.

 

Still the event is shown in the calendar control.

 

Let us know, what else we need to do

 

Karthik