dt_widget_year (public, deprecated)

 dt_widget_year [ -calendar_details calendar_details ] [ -date date ] \
    [ -days_of_week days_of_week ] \
    [ -large_calendar_p large_calendar_p ] \
    [ -master_bgcolor master_bgcolor ] \
    [ -header_bgcolor header_bgcolor ] \
    [ -header_text_color header_text_color ] \
    [ -header_text_size header_text_size ] \
    [ -day_number_template day_number_template ] \
    [ -day_header_size day_header_size ] \
    [ -day_header_bgcolor day_header_bgcolor ] \
    [ -calendar_width calendar_width ] [ -day_bgcolor day_bgcolor ] \
    [ -day_text_color day_text_color ] \
    [ -empty_bgcolor empty_bgcolor ] \
    [ -next_month_template next_month_template ] \
    [ -prev_month_template prev_month_template ] [ -width width ]

Defined in packages/acs-datetime/tcl/acs-calendar-procs.tcl

Deprecated. Invoking this procedure generates a warning.

Switches:

-calendar_details

(optional)

-date

(optional)

-days_of_week

(optional)

-large_calendar_p

(defaults to "0") (optional)

-master_bgcolor

(defaults to "black") (optional)

-header_bgcolor

(defaults to "black") (optional)

-header_text_color

(defaults to "white") (optional)

-header_text_size

(defaults to "+1") (optional)

-day_number_template

(defaults to "<!--$julian_date-->$day_number") (optional)

-day_header_size

(defaults to "1") (optional)

-day_header_bgcolor

(defaults to "#666666") (optional)

-calendar_width

(defaults to "0") (optional)

-day_bgcolor

(defaults to "#DDDDDD") (optional)

-day_text_color

(defaults to "white") (optional)

-empty_bgcolor

(defaults to "white") (optional)

-next_month_template

(optional)

-prev_month_template

(optional)

-width

(defaults to "2") (optional)

Returns:

a year of small calendars given the starting month as a date. Defaults to this month. Data in calendar_details will be ignored.

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

ad_log_deprecated proc dt_widget_year
    if { $width < 1 || $width > 12 } {
        return "[_ acs-datetime.lt_Width_must_be_]"
    }

    if {$days_of_week eq ""} {
        set days_of_week "[_ acs-datetime.short_days_of_week]"
    }

    set output "<table><tr valign=top>\n"
    set current_width 0

    for { set n 1 } { $n <= 12 } { incr n } {
        dt_get_info $date

        append output "
        <td>
        [dt_widget_month_small -calendar_details $calendar_details -date $date -days_of_week $days_of_week -large_calendar_p $large_calendar_p -master_bgcolor $master_bgcolor -header_bgcolor $header_bgcolor -header_text_color $header_text_color -header_text_size $header_text_size    -day_number_template $day_number_template -day_header_size $day_header_size -day_header_bgcolor $day_header_bgcolor -calendar_width $calendar_width -day_bgcolor $day_bgcolor -day_text_color $day_text_color -empty_bgcolor $empty_bgcolor -next_month_template $next_month_template -prev_month_template $prev_month_template ]
        </td>\n"

        incr current_width

        if { $current_width == $width && $n != 12} {
            set current_width 0
            append output "</tr><tr valign=top>\n"
        }

        set date $next_month
    }

    return [concat $output "</tr></table>\n"]

XQL Not present:

Generic, PostgreSQL, Oracle