1. | Add code to the AmToIdx(n) function, which filters the "CdoTmzNoDST" flag out of the variable "n" if it is set there.
The modified AmToIdx(n) function should look like the following:
Function AmToIdx(n)
Dim A '1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51
A = Array(-1, 20, 24, 23, 22, 28, 25, 26, 16, 13, 11, 7, 6, 4, 3, 2, 1, 50, 45, 43, 42, 41, 39, 37, 34, 33, 31, 30, 15, 19, 18, 21, 17, 14, 12, 10, 9, 8, 5, 0, 49, 48, 47, 46, 44, 40, 38, 36, 35, 27, 29, 32)
If n > &H4000 Then
n = n - &H4000
End If
AmToIdx = A(n)
End Function
This filter is needed because array A contains 52 elements only, rather than 16,384+x elements.
Between lines 404 and 454, there is a list of options that contain the values that AmToIdx will map to. If a given time zone has daylight saving time turned off, the value here should be increased by 16,384 (or &H4000). For example, if daylight saving time is turned off for "Pacific Time (US & Canada); Tijuana," the value in line 408 needs to be increased by 16,384. The original line
"<!-- 4 --><OPTION VALUE="13">(GMT-08:00) Pacific Time (US & Canada); Tijuana"
should be changed to:
"<!-- 4 --><OPTION VALUE="16397">(GMT-08:00) Pacific Time (US & Canada); Tijuana"
|