_categories__category_init_procs (private)

 _categories__category_init_procs

Defined in packages/categories/tcl/test/categories-procs.tcl

Partial Call Graph (max 5 caller/called nodes):
%3 aa_equals aa_equals (public) aa_log aa_log (public) aa_log_result aa_log_result (public) db_string db_string (public) _categories__category_init_procs _categories__category_init_procs _categories__category_init_procs->aa_equals _categories__category_init_procs->aa_log _categories__category_init_procs->aa_log_result _categories__category_init_procs->db_string

Testcases:
No testcase defined.
Source code:
        
        set _aa_export {}
        set body_count 1
        foreach testcase_body {{
    set one_tree_id [db_string get_tree {
        select min(tree_id) from category_trees
    } -default ""]
    aa_equals "Tree translations have already been loaded at startup"  [expr {$one_tree_id ne ""}] [nsv_exists category_tree_translations $one_tree_id]

    set one_category_id [db_string get_category {
        select min(category_id) from categories
    } -default ""]
    aa_equals "Categroy translations have already been loaded at startup"  [expr {$one_category_id ne ""}] [nsv_exists categories $one_category_id]
}} {
          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" "category_init_procs (body $body_count): Error during execution: $msg, stack trace: \n$::errorInfo"
          }
          incr body_count
        }
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: