%@ Language="JavaScript" %> _ _
" + exception.description + "
Check your connection information"); Response.Write("
Server:" + server + "
Database:" + database+ "
Cube:" + cube); server = ""; // Resetting parameters so a refresh relaunches the connection. database = ""; cube = ""; } } } } // Reset the forced reconnection flag. reconnect = "false"; if (!fatalErr && con.State!=0) { cat.ActiveConnection = con; cst.ActiveConnection = con; // Dertermine if the regular grid is to be displayed, or if // the user is showing a list of members or drilling through. if (Request.Form("txtMemberMDX").Item.length == 0 && Request.Form("txtDrillMDX").Item.length == 0) { // Set the page type. This is used by the client to figure out how to handle the page. page = "query"; // // 2. EXECUTE THE MDX // strMDX = Request.Form("txtMDXout").Item; cst.Source = strMDX + " CELL PROPERTIES FORMATTED_VALUE, BACK_COLOR, FORE_COLOR"; try { cst.Open(); } catch(exception) { Response.Write("
" + exception.description + "
"); Response.Write("Detailed MDX Statement follows:
");
Response.Write(strMDX);
page = "error"; // Set the page type to error.
con.Close(); // Close the connection to the database.
}
if (cst.State !=0) {
//
// 3. RECREATE THE MDX
//
// Create our own MDX from the cellset in a format we understand and can manipulate further.
var MDXAxisClause = new Array("","");
var MDXFilterClause = "";
var MDXDimClause = new Array("","");
for (i=0;i<2;i++) {
// Initialise the clauses for each dimension.
for (k=0; k");
Response.Write(" ");
Response.Write("Reports \n");
Response.Write("Field List \n");
Response.Write("\n");
for (i=0; i
\n");
Response.Write("\n");
if (Hierarchies(j).UniqueName != "[Measures]") {
for (k=0;k
\n\n");
}
}
}
// Get the named sets
try {
rst = con.OpenSchema(43, Array(database, null, cube));
if (rst.RecordCount>0) {
// Write out the folder name for Named Sets
Response.Write("\n");
while (! rst.EOF) {
// Write out the named set if the function CreateVirtualDimension is not included - this was the means
// by which 7.0 cubes create virtual dimensions and these should not be included twice.
if (rst.fields.Item("EXPRESSION").value.search("CreateVirtualDimension") < 0) {
// The funny replace expression on the dimensions is to add square brackets for
// named sets with multiple dimensions.
Response.Write("
\n
" + QueryCaption[i] + "