ad_return_complaint (public)

 ad_return_complaint exception_count exception_text

Defined in packages/acs-tcl/tcl/defs-procs.tcl

Return a page complaining about the user's input (as opposed to an error in our software, for which ad_return_error is more appropriate)

Parameters:
exception_count (required)
Number of exceptions. Used to say either 'a problem' or 'some problems'.
exception_text (required)
HTML chunk to go inside an UL tag with the error messages.

Partial Call Graph (max 5 caller/called nodes):
%3 test_create_folder_with_page create_folder_with_page (test xowf) ad_return_complaint ad_return_complaint test_create_folder_with_page->ad_return_complaint test_create_form_with_form_instance create_form_with_form_instance (test xowiki) test_create_form_with_form_instance->ad_return_complaint test_create_workflow_with_instance create_workflow_with_instance (test xowf) test_create_workflow_with_instance->ad_return_complaint test_xowiki_test_cases xowiki_test_cases (test xowiki) test_xowiki_test_cases->ad_return_complaint ad_parse_template ad_parse_template (public) ad_return_complaint->ad_parse_template lang::util::localize lang::util::localize (public) ad_return_complaint->lang::util::localize parameter::get_from_package_key parameter::get_from_package_key (public) ad_return_complaint->parameter::get_from_package_key Class ::xo::Context Class ::xo::Context (public) Class ::xo::Context->ad_return_complaint Class ::xowiki::includelet::categories Class ::xowiki::includelet::categories (public) Class ::xowiki::includelet::categories->ad_return_complaint ad_form ad_form (public) ad_form->ad_return_complaint calendar::item::edit calendar::item::edit (public) calendar::item::edit->ad_return_complaint calendar::item::new calendar::item::new (public) calendar::item::new->ad_return_complaint

Testcases:
create_folder_with_page, create_workflow_with_instance, xowiki_test_cases, create_form_with_form_instance
Source code:
    set complaint_template [parameter::get_from_package_key  -package_key "acs-tcl"  -parameter "ReturnComplaint"  -default "/packages/acs-tcl/lib/ad-return-complaint"]
    try {
        set html [ad_parse_template  -params [list [list exception_count $exception_count]  [list exception_text $exception_text]]  $complaint_template]
    } on error {} {
        set html [lang::util::localize $exception_text]
    }

    ns_return 422 text/html $html

    # raise abortion flag, e.g., for templating
    set ::request_aborted [list 422 "Problem with Your Input"]
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: