mondrian-olap 0.3.0 → 0.5.0

data/spec/rake_tasks.rb

@@ -82,7 +82,7 @@ namespace :db do
   task :define_models => :require_spec_helper do
     unless MONDRIAN_DRIVER == 'luciddb'
       class TimeDimension < ActiveRecord::Base
-        set_table_name "time"
+        self.table_name = "time"
         validates_presence_of :the_date
         before_create do
           self.the_day = the_date.strftime("%A")
@@ -102,7 +102,7 @@ namespace :db do
       class Customer < ActiveRecord::Base
       end
       class Sales < ActiveRecord::Base
-        set_table_name "sales"
+        self.table_name = "sales"
         belongs_to :time_by_day
         belongs_to :product
         belongs_to :customer
@@ -150,7 +150,7 @@ namespace :db do
         )
         Product.create!(
           # LucidDB is not returning inserted ID therefore doing it hard way
-          :product_class_id => ProductClass.find_all_by_product_category("Category #{i}").first.id,
+          :product_class_id => ProductClass.where(:product_category => "Category #{i}").to_a.first.id,
           :brand_name => "Brand #{i}",
           :product_name => "Product #{i}"
         )
@@ -223,9 +223,9 @@ namespace :db do
       Sales.delete_all
       count = 100
       # LucidDB does not support LIMIT therefore select all and limit in Ruby
-      products = Product.order("id").all[0...count]
-      times = TimeDimension.order("id").all[0...count]
-      customers = Customer.order("id").all[0...count]
+      products = Product.order("id").to_a[0...count]
+      times = TimeDimension.order("id").to_a[0...count]
+      customers = Customer.order("id").to_a[0...count]
       count.times do |i|
         Sales.create!(
           :product_id => products[i].id,
@@ -251,9 +251,9 @@ namespace :spec do
     end
   end
 
-  desc "Run specs with all database drivers"
+  desc "Run specs with all primary database drivers"
   task :all do
-    %w(mysql postgresql oracle luciddb mssql sqlserver).each do |driver|
+    %w(mysql postgresql oracle mssql).each do |driver|
       Rake::Task["spec:#{driver}"].invoke
     end
   end

data/spec/schema_definition_spec.rb

@@ -1,3 +1,5 @@
+# encoding: utf-8
+
 require "spec_helper"
 
 describe "Schema definition" do
@@ -10,25 +12,25 @@ describe "Schema definition" do
     describe "root element" do
       it "should render to XML" do
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema/>
         XML
       end
 
       it "should render to XML with attributes" do
         @schema.define('FoodMart') do
-          description 'Demo "FoodMart" schema'
+          description 'Demo "FoodMart" schema āčē'
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
-        <Schema description="Demo &quot;FoodMart&quot; schema" name="FoodMart"/>
+        <?xml version="1.0" encoding="UTF-8"?>
+        <Schema description="Demo &quot;FoodMart&quot; schema āčē" name="FoodMart"/>
         XML
       end
 
       it "should render to XML using class method" do
         schema = Mondrian::OLAP::Schema.define('FoodMart')
         schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="FoodMart"/>
         XML
       end
@@ -45,7 +47,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube cache="false" defaultMeasure="Unit Sales" description="Sales cube" enabled="true" name="Sales"/>
         </Schema>
@@ -58,7 +60,7 @@ describe "Schema definition" do
             :description => 'Sales cube', :cache => false, :enabled => true
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube cache="false" defaultMeasure="Unit Sales" description="Sales cube" enabled="true" name="Sales"/>
         </Schema>
@@ -74,7 +76,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Table alias="sales" name="sales_fact"/>
@@ -91,7 +93,7 @@ describe "Schema definition" do
         end
         %w(oracle luciddb).each do |driver|
           @schema.to_xml(:driver => driver).should be_like <<-XML
-          <?xml version="1.0"?>
+          <?xml version="1.0" encoding="UTF-8"?>
           <Schema name="default">
             <Cube name="Sales">
               <Table alias="SALES" name="SALES_FACT" schema="FACTS"/>
@@ -108,7 +110,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Table alias="SALES" name="SALES_FACT" schema="FACTS"/>
@@ -125,7 +127,7 @@ describe "Schema definition" do
         end
         %w(oracle luciddb).each do |driver|
           @schema.to_xml(:driver => driver).should be_like <<-XML
-          <?xml version="1.0"?>
+          <?xml version="1.0" encoding="UTF-8"?>
           <Schema name="default">
             <Cube name="Sales">
               <Table alias="sales" name="sales_fact" schema="facts"/>
@@ -144,7 +146,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Table alias="sales" name="sales_fact">
@@ -166,7 +168,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <View alias="sales">
@@ -195,7 +197,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Dimension foreignKey="customer_id" name="Gender">
@@ -226,7 +228,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Dimension foreignKey="time_id" name="Time">
@@ -242,6 +244,39 @@ describe "Schema definition" do
         XML
       end
 
+      it "should render dimension with hierarchy and level defaults" do
+        @schema.define do
+          cube 'Sales' do
+            dimension 'Time' do
+              foreign_key 'time_id'
+              hierarchy do
+                all_member_name 'All Times' # should add :has_all => true
+                primary_key 'time_id'
+                table 'time_by_day'
+                level 'Year', :column => 'the_year', :type => 'Numeric' # first level should have default :unique_members => true
+                level 'Quarter', :column => 'quarter' # next levels should have default :unique_members => false
+                level 'Month', :column => 'month_of_year', :type => 'Numeric'
+              end
+            end
+          end
+        end
+        @schema.to_xml.should be_like <<-XML
+        <?xml version="1.0" encoding="UTF-8"?>
+        <Schema name="default">
+          <Cube name="Sales">
+            <Dimension foreignKey="time_id" name="Time">
+              <Hierarchy allMemberName="All Times" hasAll="true" primaryKey="time_id">
+                <Table name="time_by_day"/>
+                <Level column="the_year" name="Year" type="Numeric" uniqueMembers="true"/>
+                <Level column="quarter" name="Quarter" uniqueMembers="false"/>
+                <Level column="month_of_year" name="Month" type="Numeric" uniqueMembers="false"/>
+              </Hierarchy>
+            </Dimension>
+          </Cube>
+        </Schema>
+        XML
+      end
+
       it "should render dimension hierarchy with join" do
         @schema.define do
           cube 'Sales' do
@@ -260,7 +295,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Dimension foreignKey="product_id" name="Products">
@@ -297,7 +332,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml(:driver => 'oracle').should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Dimension foreignKey="PRODUCT_ID" name="Products">
@@ -316,6 +351,113 @@ describe "Schema definition" do
         XML
       end
 
+      it "should render dimension hierarchy with nested joins" do
+        @schema.define do
+          cube 'Sales' do
+            dimension 'Products', :foreign_key => 'product_id' do
+              hierarchy :has_all => true, :all_member_name => 'All Products',
+                        :primary_key => 'product_id', :primary_key_table => 'product' do
+                join :left_key => 'product_class_id', :right_alias => 'product_class', :right_key => 'product_class_id' do
+                  table 'product'
+                  join :left_key  => 'product_type_id', :right_key => 'product_type_id' do
+                    table 'product_class'
+                    table 'product_type'
+                  end
+                end
+                level 'Product Family', :table => 'product_type', :column => 'product_family', :unique_members => true
+                level 'Product Category', :table => 'product_class', :column => 'product_category', :unique_members => false
+                level 'Brand Name', :table => 'product', :column => 'brand_name', :unique_members => false
+                level 'Product Name', :table => 'product', :column => 'product_name', :unique_members => true
+              end
+            end
+          end
+        end
+        @schema.to_xml.should be_like <<-XML
+        <?xml version="1.0" encoding="UTF-8"?>
+        <Schema name="default">
+          <Cube name="Sales">
+            <Dimension foreignKey="product_id" name="Products">
+              <Hierarchy allMemberName="All Products" hasAll="true" primaryKey="product_id" primaryKeyTable="product">
+                <Join leftKey="product_class_id" rightAlias="product_class" rightKey="product_class_id">
+                  <Table name="product"/>
+                  <Join leftKey="product_type_id" rightKey="product_type_id">
+                    <Table name="product_class"/>
+                    <Table name="product_type"/>
+                  </Join>
+                </Join>
+                <Level column="product_family" name="Product Family" table="product_type" uniqueMembers="true"/>
+                <Level column="product_category" name="Product Category" table="product_class" uniqueMembers="false"/>
+                <Level column="brand_name" name="Brand Name" table="product" uniqueMembers="false"/>
+                <Level column="product_name" name="Product Name" table="product" uniqueMembers="true"/>
+              </Hierarchy>
+            </Dimension>
+          </Cube>
+        </Schema>
+        XML
+      end
+
+    end
+
+    describe "Shared dimension" do
+      it "should render to XML" do
+        @schema.define do
+          dimension 'Gender' do
+            hierarchy do
+              has_all true
+              all_member_name 'All Genders'
+              primary_key 'customer_id'
+              table 'customer'
+              level 'Gender', :column => 'gender', :unique_members => true
+            end
+          end
+          cube 'Sales' do
+            dimension_usage 'Gender', :foreign_key => 'customer_id' # by default :source => 'Gender' will be added
+          end
+        end
+        @schema.to_xml.should be_like <<-XML
+        <?xml version="1.0" encoding="UTF-8"?>
+        <Schema name="default">
+          <Dimension name="Gender">
+            <Hierarchy allMemberName="All Genders" hasAll="true" primaryKey="customer_id">
+              <Table name="customer"/>
+              <Level column="gender" name="Gender" uniqueMembers="true"/>
+            </Hierarchy>
+          </Dimension>
+          <Cube name="Sales">
+            <DimensionUsage foreignKey="customer_id" name="Gender" source="Gender"/>
+          </Cube>
+        </Schema>
+        XML
+      end
+    end
+
+    describe "Virtual cube" do
+      it "should render to XML" do
+        @schema.define do
+          virtual_cube 'Warehouse and Sales', :default_measure => 'Store Sales' do
+            virtual_cube_dimension 'Customers', :cube_name => 'Sales'
+            virtual_cube_dimension 'Product'
+            virtual_cube_measure '[Measures].[Store Sales]', :cube_name => 'Sales'
+            calculated_member 'Profit' do
+              dimension 'Measures'
+              formula '[Measures].[Store Sales] - [Measures].[Store Cost]'
+            end
+          end
+        end
+        @schema.to_xml.should be_like <<-XML
+        <?xml version="1.0" encoding="UTF-8"?>
+        <Schema name="default">
+          <VirtualCube defaultMeasure="Store Sales" name="Warehouse and Sales">
+            <VirtualCubeDimension cubeName="Sales" name="Customers"/>
+            <VirtualCubeDimension name="Product"/>
+            <VirtualCubeMeasure cubeName="Sales" name="[Measures].[Store Sales]"/>
+            <CalculatedMember dimension="Measures" name="Profit">
+              <Formula>[Measures].[Store Sales] - [Measures].[Store Cost]</Formula>
+            </CalculatedMember>
+          </VirtualCube>
+        </Schema>
+        XML
+      end
     end
 
     describe "Measure" do
@@ -326,13 +468,15 @@ describe "Schema definition" do
               column 'unit_sales'
               aggregator 'sum'
             end
+            measure 'Store Sales', :column => 'store_sales' # by default should use sum aggregator
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Measure aggregator="sum" column="unit_sales" name="Unit Sales"/>
+            <Measure aggregator="sum" column="store_sales" name="Store Sales"/>
           </Cube>
         </Schema>
         XML
@@ -348,7 +492,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml(:driver => 'oracle').should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Measure aggregator="sum" column="UNIT_SALES" name="Unit Sales"/>
@@ -368,7 +512,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Measure aggregator="sum" name="Double Unit Sales">
@@ -394,7 +538,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <CalculatedMember dimension="Measures" formatString="#,##0.00" name="Profit">
@@ -404,6 +548,32 @@ describe "Schema definition" do
         </Schema>
         XML
       end
+
+      it "should render embedded cube XML defintion before additional calculated member to XML" do
+        @schema.define do
+          cube 'Sales' do
+            xml <<-XML
+              <Table name="sales_fact_1997"/>
+            XML
+            calculated_member 'Profit' do
+              dimension 'Measures'
+              formula '[Measures].[Store Sales] - [Measures].[Store Cost]'
+              format_string '#,##0.00'
+            end
+          end
+        end
+        @schema.to_xml.should be_like <<-XML
+        <?xml version="1.0" encoding="UTF-8"?>
+        <Schema name="default">
+          <Cube name="Sales">
+            <Table name="sales_fact_1997"/>
+            <CalculatedMember dimension="Measures" formatString="#,##0.00" name="Profit">
+              <Formula>[Measures].[Store Sales] - [Measures].[Store Cost]</Formula>
+            </CalculatedMember>
+          </Cube>
+        </Schema>
+        XML
+      end
     end
 
     describe "Aggregates" do
@@ -425,7 +595,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Table name="sales_fact_1997">
@@ -465,7 +635,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Table name="sales_fact_1997">
@@ -519,7 +689,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Table name="sales_fact_1997">
@@ -573,7 +743,7 @@ describe "Schema definition" do
           end
         end
         @schema.to_xml.should be_like <<-XML
-        <?xml version="1.0"?>
+        <?xml version="1.0" encoding="UTF-8"?>
         <Schema name="default">
           <Cube name="Sales">
             <Dimension foreignKey="employee_id" name="Employees">
@@ -594,6 +764,615 @@ describe "Schema definition" do
       end
     end
 
+    describe "Element annotations" do
+      it "should render XML from block of elements" do
+        @schema.define do
+          cube 'Sales' do
+            annotations do
+              annotation 'key1', 'value1'
+              annotation 'key2', 'value2'
+            end
+            measure 'Unit Sales', :column => 'unit_sales' do
+              annotations do
+                annotation 'key3', 'value3'
+              end
+            end
+          end
+        end
+        @schema.to_xml.should be_like <<-XML
+        <?xml version="1.0" encoding="UTF-8"?>
+        <Schema name="default">
+          <Cube name="Sales">
+            <Annotations>
+              <Annotation name="key1">value1</Annotation>
+              <Annotation name="key2">value2</Annotation>
+            </Annotations>
+            <Measure aggregator="sum" column="unit_sales" name="Unit Sales">
+              <Annotations>
+                <Annotation name="key3">value3</Annotation>
+              </Annotations>
+            </Measure>
+          </Cube>
+        </Schema>
+        XML
+      end
+
+      it "should render XML from hash options" do
+        @schema.define do
+          cube 'Sales' do
+            annotations :key1 => 'value1', :key2 => 'value2'
+            measure 'Unit Sales', :column => 'unit_sales', :annotations => {:key3 => 'value3'}
+          end
+        end
+        @schema.to_xml.should be_like <<-XML
+        <?xml version="1.0" encoding="UTF-8"?>
+        <Schema name="default">
+          <Cube name="Sales">
+            <Annotations>
+              <Annotation name="key1">value1</Annotation>
+              <Annotation name="key2">value2</Annotation>
+            </Annotations>
+            <Measure aggregator="sum" column="unit_sales" name="Unit Sales">
+              <Annotations>
+                <Annotation name="key3">value3</Annotation>
+              </Annotations>
+            </Measure>
+          </Cube>
+        </Schema>
+        XML
+      end
+    end
+
+    describe "User defined functions and formatters in JavaScript" do
+      before(:each) do
+        @schema.define do
+          cube 'Sales' do
+            table 'sales'
+            dimension 'Customers', :foreign_key => 'customer_id' do
+              hierarchy :has_all => true, :all_member_name => 'All Customers', :primary_key => 'id' do
+                table 'customers'
+                level 'Name', :column => 'fullname' do
+                  member_formatter { javascript "return member.getName().toUpperCase();" }
+                  property 'City', :column => 'city' do
+                    property_formatter { javascript "return propertyValue.toUpperCase();" }
+                  end
+                end
+              end
+            end
+            calculated_member 'Factorial' do
+              dimension 'Measures'
+              formula 'Factorial(6)'
+              cell_formatter do
+                javascript <<-JS
+                  var s = value.toString();
+                  while (s.length < 20) {
+                    s = "0" + s;
+                  }
+                  return s;
+                JS
+              end
+            end
+            calculated_member 'City' do
+              dimension 'Measures'
+              formula "[Customers].CurrentMember.Properties('City')"
+            end
+          end
+          user_defined_function 'Factorial' do
+            javascript <<-JS
+              function getParameterTypes() {
+                return new Array(
+                  new mondrian.olap.type.NumericType());
+              }
+              function getReturnType(parameterTypes) {
+                return new mondrian.olap.type.NumericType();
+              }
+              function execute(evaluator, arguments) {
+                var n = arguments[0].evaluateScalar(evaluator);
+                return factorial(n);
+              }
+              function factorial(n) {
+                return n <= 1 ? 1 : n * factorial(n - 1);
+              }
+            JS
+          end
+        end
+        @olap = Mondrian::OLAP::Connection.create(CONNECTION_PARAMS.merge :schema => @schema)
+      end
+
+      it "should render XML" do
+        @schema.to_xml.should be_like <<-XML
+        <?xml version="1.0" encoding="UTF-8"?>
+        <Schema name="default">
+          <Cube name="Sales">
+            <Table name="sales"/>
+            <Dimension foreignKey="customer_id" name="Customers">
+              <Hierarchy allMemberName="All Customers" hasAll="true" primaryKey="id">
+                <Table name="customers"/>
+                <Level column="fullname" name="Name" uniqueMembers="true">
+                  <MemberFormatter>
+                    <Script language="JavaScript">return member.getName().toUpperCase();</Script>
+                  </MemberFormatter>
+                  <Property column="city" name="City">
+                    <PropertyFormatter>
+                      <Script language="JavaScript">return propertyValue.toUpperCase();</Script>
+                    </PropertyFormatter>
+                  </Property>
+                </Level>
+              </Hierarchy>
+            </Dimension>
+            <CalculatedMember dimension="Measures" name="Factorial">
+              <Formula>Factorial(6)</Formula>
+              <CellFormatter>
+                <Script language="JavaScript">
+                  var s = value.toString();
+                  while (s.length &lt; 20) {
+                    s = "0" + s;
+                  }
+                  return s;
+                </Script>
+              </CellFormatter>
+            </CalculatedMember>
+            <CalculatedMember dimension="Measures" name="City">
+              <Formula>[Customers].CurrentMember.Properties('City')</Formula>
+            </CalculatedMember>
+          </Cube>
+          <UserDefinedFunction name="Factorial">
+            <Script language="JavaScript">
+              function getParameterTypes() {
+                return new Array(
+                  new mondrian.olap.type.NumericType());
+              }
+              function getReturnType(parameterTypes) {
+                return new mondrian.olap.type.NumericType();
+              }
+              function execute(evaluator, arguments) {
+                var n = arguments[0].evaluateScalar(evaluator);
+                return factorial(n);
+              }
+              function factorial(n) {
+                return n &lt;= 1 ? 1 : n * factorial(n - 1);
+              }
+            </Script>
+          </UserDefinedFunction>
+        </Schema>
+        XML
+      end
+
+      it "should execute user defined function" do
+        result = @olap.from('Sales').columns('[Measures].[Factorial]').execute
+        value = 1*2*3*4*5*6
+        result.values.should == [value]
+        result.formatted_values.should == ["%020d" % value]
+      end
+
+      it "should format members and properties" do
+        result = @olap.from('Sales').columns('[Measures].[City]').rows('[Customers].[All Customers].Children').execute
+        result.row_members.each_with_index do |member, i|
+          member.caption.should == member.name.upcase
+          city = member.property_value('City')
+          result.formatted_values[i].first.should == city
+          member.property_formatted_value('City').should == city.upcase
+        end
+      end
+    end
+
+    describe "User defined functions and formatters in CoffeeScript" do
+      before(:each) do
+        @schema.define do
+          cube 'Sales' do
+            table 'sales'
+            dimension 'Customers', :foreign_key => 'customer_id' do
+              hierarchy :has_all => true, :all_member_name => 'All Customers', :primary_key => 'id' do
+                table 'customers'
+                level 'Name', :column => 'fullname' do
+                  member_formatter { coffeescript "member.getName().toUpperCase()" }
+                  property 'City', :column => 'city' do
+                    property_formatter { coffeescript "propertyValue.toUpperCase()" }
+                  end
+                end
+              end
+            end
+            calculated_member 'Factorial' do
+              dimension 'Measures'
+              formula 'Factorial(6)'
+              cell_formatter do
+                coffeescript <<-JS
+                  s = value.toString()
+                  s = "0" + s while s.length < 20
+                  s
+                JS
+              end
+            end
+            calculated_member 'City' do
+              dimension 'Measures'
+              formula "[Customers].CurrentMember.Properties('City')"
+            end
+          end
+          user_defined_function 'Factorial' do
+            coffeescript <<-JS
+              parameters: ["Numeric"]
+              returns: "Numeric"
+              execute: (n) ->
+                if n <= 1 then 1 else n * @execute(n - 1)
+            JS
+          end
+          user_defined_function 'UpperName' do
+            coffeescript <<-JS
+              parameters: ["Member"]
+              returns: "String"
+              syntax: "Property"
+              execute: (member) ->
+                member.getName().toUpperCase()
+            JS
+          end
+          user_defined_function 'toUpperName' do
+            coffeescript <<-JS
+              parameters: ["Member", "String"]
+              returns: "String"
+              syntax: "Method"
+              execute: (member, dummy) ->
+                member.getName().toUpperCase()
+            JS
+          end
+        end
+        @olap = Mondrian::OLAP::Connection.create(CONNECTION_PARAMS.merge :schema => @schema)
+      end
+
+      it "should execute user defined function" do
+        result = @olap.from('Sales').columns('[Measures].[Factorial]').execute
+        value = 1*2*3*4*5*6
+        result.values.should == [value]
+        result.formatted_values.should == ["%020d" % value]
+      end
+
+      it "should format members and properties" do
+        result = @olap.from('Sales').columns('[Measures].[City]').rows('[Customers].[All Customers].Children').execute
+        result.row_members.each_with_index do |member, i|
+          member.caption.should == member.name.upcase
+          city = member.property_value('City')
+          result.formatted_values[i].first.should == city
+          member.property_formatted_value('City').should == city.upcase
+        end
+      end
+
+      it "should execute user defined property on member" do
+        result = @olap.from('Sales').
+          with_member('[Measures].[Upper Name]').as('[Customers].CurrentMember.UpperName').
+          columns('[Measures].[Upper Name]').rows('[Customers].Children').execute
+        result.row_members.each_with_index do |member, i|
+          result.values[i].should == [member.name.upcase]
+        end
+      end
+
+      it "should execute user defined method on member" do
+        result = @olap.from('Sales').
+          with_member('[Measures].[Upper Name]').as("[Customers].CurrentMember.toUpperName('dummy')").
+          columns('[Measures].[Upper Name]').rows('[Customers].Children').execute
+        result.row_members.each_with_index do |member, i|
+          result.values[i].should == [member.name.upcase]
+        end
+      end
+    end
+
+    describe "User defined functions and formatters in Ruby" do
+      before(:each) do
+        @schema.define do
+          cube 'Sales' do
+            table 'sales'
+            dimension 'Customers', :foreign_key => 'customer_id' do
+              hierarchy :has_all => true, :all_member_name => 'All Customers', :primary_key => 'id' do
+                table 'customers'
+                level 'Name', :column => 'fullname' do
+                  member_formatter { ruby {|member| member.getName().upcase } }
+                  property 'City', :column => 'city' do
+                    property_formatter { ruby {|member, property_name, property_value| property_value.upcase} }
+                  end
+                end
+              end
+            end
+            calculated_member 'Factorial' do
+              dimension 'Measures'
+              formula 'Factorial(6)'
+              cell_formatter { ruby {|value| "%020d" % value} }
+            end
+            calculated_member 'City' do
+              dimension 'Measures'
+              formula "[Customers].CurrentMember.Properties('City')"
+            end
+          end
+          user_defined_function 'Factorial' do
+            ruby do
+              parameters :numeric
+              returns :numeric
+              def call(n)
+                n <= 1 ? 1 : n * call(n - 1)
+              end
+            end
+          end
+          user_defined_function 'UpperName' do
+            ruby do
+              parameters :member
+              returns :string
+              syntax :property
+              def call(member)
+                member.getName.upcase
+              end
+            end
+          end
+          user_defined_function 'toUpperName' do
+            ruby do
+              parameters :member, :string
+              returns :string
+              syntax :method
+              def call(member, dummy)
+                member.getName.upcase
+              end
+            end
+          end
+          user_defined_function 'firstUpperName' do
+            ruby do
+              parameters :set
+              returns :string
+              syntax :property
+              def call(set)
+                set.first.getName.upcase
+              end
+            end
+          end
+          user_defined_function 'firstToUpperName' do
+            ruby do
+              parameters :set, :string
+              returns :string
+              syntax :method
+              def call(set, dummy)
+                set.first.getName.upcase
+              end
+            end
+          end
+          user_defined_function 'firstChildUpperName' do
+            ruby do
+              parameters :hierarchy
+              returns :string
+              syntax :property
+              def call_with_evaluator(evaluator, hierarchy)
+                evaluator.getSchemaReader.getMemberChildren(hierarchy.getDefaultMember).first.getName.upcase
+              end
+            end
+          end
+          user_defined_function 'firstLevelChildUpperName' do
+            ruby do
+              parameters :level
+              returns :string
+              syntax :property
+              def call_with_evaluator(evaluator, level)
+                evaluator.getSchemaReader.getLevelMembers(level, false).first.getName.upcase
+              end
+            end
+          end
+        end
+        @olap = Mondrian::OLAP::Connection.create(CONNECTION_PARAMS.merge :schema => @schema)
+      end
+
+      it "should execute user defined function" do
+        result = @olap.from('Sales').columns('[Measures].[Factorial]').execute
+        value = 1*2*3*4*5*6
+        result.values.should == [value]
+        result.formatted_values.should == ["%020d" % value]
+      end
+
+      it "should format members and properties" do
+        result = @olap.from('Sales').columns('[Measures].[City]').rows('[Customers].[All Customers].Children').execute
+        result.row_members.each_with_index do |member, i|
+          member.caption.should == member.name.upcase
+          city = member.property_value('City')
+          result.formatted_values[i].first.should == city
+          member.property_formatted_value('City').should == city.upcase
+        end
+      end
+
+      it "should execute user defined property on member" do
+        result = @olap.from('Sales').
+          with_member('[Measures].[Upper Name]').as('[Customers].CurrentMember.UpperName').
+          columns('[Measures].[Upper Name]').rows('[Customers].Children').execute
+        result.row_members.each_with_index do |member, i|
+          result.values[i].should == [member.name.upcase]
+        end
+      end
+
+      it "should execute user defined method on member" do
+        result = @olap.from('Sales').
+          with_member('[Measures].[Upper Name]').as("[Customers].CurrentMember.toUpperName('dummy')").
+          columns('[Measures].[Upper Name]').rows('[Customers].Children').execute
+        result.row_members.each_with_index do |member, i|
+          result.values[i].should == [member.name.upcase]
+        end
+      end
+
+      it "should execute user defined property on set" do
+        result = @olap.from('Sales').
+          with_member('[Measures].[Upper Name]').as("{[Customers].CurrentMember}.firstUpperName").
+          columns('[Measures].[Upper Name]').rows('[Customers].Children').execute
+        result.row_members.each_with_index do |member, i|
+          result.values[i].should == [member.name.upcase]
+        end
+      end
+
+      it "should execute user defined method on set" do
+        result = @olap.from('Sales').
+          with_member('[Measures].[Upper Name]').as("{[Customers].CurrentMember}.firstToUpperName('dummy')").
+          columns('[Measures].[Upper Name]').rows('[Customers].Children').execute
+        result.row_members.each_with_index do |member, i|
+          result.values[i].should == [member.name.upcase]
+        end
+      end
+
+      it "should execute user defined property on hierarchy" do
+        result = @olap.from('Sales').
+          with_member('[Measures].[Upper Name]').as("[Customers].firstChildUpperName").
+          columns('[Measures].[Upper Name]').rows('[Customers].Children').execute
+        first_member = result.row_members.first
+        result.row_members.each_with_index do |member, i|
+          result.values[i].should == [first_member.name.upcase]
+        end
+      end
+
+      it "should execute user defined property on level" do
+        result = @olap.from('Sales').
+          with_member('[Measures].[Upper Name]').as("[Customers].[Name].firstLevelChildUpperName").
+          columns('[Measures].[Upper Name]').rows('[Customers].Children').execute
+        first_member = result.row_members.first
+        result.row_members.each_with_index do |member, i|
+          result.values[i].should == [first_member.name.upcase]
+        end
+      end
+    end
+
+    describe "Shared user defined functions in Ruby" do
+      before(:each) do
+        shared_schema = Mondrian::OLAP::Schema.define do
+          user_defined_function 'Factorial' do
+            ruby :shared do
+              parameters :numeric
+              returns :numeric
+              def call(n)
+                n <= 1 ? 1 : n * call(n - 1)
+              end
+            end
+          end
+          user_defined_function 'UpperName' do
+            ruby :shared do
+              parameters :member
+              returns :string
+              syntax :property
+              def call(member)
+                member.getName.upcase
+              end
+            end
+          end
+          user_defined_function 'toUpperName' do
+            ruby :shared do
+              parameters :member, :string
+              returns :string
+              syntax :method
+              def call(member, dummy)
+                member.getName.upcase
+              end
+            end
+          end
+          user_defined_cell_formatter 'Integer20Digits' do
+            ruby :shared do |value|
+              "%020d" % value
+            end
+          end
+        end
+
+        @schema.define do
+          include_schema shared_schema
+
+          cube 'Sales' do
+            table 'sales'
+            dimension 'Customers', :foreign_key => 'customer_id' do
+              hierarchy :has_all => true, :all_member_name => 'All Customers', :primary_key => 'id' do
+                table 'customers'
+                level 'Name', :column => 'fullname'
+              end
+            end
+            measure 'Unit Sales', :column => 'unit_sales', :aggregator => 'sum', :format_string => '#,##0'
+            calculated_member 'Factorial' do
+              dimension 'Measures'
+              formula 'Factorial(6)'
+              cell_formatter 'Integer20Digits'
+            end
+          end
+        end
+        @olap = Mondrian::OLAP::Connection.create(CONNECTION_PARAMS.merge :schema => @schema)
+      end
+
+      it "should render XML" do
+        @schema.to_xml.should be_like <<-XML
+        <?xml version="1.0" encoding="UTF-8"?>
+        <Schema name="default">
+          <Cube name="Sales">
+            <Table name="sales"/>
+            <Dimension foreignKey="customer_id" name="Customers">
+              <Hierarchy allMemberName="All Customers" hasAll="true" primaryKey="id">
+                <Table name="customers"/>
+                <Level column="fullname" name="Name" uniqueMembers="true"/>
+              </Hierarchy>
+            </Dimension>
+            <Measure aggregator="sum" column="unit_sales" formatString="#,##0" name="Unit Sales"/>
+            <CalculatedMember dimension="Measures" name="Factorial">
+              <Formula>Factorial(6)</Formula>
+              <CellFormatter className="rubyobj.Mondrian.OLAP.Schema.CellFormatter.Integer20DigitsUdf"/>
+            </CalculatedMember>
+          </Cube>
+          <UserDefinedFunction className="rubyobj.Mondrian.OLAP.Schema.UserDefinedFunction.FactorialUdf" name="Factorial"/>
+          <UserDefinedFunction className="rubyobj.Mondrian.OLAP.Schema.UserDefinedFunction.UppernameUdf" name="UpperName"/>
+          <UserDefinedFunction className="rubyobj.Mondrian.OLAP.Schema.UserDefinedFunction.TouppernameUdf" name="toUpperName"/>
+        </Schema>
+        XML
+      end
+
+      it "should execute user defined function" do
+        result = @olap.from('Sales').columns('[Measures].[Factorial]').execute
+        value = 1*2*3*4*5*6
+        result.values.should == [value]
+        result.formatted_values.should == ["%020d" % value]
+      end
+
+      it "should get measure cell formatter name" do
+        @olap.cube('Sales').member('[Measures].[Factorial]').cell_formatter_name.should == 'Integer20Digits'
+      end
+
+      it "should not get measure cell formatter name if not specified" do
+        @olap.cube('Sales').member('[Measures].[Unit Sales]').cell_formatter_name.should be_nil
+      end
+
+      it "should get measure format string" do
+        @olap.cube('Sales').member('[Measures].[Unit Sales]').format_string.should == '#,##0'
+      end
+
+      it "should not get measure format string if not specified" do
+        @olap.cube('Sales').member('[Measures].[Factorial]').format_string.should be_nil
+      end
+
+    end
+
+    describe "Roles" do
+      it "should render XML" do
+        @schema.define do
+          role 'California manager' do
+            schema_grant :access => 'none' do
+              cube_grant :cube => 'Sales', :access => 'all' do
+                dimension_grant :dimension => '[Measures]', :access => 'all'
+                hierarchy_grant :hierarchy => '[Customers]', :access => 'custom',
+                                :top_level => '[Customers].[State Province]', :bottom_level => '[Customers].[City]' do
+                  member_grant :member => '[Customers].[USA].[CA]', :access => 'all'
+                  member_grant :member => '[Customers].[USA].[CA].[Los Angeles]', :access => 'none'
+                end
+              end
+            end
+          end
+        end
+        @schema.to_xml.should be_like <<-XML
+        <?xml version="1.0" encoding="UTF-8"?>
+        <Schema name="default">
+          <Role name="California manager">
+            <SchemaGrant access="none">
+              <CubeGrant access="all" cube="Sales">
+                <DimensionGrant access="all" dimension="[Measures]"/>
+                <HierarchyGrant access="custom" bottomLevel="[Customers].[City]" hierarchy="[Customers]" topLevel="[Customers].[State Province]">
+                  <MemberGrant access="all" member="[Customers].[USA].[CA]"/>
+                  <MemberGrant access="none" member="[Customers].[USA].[CA].[Los Angeles]"/>
+                </HierarchyGrant>
+              </CubeGrant>
+            </SchemaGrant>
+          </Role>
+        </Schema>
+        XML
+      end
+    end
+
   end
 
   describe "connection with schema" do
@@ -636,4 +1415,44 @@ describe "Schema definition" do
 
   end
 
-end
+  describe "errors" do
+    before(:each) do
+      @schema = Mondrian::OLAP::Schema.new
+    end
+
+    it "should raise error when invalid schema" do
+      @schema.define do
+        cube 'Sales' do
+        end
+      end
+      expect {
+        Mondrian::OLAP::Connection.create(CONNECTION_PARAMS.merge :schema => @schema)
+      }.to raise_error {|e|
+        e.should be_kind_of(Mondrian::OLAP::Error)
+        e.message.should == "mondrian.olap.MondrianException: Mondrian Error:Internal error: Must specify fact table of cube 'Sales'"
+        e.root_cause_message.should == "Internal error: Must specify fact table of cube 'Sales'"
+      }
+    end
+
+    it "should raise error when invalid calculated member formula" do
+      @schema.define do
+        cube 'Sales' do
+          table 'sales'
+          calculated_member 'Dummy' do
+            dimension 'Measures'
+            formula 'Dummy(123)'
+          end
+        end
+      end
+      expect {
+        Mondrian::OLAP::Connection.create(CONNECTION_PARAMS.merge :schema => @schema)
+      }.to raise_error {|e|
+        e.should be_kind_of(Mondrian::OLAP::Error)
+        e.message.should == "mondrian.olap.MondrianException: Mondrian Error:Named set in cube 'Sales' has bad formula"
+        e.root_cause_message.should == "No function matches signature 'Dummy(<Numeric Expression>)'"
+      }
+    end
+
+  end
+
+end