acs::test::reply_contains_no (public)

 acs::test::reply_contains_no [ -prefix prefix ] dict string

Defined in packages/acs-automated-testing/tcl/aa-test-procs.tcl

Convenience function for test cases to check, whether the resulting page does not contain the given string.

Switches:
-prefix (optional)
prefix for logging
Parameters:
dict (required)
request reply dict, containing at least the request body
string (required)
string to be checked on the page

Partial Call Graph (max 5 caller/called nodes):
%3 test_webtest_example webtest_example (test acs-automated-testing) acs::test::reply_contains_no acs::test::reply_contains_no test_webtest_example->acs::test::reply_contains_no aa_false aa_false (public) acs::test::reply_contains_no->aa_false acs::test::detail_link acs::test::detail_link (private) acs::test::reply_contains_no->acs::test::detail_link forums::test::edit forums::test::edit (private) forums::test::edit->acs::test::reply_contains_no forums::test::new forums::test::new (private) forums::test::new->acs::test::reply_contains_no forums::test::new_postings forums::test::new_postings (private) forums::test::new_postings->acs::test::reply_contains_no

Testcases:
webtest_example
Source code:
        set result [string match *$string* [dict get $dict body]]
        if {$result} {
            aa_false "${prefix}Reply contains no $string (<a href='[detail_link $dict]'>Details</a>)" $result
        } else {
            aa_false "${prefix}Reply contains no $string" $result
        }
        return [expr {!$result}]
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: