calendar::item::dates_valid_p (private)

 calendar::item::dates_valid_p -start_date start_date \
    -end_date end_date

Defined in packages/calendar/tcl/cal-item-procs.tcl

A sanity check that the start time is before the end time.

Switches:

-start_date (required)

-end_date (required)

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

Testcases:

cal_item_start_end_date_validation

Source code:

    try {
        return [db_string dates_valid_p_select {
            select CASE
              WHEN cast(:start_date as timestamp with time zone)
                   <=
                   cast(:end_date as timestamp with time zone) THEN 1
              ELSE 0
            END from dual
        }]
    } on error {errmsg} {
        # Invalid dates in input, definitely not ok.
        ad_log warning $errmsg
        return 0
    }

Generic XQL file:

packages/calendar/tcl/cal-item-procs.xql

PostgreSQL XQL file:

packages/calendar/tcl/cal-item-procs-postgresql.xql

Oracle XQL file:

packages/calendar/tcl/cal-item-procs-oracle.xql