KirbyBase 2.6 → 2.6.1

data/examples/add_column_test/add_column_test.rb

@@ -1,27 +1,27 @@
-#Test of add_column method.
-
-require 'kirbybase'
-
-db = KirbyBase.new
-
-# If table exists, delete it.
-db.drop_table(:plane) if db.table_exists?(:plane)
-
-# Create a table.
-plane_tbl = db.create_table(:plane, :name, :String, :speed, :Integer,
- :service_date, :Date, :still_flying, :Boolean)
-
-# Insert a bunch more records so we can have some "select" fun below.
-plane_tbl.insert('Spitfire', 345, Date.new(1939,2,18), true)
-plane_tbl.insert('Oscar', 361, Date.new(1943,12,31), false)
-plane_tbl.insert('ME-109', 366, Date.new(1936,7,7),true)
-plane_tbl.insert('JU-88', 289, Date.new(1937,1,19), false)
-plane_tbl.insert('P-39', nil, nil, false)
-plane_tbl.insert('Zero', 377, Date.new(1937,5,15), true)
-
-plane_tbl.add_column(:range, {:DataType=>:Integer, :Index=>1}, :speed)
-
-plane_tbl.update { |r| r.name == 'Spitfire' }.set(:range => 454)
-
-puts plane_tbl.select_by_range_index { |r| r.range > 400 }.sort(:recno
- ).to_report
+#Test of add_column method.
+
+require 'kirbybase'
+
+db = KirbyBase.new
+
+# If table exists, delete it.
+db.drop_table(:plane) if db.table_exists?(:plane)
+
+# Create a table.
+plane_tbl = db.create_table(:plane, :name, :String, :speed, :Integer,
+ :service_date, :Date, :still_flying, :Boolean)
+
+# Insert a bunch more records so we can have some "select" fun below.
+plane_tbl.insert('Spitfire', 345, Date.new(1939,2,18), true)
+plane_tbl.insert('Oscar', 361, Date.new(1943,12,31), false)
+plane_tbl.insert('ME-109', 366, Date.new(1936,7,7),true)
+plane_tbl.insert('JU-88', 289, Date.new(1937,1,19), false)
+plane_tbl.insert('P-39', nil, nil, false)
+plane_tbl.insert('Zero', 377, Date.new(1937,5,15), true)
+
+plane_tbl.add_column(:range, {:DataType=>:Integer, :Index=>1}, :speed)
+
+plane_tbl.update { |r| r.name == 'Spitfire' }.set(:range => 454)
+
+puts plane_tbl.select_by_range_index { |r| r.range > 400 }.sort(:recno
+ ).to_report

data/examples/calculated_field_test/calculated_field_test.rb

@@ -1,51 +1,51 @@
-# This example script shows how to specify calculated fields in a KirbyBase
-# table.  Calculated fields are "virtual" fields.  They do not really exist
-# in the table, but are calculated during a select query.  However, once
-# calculated, they behave just like "real" table fields.
-
-# In this example, we will create an expenses table that holds information
-# on recent purchases.  The total_cost field is a calculated field.  We tell
-# KirbyBase how to calculate it's value, i.e. by multiplying the quantity
-# field by the price field.
-
-require 'kirbybase'
-require 'date'
-
-db = KirbyBase.new
-
-# To run as a client in a multi-user environment, uncomment next line.
-# Also, make sure kbserver.rb is running.
-#db = KirbyBase.new do |d|
-#    d.connect_type = :client
-#    d.host = 'localhost'
-#    d.port = 44444
-#end
-
-# If table exists, delete it.
-db.drop_table(:expenses) if db.table_exists?(:expenses)
-
-# Create a table.
-expenses_tbl = db.create_table(:expenses,
- :transaction_date, :Date,
- :description, :String,
- :quantity, :Integer,
- :price, :Float,
- :total_cost, {:DataType=>:Float, :Calculated=>'quantity * price'}
-)
-
-# Insert a couple of expense records.
-expenses_tbl.insert({:transaction_date => Date.new(2005, 9, 7),
- :description => 'Pencils', :quantity => 100, :price => 0.50})
-expenses_tbl.insert({:transaction_date => Date.new(2005, 9, 8),
- :description => 'Books', :quantity => 3, :price => 45.0})
-
-# Select all records and send the result to the screen in report format.
-# Notice how the total_cost field for each record has been calculated for
-# you by multiplying price times quantity.
-puts "\nSelect all records:\n\n"
-puts expenses_tbl.select.to_report
-
-# And, you can even use a calculated field in your select condition.  Here
-# we are only selecting records whose total cost is greater than $100.
-puts "\n\nSelect only records with a total cost greater than $100:\n\n"
-puts expenses_tbl.select { |r| r.total_cost > 100.00 }.to_report
+# This example script shows how to specify calculated fields in a KirbyBase
+# table.  Calculated fields are "virtual" fields.  They do not really exist
+# in the table, but are calculated during a select query.  However, once
+# calculated, they behave just like "real" table fields.
+
+# In this example, we will create an expenses table that holds information
+# on recent purchases.  The total_cost field is a calculated field.  We tell
+# KirbyBase how to calculate it's value, i.e. by multiplying the quantity
+# field by the price field.
+
+require 'kirbybase'
+require 'date'
+
+db = KirbyBase.new
+
+# To run as a client in a multi-user environment, uncomment next line.
+# Also, make sure kbserver.rb is running.
+#db = KirbyBase.new do |d|
+#    d.connect_type = :client
+#    d.host = 'localhost'
+#    d.port = 44444
+#end
+
+# If table exists, delete it.
+db.drop_table(:expenses) if db.table_exists?(:expenses)
+
+# Create a table.
+expenses_tbl = db.create_table(:expenses,
+ :transaction_date, :Date,
+ :description, :String,
+ :quantity, :Integer,
+ :price, :Float,
+ :total_cost, {:DataType=>:Float, :Calculated=>'quantity * price'}
+)
+
+# Insert a couple of expense records.
+expenses_tbl.insert({:transaction_date => Date.new(2005, 9, 7),
+ :description => 'Pencils', :quantity => 100, :price => 0.50})
+expenses_tbl.insert({:transaction_date => Date.new(2005, 9, 8),
+ :description => 'Books', :quantity => 3, :price => 45.0})
+
+# Select all records and send the result to the screen in report format.
+# Notice how the total_cost field for each record has been calculated for
+# you by multiplying price times quantity.
+puts "\nSelect all records:\n\n"
+puts expenses_tbl.select.to_report
+
+# And, you can even use a calculated field in your select condition.  Here
+# we are only selecting records whose total cost is greater than $100.
+puts "\n\nSelect only records with a total cost greater than $100:\n\n"
+puts expenses_tbl.select { |r| r.total_cost > 100.00 }.to_report

data/examples/change_column_type_test/change_column_type_test.rb

@@ -1,25 +1,25 @@
-# This script is an example of how to change a column type.
-#
-require 'kirbybase'
-
-db = KirbyBase.new
-
-# If table exists, delete it.
-db.drop_table(:log) if db.table_exists?(:log)
-
-log_tbl = db.create_table(:log, :log_timestamp, :DateTime, :msg, :String)
-
-log_tbl.insert(DateTime.now, 'This is a log message')
-log_tbl.insert(DateTime.now, 'This is a another log message')
-log_tbl.insert(DateTime.now, 'This is the final log message')
-
-p log_tbl.select
-puts;puts
-
-log_tbl.change_column_type(:log_timestamp, :String)
-
-p log_tbl.select
-puts;puts
-
-p log_tbl.field_types
-
+# This script is an example of how to change a column type.
+#
+require 'kirbybase'
+
+db = KirbyBase.new
+
+# If table exists, delete it.
+db.drop_table(:log) if db.table_exists?(:log)
+
+log_tbl = db.create_table(:log, :log_timestamp, :DateTime, :msg, :String)
+
+log_tbl.insert(DateTime.now, 'This is a log message')
+log_tbl.insert(DateTime.now, 'This is a another log message')
+log_tbl.insert(DateTime.now, 'This is the final log message')
+
+p log_tbl.select
+puts;puts
+
+log_tbl.change_column_type(:log_timestamp, :String)
+
+p log_tbl.select
+puts;puts
+
+p log_tbl.field_types
+

data/examples/column_required_test/column_required_test.rb

@@ -1,44 +1,44 @@
-# This script is an example of how to specify that a value is required for a
-# column.
-#
-require 'kirbybase'
-
-db = KirbyBase.new
-
-# If table exists, delete it.
-db.drop_table(:address_book) if db.table_exists?(:address_book)
-
-# Create a table.  Notice how we specify a default value for :category.
-address_book_tbl = db.create_table(:address_book,
- :firstname, :String, :lastname, :String, :street_address, :String,
- :city, :String, :phone, :String, 
- :category, {:DataType=>:String, :Required=>true})
-
-begin
-    # Insert a record.  Notice that I am passing nil for :category.  This
-    # will cause KirbyBase to raise an exception.
-    address_book_tbl.insert('Bruce', 'Wayne', '1234 Bat Cave',
-     'Gotham City', '111-111-1111', nil)
-rescue StandardError => e
-    puts e
-    puts;puts
-end
-
-begin
-    # Same thing should happen if I don't even specify a value for
-    # :category.
-    address_book_tbl.insert(:firstname=>'Bruce', :lastname=>'Wayne', 
-     :street_addres=>'1234 Bat Cave', :city=>'Gotham City', 
-     :phone=>'111-111-1111')
-rescue StandardError => e
-    puts e
-    puts;puts
-end
-
-# Now, let's turn off the required flag for :category.
-address_book_tbl.change_column_required(:category, false)
-
-# And we will attempt to add the record again.
-address_book_tbl.insert('Bruce', 'Wayne', '1234 Bat Cave',
- 'Gotham City', '111-111-1111', nil)
-
+# This script is an example of how to specify that a value is required for a
+# column.
+#
+require 'kirbybase'
+
+db = KirbyBase.new
+
+# If table exists, delete it.
+db.drop_table(:address_book) if db.table_exists?(:address_book)
+
+# Create a table.  Notice how we specify a default value for :category.
+address_book_tbl = db.create_table(:address_book,
+ :firstname, :String, :lastname, :String, :street_address, :String,
+ :city, :String, :phone, :String, 
+ :category, {:DataType=>:String, :Required=>true})
+
+begin
+    # Insert a record.  Notice that I am passing nil for :category.  This
+    # will cause KirbyBase to raise an exception.
+    address_book_tbl.insert('Bruce', 'Wayne', '1234 Bat Cave',
+     'Gotham City', '111-111-1111', nil)
+rescue StandardError => e
+    puts e
+    puts;puts
+end
+
+begin
+    # Same thing should happen if I don't even specify a value for
+    # :category.
+    address_book_tbl.insert(:firstname=>'Bruce', :lastname=>'Wayne', 
+     :street_addres=>'1234 Bat Cave', :city=>'Gotham City', 
+     :phone=>'111-111-1111')
+rescue StandardError => e
+    puts e
+    puts;puts
+end
+
+# Now, let's turn off the required flag for :category.
+address_book_tbl.change_column_required(:category, false)
+
+# And we will attempt to add the record again.
+address_book_tbl.insert('Bruce', 'Wayne', '1234 Bat Cave',
+ 'Gotham City', '111-111-1111', nil)
+

data/examples/crosstab_test/crosstab_test.rb

@@ -1,100 +1,100 @@
-# This script demonstrates how to use crosstab functionality of a
-# KirbyBase result set.  A KirbyBase result set automatically has an
-# equivalent transposed array whereby all of the values of a column are
-# available.  I call this a crosstab, but I am probably using this term
-# incorrectly.  Perhaps the examples below will help explain what I am
-# talking about.
-
-# In this example, we have an order table and an order_item table.  Each
-# record in the order table represents a customer order.  The order_item
-# table holds the detail items for each order. We create a one-to-many link
-# between the order table and the order_item table by providing extra
-# information about the order.items field when we create the order table.
-
-require 'kirbybase'
-
-db = KirbyBase.new
-
-# To run as a client in a multi-user environment, uncomment next line.
-# Also, make sure kbserver.rb is running.
-#db = KirbyBase.new do |d|
-#    d.connect_type = :client
-#    d.host = 'localhost'
-#    d.port = 44444
-#end
-
-# If tables exists, delete it.
-db.drop_table(:order) if db.table_exists?(:order)
-db.drop_table(:order_item) if db.table_exists?(:order_item)
-
-# Create an order item table.  This is the child table to the order table.
-# Make sure you create the child table BEFORE you create the parent table
-# so that KirbyBase can take advantage of any indexes that you have defined.
-order_item_tbl = db.create_table(:order_item,
- :item_id, :Integer,
- :order_id, :Integer,
- :descr, :String,
- :qty, :Integer,
- :price, :Float,
- :total, {:DataType=>:Float, :Calculated=>'qty*price'}
-)
-
-# Create an order table.  We are telling KirbyBase that the items field is
-# to be linked to the order_item table by comparing the order.order_id
-# field to the order_item.order_id field.  By specifying :Link_many, we are
-# telling KirbyBase to make this a one-to-many link.  The result of this is
-# that when you do a select, the items field of the order table is going to
-# hold a reference to a ResultSet (i.e. Array) holding all order_item
-# records whose order_id field match the order_id field in the order record.
-order_tbl = db.create_table(:order,
- :order_id, :Integer,
- :customer, :String,
- :items, {:DataType=> :ResultSet, :Link_many=> [:order_id, :order_item,
- :order_id]}
-)
-
-# Insert some order records.
-order_tbl.insert({:order_id=>345, :customer=>'Ford'})
-order_tbl.insert({:order_id=>454, :customer=>'Microsoft'})
-order_tbl.insert({:order_id=>17, :customer=>'Boeing'})
-
-# Insert some order item records.
-order_item_tbl.insert(1,345,'Steel',30,19.99,nil)
-order_item_tbl.insert(2,345,'Glass',5,4.15,nil)
-order_item_tbl.insert(5,454,'Floppies',750000,0.5,nil)
-order_item_tbl.insert(3,17,'Wheels',200,2500.0,nil)
-order_item_tbl.insert(4,17,'Wings',25,1000000.0,nil)
-
-
-# Print all orders.  Under each order print all items in that order.  Notice
-# that we are able to print the total for each order because we have access
-# to the entire order_items.total column of the result set.  We don't have
-# to loop through all of the order item result set records to add up the
-# total for each order.
-puts "\nPrint all orders:\n"
-order_tbl.select.each do |r|
-    puts "\nid: %3d  customer: %-10s  total charge: %11.2f" % [r.order_id,
-     r.customer, r.items.total.inject { |sum, n| sum + n }]
-
-    r.items.each do |i|
-        puts "\titem:  %-10s %6d * %10.2f = %11.2f" % [i.descr,
-         i.qty, i.price, i.total]
-    end
-end
-puts '-' * 70;puts
-
-# You can even use the ability to access an entire column of values in your
-# select statements.  In this example, we only want to select those orders
-# whose total charges exceeds $100,000.  We can do this because we have
-# access to the entire total column of the child table, order items.
-puts "Print only orders whose total charge exceeds $100,000:\n"
-order_tbl.select { |r| r.items.total.inject { |sum, n| sum+n } > 100000
- }.each do |r|
-    puts "\nid: %3d  customer: %-10s  total charge: %11.2f" % [r.order_id,
-     r.customer, r.items.total.inject { |sum, n| sum + n }]
-
-    r.items.each do |i|
-        puts "\titem:  %-10s %6d * %10.2f = %11.2f" % [i.descr,
-         i.qty, i.price, i.total]
-    end
-end
+# This script demonstrates how to use crosstab functionality of a
+# KirbyBase result set.  A KirbyBase result set automatically has an
+# equivalent transposed array whereby all of the values of a column are
+# available.  I call this a crosstab, but I am probably using this term
+# incorrectly.  Perhaps the examples below will help explain what I am
+# talking about.
+
+# In this example, we have an order table and an order_item table.  Each
+# record in the order table represents a customer order.  The order_item
+# table holds the detail items for each order. We create a one-to-many link
+# between the order table and the order_item table by providing extra
+# information about the order.items field when we create the order table.
+
+require 'kirbybase'
+
+db = KirbyBase.new
+
+# To run as a client in a multi-user environment, uncomment next line.
+# Also, make sure kbserver.rb is running.
+#db = KirbyBase.new do |d|
+#    d.connect_type = :client
+#    d.host = 'localhost'
+#    d.port = 44444
+#end
+
+# If tables exists, delete it.
+db.drop_table(:order) if db.table_exists?(:order)
+db.drop_table(:order_item) if db.table_exists?(:order_item)
+
+# Create an order item table.  This is the child table to the order table.
+# Make sure you create the child table BEFORE you create the parent table
+# so that KirbyBase can take advantage of any indexes that you have defined.
+order_item_tbl = db.create_table(:order_item,
+ :item_id, :Integer,
+ :order_id, :Integer,
+ :descr, :String,
+ :qty, :Integer,
+ :price, :Float,
+ :total, {:DataType=>:Float, :Calculated=>'qty*price'}
+)
+
+# Create an order table.  We are telling KirbyBase that the items field is
+# to be linked to the order_item table by comparing the order.order_id
+# field to the order_item.order_id field.  By specifying :Link_many, we are
+# telling KirbyBase to make this a one-to-many link.  The result of this is
+# that when you do a select, the items field of the order table is going to
+# hold a reference to a ResultSet (i.e. Array) holding all order_item
+# records whose order_id field match the order_id field in the order record.
+order_tbl = db.create_table(:order,
+ :order_id, :Integer,
+ :customer, :String,
+ :items, {:DataType=> :ResultSet, :Link_many=> [:order_id, :order_item,
+ :order_id]}
+)
+
+# Insert some order records.
+order_tbl.insert({:order_id=>345, :customer=>'Ford'})
+order_tbl.insert({:order_id=>454, :customer=>'Microsoft'})
+order_tbl.insert({:order_id=>17, :customer=>'Boeing'})
+
+# Insert some order item records.
+order_item_tbl.insert(1,345,'Steel',30,19.99,nil)
+order_item_tbl.insert(2,345,'Glass',5,4.15,nil)
+order_item_tbl.insert(5,454,'Floppies',750000,0.5,nil)
+order_item_tbl.insert(3,17,'Wheels',200,2500.0,nil)
+order_item_tbl.insert(4,17,'Wings',25,1000000.0,nil)
+
+
+# Print all orders.  Under each order print all items in that order.  Notice
+# that we are able to print the total for each order because we have access
+# to the entire order_items.total column of the result set.  We don't have
+# to loop through all of the order item result set records to add up the
+# total for each order.
+puts "\nPrint all orders:\n"
+order_tbl.select.each do |r|
+    puts "\nid: %3d  customer: %-10s  total charge: %11.2f" % [r.order_id,
+     r.customer, r.items.total.inject { |sum, n| sum + n }]
+
+    r.items.each do |i|
+        puts "\titem:  %-10s %6d * %10.2f = %11.2f" % [i.descr,
+         i.qty, i.price, i.total]
+    end
+end
+puts '-' * 70;puts
+
+# You can even use the ability to access an entire column of values in your
+# select statements.  In this example, we only want to select those orders
+# whose total charges exceeds $100,000.  We can do this because we have
+# access to the entire total column of the child table, order items.
+puts "Print only orders whose total charge exceeds $100,000:\n"
+order_tbl.select { |r| r.items.total.inject { |sum, n| sum+n } > 100000
+ }.each do |r|
+    puts "\nid: %3d  customer: %-10s  total charge: %11.2f" % [r.order_id,
+     r.customer, r.items.total.inject { |sum, n| sum + n }]
+
+    r.items.each do |i|
+        puts "\titem:  %-10s %6d * %10.2f = %11.2f" % [i.descr,
+         i.qty, i.price, i.total]
+    end
+end