X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=doc%2Fref-fddl.xml;h=5caa87d50ddb0d663c9f83fe49d52935a1dd19f1;hb=18e34efea688a6758b6e997401fbc3f241da98f3;hp=5d542ded1ffdf0b8b92969d71c67d9a63bc108c5;hpb=fdd069770e32d0cfa4b66d6e5cfd4540197660ba;p=clsql.git

diff --git a/doc/ref-fddl.xml b/doc/ref-fddl.xml
index 5d542de..5caa87d 100644
--- a/doc/ref-fddl.xml
+++ b/doc/ref-fddl.xml
@@ -24,7 +24,7 @@
       <refentrytitle>CREATE-TABLE</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">CREATE-TABLE</emphasis></refname>
+      <refname>CREATE-TABLE</refname>
       <refpurpose>Create a database table.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -109,6 +109,18 @@
 => 
 (table-exists-p [foo]) 
 => T 
+
+(create-table [foo] '(([bar] integer :not-null :unique :primary-key) 
+                      ([baz] string :not-null :unique)))
+=> 
+(table-exists-p [foo])
+=> T
+
+(create-table [foo] '(([bar] integer :not-null) ([baz] string :not-null))
+              :constraints '("UNIQUE (bar,baz)" "PRIMARY KEY (bar)"))
+=> 
+(table-exists-p [foo])
+=> T
       </screen>
     </refsect1>
     <refsect1>
@@ -157,7 +169,7 @@
       <refentrytitle>DROP-TABLE</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">DROP-TABLE</emphasis></refname>
+      <refname>DROP-TABLE</refname>
       <refpurpose>Drop a database table.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -265,7 +277,7 @@
       <refentrytitle>LIST-TABLES</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">LIST-TABLES</emphasis></refname>
+      <refname>LIST-TABLES</refname>
       <refpurpose>Returns a list of database tables.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -371,7 +383,7 @@
       <refentrytitle>TABLE-EXISTS-P</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">TABLE-EXISTS-P</emphasis></refname>
+      <refname>TABLE-EXISTS-P</refname>
       <refpurpose>Tests for the existence of a database table.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -477,7 +489,7 @@
       <refentrytitle>CREATE-VIEW</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">CREATE-VIEW</emphasis></refname>
+      <refname>CREATE-VIEW</refname>
       <refpurpose>Create a database view.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -563,7 +575,7 @@
     ("Konstantin" "Chernenko" "chernenko@soviet.org")
     ("Mikhail" "Gorbachev" "gorbachev@soviet.org")
     ("Boris" "Yeltsin" "yeltsin@soviet.org")
-    ("Vladamir" "Putin" "putin@soviet.org")), 
+    ("Vladimir" "Putin" "putin@soviet.org")), 
    ("first_name" "last_name" "email")
       </screen>
     </refsect1>
@@ -609,7 +621,7 @@
       <refentrytitle>DROP-VIEW</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">DROP-VIEW</emphasis></refname>
+      <refname>DROP-VIEW</refname>
       <refpurpose>Drops a database view.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -717,7 +729,7 @@
       <refentrytitle>LIST-VIEWS</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">LIST-VIEWS</emphasis></refname>
+      <refname>LIST-VIEWS</refname>
       <refpurpose>Returns a list of database views.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -824,7 +836,7 @@
       <refentrytitle>VIEW-EXISTS-P</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">VIEW-EXISTS-P</emphasis></refname>
+      <refname>VIEW-EXISTS-P</refname>
       <refpurpose>Tests for the existence of a database view.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -930,7 +942,7 @@
       <refentrytitle>CREATE-INDEX</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">CREATE-INDEX</emphasis></refname>
+      <refname>CREATE-INDEX</refname>
       <refpurpose>Create a database index.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -1052,7 +1064,7 @@
       <refentrytitle>DROP-INDEX</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">DROP-INDEX</emphasis></refname>
+      <refname>DROP-INDEX</refname>
       <refpurpose>Drop a database index.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -1177,7 +1189,7 @@
       <refentrytitle>LIST-INDEXES</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">LIST-INDEXES</emphasis></refname>
+      <refname>LIST-INDEXES</refname>
       <refpurpose>Returns a list of database indexes.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -1295,7 +1307,7 @@
       <refentrytitle>INDEX-EXISTS-P</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">INDEX-EXISTS-P</emphasis></refname>
+      <refname>INDEX-EXISTS-</refname>
       <refpurpose>Tests for the existence of a database index.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -1402,7 +1414,7 @@
       <refentrytitle>ATTRIBUTE-TYPE</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">ATTRIBUTE-TYPE</emphasis></refname>
+      <refname>ATTRIBUTE-TYPE</refname>
       <refpurpose>Returns the type of the supplied attribute.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -1552,7 +1564,7 @@
       <refentrytitle>LIST-ATTRIBUTE-TYPES</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">LIST-ATTRIBUTE-TYPES</emphasis></refname>
+      <refname>LIST-ATTRIBUTE-TYPES</refname>
       <refpurpose>Returns information about the attribute types of a table.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -1668,7 +1680,7 @@
       <refentrytitle>LIST-ATTRIBUTES</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">LIST-ATTRIBUTES</emphasis></refname>
+      <refname>LIST-ATTRIBUTES</refname>
       <refpurpose>Returns the attributes of a table as a list.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -1775,7 +1787,7 @@
       <refentrytitle>CREATE-SEQUENCE</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">CREATE-SEQUENCE</emphasis></refname>
+      <refname>CREATE-SEQUENCE</refname>
       <refpurpose>Create a database sequence.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -1867,7 +1879,7 @@
       <refentrytitle>DROP-SEQUENCE</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">DROP-SEQUENCE</emphasis></refname>
+      <refname>DROP-SEQUENCE</refname>
       <refpurpose>Drop a database sequence.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -1977,7 +1989,7 @@
       <refentrytitle>LIST-SEQUENCES</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">LIST-SEQUENCES</emphasis></refname>
+      <refname>LIST-SEQUENCES</refname>
       <refpurpose>Returns a list of database sequences.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -2078,7 +2090,7 @@
       <refentrytitle>SEQUENCE-EXISTS-P</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">SEQUENCE-EXISTS-P</emphasis></refname>
+      <refname>SEQUENCE-EXISTS-P</refname>
       <refpurpose>Tests for the existence of a database sequence.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -2188,7 +2200,7 @@
       <refentrytitle>SEQUENCE-LAST</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">SEQUENCE-LAST</emphasis></refname>
+      <refname>SEQUENCE-LAST</refname>
       <refpurpose>Return the last element in a database sequence.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -2290,7 +2302,7 @@
       <refentrytitle>SEQUENCE-NEXT</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">SEQUENCE-NEXT</emphasis></refname>
+      <refname>SEQUENCE-NEXT</refname>
       <refpurpose>Increment the value of a database sequence.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -2399,7 +2411,7 @@
       <refentrytitle>SET-SEQUENCE-POSITION</refentrytitle>
     </refmeta>
     <refnamediv>
-      <refname><emphasis>Function</emphasis> <emphasis role="bold">SET-SEQUENCE-POSITION</emphasis></refname>
+      <refname>SET-SEQUENCE-POSITION</refname>
       <refpurpose>Sets the position of a database sequence.</refpurpose>
       <refclass>Function</refclass>
     </refnamediv>
@@ -2506,4 +2518,101 @@
     </refsect1>
   </refentry>
 
+  <refentry id="truncate-database">
+    <refmeta>
+      <refentrytitle>TRUNCATE-DATABASE</refentrytitle>
+    </refmeta>
+    <refnamediv>
+      <refname>TRUNCATE-DATABASE</refname>
+      <refpurpose>Drop all tables, views, indexes and sequences in a database.</refpurpose>
+      <refclass>Function</refclass>
+    </refnamediv>
+    <refsect1>
+      <title>Syntax</title>
+      <synopsis>
+      <function>truncate-database</function> &amp;key <replaceable>database</replaceable> => <returnvalue></returnvalue></synopsis>
+    </refsect1>
+    <refsect1>
+      <title>Arguments and Values</title>
+      <variablelist>
+        <varlistentry>
+          <term><parameter>database</parameter></term>
+          <listitem>
+            <para>A 
+            <glossterm linkend="gloss-database-object">database
+            object</glossterm>. This will default to the value
+            of <symbol>*default-database*</symbol>.</para>
+          </listitem>
+        </varlistentry>
+      </variablelist>
+    </refsect1>
+    <refsect1>
+      <title>Description</title>
+      <para>
+        Drop all tables, views, indexes and sequences in
+        <parameter>database</parameter> which defaults to
+        <symbol>*default-database*</symbol>.
+      </para>
+    </refsect1>
+    <refsect1>
+      <title>Examples</title>
+      <screen>
+(list-tables)
+=> ("type_table" "type_bigint" "employee" "company" "addr" "ea_join" "big")
+(list-indexes)
+=> ("employeepk" "companypk" "addrpk")
+(list-views)
+=> ("lenins_group")
+(list-sequences)
+=> ("foo" "bar")
+(truncate-database)
+=> 
+(list-tables)
+=> NIL
+(list-indexes)
+=> NIL
+(list-views)
+=> NIL
+(list-sequences)
+=> NIL
+      </screen>
+    </refsect1>
+    <refsect1>
+      <title>Side Effects</title>
+      <para>
+        Modifications are made to the underlying database. 
+      </para>
+    </refsect1>
+    <refsect1>
+      <title>Affected by</title>
+      <para>
+        None. 
+      </para>
+    </refsect1>
+    <refsect1>
+      <title>Exceptional Situations</title>
+      <para>
+        Signals an error of type <symbol>sql-database-error</symbol> if 
+        <parameter>database</parameter> is not a database object. 
+      </para>
+    </refsect1>
+    <refsect1>
+      <title>See Also</title>
+      <para>
+        <simplelist>
+          <member><link linkend="drop-table"><function>drop-table</function></link></member>
+          <member><link linkend="drop-view"><function>drop-view</function></link></member>
+          <member><link linkend="drop-index"><function>drop-index</function></link></member>
+          <member><link linkend="drop-sequence"><function>drop-sequence</function></link></member>
+        </simplelist>
+      </para>
+    </refsect1>
+    <refsect1>
+      <title>Notes</title>
+      <para>
+        <function>truncate-database</function> is a &clsql; extension. 
+      </para>
+    </refsect1>
+  </refentry>
+
 </reference>