apm_bootstrap_load_queries

 apm_bootstrap_load_queries

Defined in

Partial Call Graph (max 5 caller/called nodes):
%3 packages/acs-bootstrap-installer/bootstrap.tcl packages/acs-bootstrap-installer/ bootstrap.tcl apm_bootstrap_load_queries apm_bootstrap_load_queries packages/acs-bootstrap-installer/bootstrap.tcl->apm_bootstrap_load_queries ad_find_all_files ad_find_all_files (public) apm_bootstrap_load_queries->ad_find_all_files apm_guess_db_type apm_guess_db_type (public) apm_bootstrap_load_queries->apm_guess_db_type apm_guess_file_type apm_guess_file_type (public) apm_bootstrap_load_queries->apm_guess_file_type db_qd_load_query_file db_qd_load_query_file (public) apm_bootstrap_load_queries->db_qd_load_query_file

Testcases:
No testcase defined.
Source code:

    # Load up queries.

    set db_type [nsv_get ad_database_type .]

    # DRB: We can't parse the $package_key.info file at this point in time, primarily because
    # grabbing the package information uses not only the XML file but tables from the APM,
    # which haven't been loaded yet if we're installing.  So we just snarf all of the
    # queryfiles in this package that match the current database or no database
    # (which we interpret to mean all supported databases).

    set files [ad_find_all_files $::acs::rootdir/packages/$package_key]
    if { [llength $files] == 0 } {
        error "Unable to locate $::acs::rootdir/packages/$package_key/*."
    }

    foreach file [lsort $files] {

        set file_db_type [apm_guess_db_type $package_key $file]
        set file_type [apm_guess_file_type $package_key $file]

        if {$file_type eq "query_file" &&
            ($file_db_type eq "" || $file_db_type eq $db_type)} {
            db_qd_load_query_file $file
        }
    }
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: