_acs-datetime__dt_interval_check (private)
_acs-datetime__dt_interval_check
Defined in packages/acs-datetime/tcl/test/acs-datetime-procs.tcl
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- No testcase defined.
Source code: set _aa_export {} set body_count 1 foreach testcase_body {{ # # Start of the interval is after the end # set start "2020-08-20" set end "2020-08-19" aa_true "Start > End" "[expr {[dt_interval_check $start $end] < 0}]" # # Start of the interval is before the end # set end "2020-08-21" aa_true "Start < End" "[expr {[dt_interval_check $start $end] > 0}]" # # Start and end of the interval are equal # set end "2020-08-20" aa_equals "Start = End" "[dt_interval_check $start $end]" "0" }} { aa_log "Running testcase body $body_count" set ::__aa_test_indent [info level] set catch_val [catch $testcase_body msg] if {$catch_val != 0 && $catch_val != 2} { aa_log_result "fail" "dt_interval_check (body $body_count): Error during execution: $msg, stack trace: \n$::errorInfo" } incr body_count }XQL Not present: Generic, PostgreSQL, Oracle