I've been working with SeedCode Calendar Pro, v 4.41, and modifying it for a client. Most of their change requests revolve around filtering, import and export.

This solution has some very impressive techniques - and the new release looks totally astounding! But I've run into a few issues with this version, which I think are bugs. Sorry if this is a long post, but I wanted to share the details to a) see if others have run into similar problems, b) verify I've taken the correct paths for correction, and c) find out if I've made changes that may bite me later.

Here is a list of the issues and my fixes:

##############################################
PROBLEM:
Green dot for Selected day and yellow dot for Current day do not show in Year view when they are in February; February dates do not show as white when selected date is in February.

FIX:
Carefully re-layer February objects:
click on February's "Su" boxes and nudge to the right 5 arrows
click the now-revealed top-left corner of the blue box
send it backwards (Control+Shift+]) six times
click on the Su and nudge it back to the left 5 arrows

##############################################
PROBLEM:
Events with dates in November show as dots in January in Year view

FIX:
Change calculation for field
Filter::CalMiniCalendarYearHighlightDates

FROM:
Let (
n = Get ( CalculationRepetitionNumber ) ;
If (
Mod ( n ; 42 ) = 1 // first repetitions
// or Mod ( n ; 42 ) = 8 // eight repetitions for refresh of year view if necessary.
;
Let (
$$MiniCalendarYearDates = List ( CalYearMiniAppointments::ApptDateStart_k ) & ¶ & List ( CalYearMiniAppointments::ApptDateEnd ) ; ""
) )

&

PatternCount ( $$MiniCalendarYearDates ; GetRepetition ( CalMiniCalendarYearCalc ; n ) )

)

TO:
Let (
[
n = Get ( CalculationRepetitionNumber ) ;
$$MiniCalendarYearDates = List ( CalYearMiniAppointments::ApptDateStart_k ) & ¶ & List ( CalYearMiniAppointments::ApptDateEnd )
] ;
If (
not IsEmpty ( CalMiniCalendarYearCalc [n] ) ;
PatternCount ( ¶ & $$MiniCalendarYearDates ; ¶ & CalMiniCalendarYearCalc [n] ) ;
""
)
)

##############################################
PROBLEM:
Using custom List or Table buttons from Month view - ToDo tab - reports no records to be viewed; even if there is a to do for the selected date.

FIX:
Change calculation for field
Filter::CalDateCalcTextLast_k

FROM:
GetAsText ( CalDateLast_k_Calc )

TO:
GetAsText ( GetAsNumber ( CalDateLast_k_Calc ) )

##############################################
PROBLEM:
Using custom List or Table buttons from Year view reports no events to be viewed, unless selected day has events - and then just shows events for selected day or month.

FIX:
Add relationship and change script

Part A:
In RG, connect existing TOs:
CalendarDaily and CalendarYearMini
(can use _c_CommonOne field in both tables with cartesion "X" operator)

Part B:
In script:
Go to Calendar List or Table ( Action ) { Target }

find this section:
If [ $Target = "Appointments" ]
If [ PatternCount ( Get ( LayoutTableName ) ; "Daily" ) ]
Go to Related Record [ From table: “CalDailyAppointmentsâ€

Hey Debi,

Nice post. I think the upshot of all this is that the year view has been a little neglected around here.

I like your repairs and will spend some more time with them next week (I'm leaving for a short vacation), but I did want to mention something about the repair you suggest to problem 2.

Without that If() statement you'll be running that List() for every repetition on the year view. That can be pretty heavy if you have a lot of data (even if you don't). I'd like to think there was a way to keep some sort of short circuit in there: maybe by filling $$MiniCalendarYearDates by a script while when arriving at the year view?

In any event, thanks again for your post. Very well done and I'm sorry you had to find all these things.

Best

John

Thanks for the quick reply, John. I'll revisit the If statement; glad you pointed that out. And have a GREEEEAAAAT vacation!

debi

John,

Hope you had a great vacation!

Just wanted to update this thread before I move along and get too forgetful... Based on your feedback, here's the revised calc I'm currently using for the Filter::CalMiniCalendarYearHighlightDatesCalc:

Let (

n = Get ( CalculationRepetitionNumber ) ;

If (
Mod ( n ; 42 ) = 1 ;
Let (
$$MiniCalendarYearDates =
List ( CalYearMiniAppointments::ApptDateStart_k ) & ¶ &
List ( CalYearMiniAppointments::ApptDateEnd ) ;
""
)
)

&
If (
not IsEmpty ( CalMiniCalendarYearCalc [n] ) ;
PatternCount ( ¶ & $$MiniCalendarYearDates ; ¶ & CalMiniCalendarYearCalc [n] )
)
)

Thanks again,
debi