//Bool_t gApacheExec=1; gApacheNoCache=kTRUE; // File: TestInfoDisplay.C // This displays all the versions of the package GLEAM whose test results are // available in the database. A drop down menu of the version is shown and the // user can choose the version whose system tests he wants to see #include #include #include #include #include #include #include void TestInfoDisplay(){ TApache ap; ap.Puts(""); // First we select the version of the package GLEAM to display char *sql="select version from glast_data.release_tests where pkg_name = \'Gleam\'"; char *connection="oracle://sage/SLAC_TCP"; char *user="LAT "; char *pass="LATREAD"; // connect to oracle server TSQLServer *db=TSQLServer::Connect(connection, user, pass); // Submit the query to the database TSQLResult *res=db->Query(sql); TSQLRow *row1=res->Next(); // The HTML form ap.Puts(""); ap.Puts("

System Tests for GLAST Gleam

"); ap.Puts("

Select a Version to view test results

"); ap.Puts(""); ap.Puts(""""); ap.Puts(""); }// end of TestInfoDisplay