CasewareDocs

PerformTask

Performs the add database task previously specified by using AddDatabase, AddField and AppendValues.

Compatibility

Available as of IDEA version 9.0

Syntax

PerformTask

Example

Dim SimpleCommands As Object 
Dim CreateDatabase As Object
Dim fileName As String

Const CreateOnServer as Integer = 1
Const CreateOnDesktop as Integer = 0

Sub Main
Set SimpleCommands = SmartContext.MacroCommands.SimpleCommands
Set CreateDatabase = SmartContext.MacroCommands.CreateDatabase

fileName = SimpleCommands.UniqueFileName("My IDEA Database")
dbData = "1111;Create Database Test1#2222;Create Database Test2#3333;Create database Test3"

'Create a database and specify the location.
CreateDatabase.AddDatabaseAt fileName, "", CreateOnDesktop
CreateDatabase.AddField "AMOUNT", "description of this field", WI_NUM_FIELD, 8, 2
CreateDatabase.AddField "ACCOUNT_DESCR", "character field description", WI_CHAR_FIELD, 32, 0
CreateDatabase.AppendValues dbData
CreateDatabase.PerformTask

'Close the database.
CreateDatabase.Close

'Release objects.
Set SimpleCommands = Nothing
Set CreateDatabase = Nothing
End Sub