Creating Action Table Columns

To create an action table you must create an ADODB Recordset. You begin by appending fields to the fields collection of a new recordset object. You do this before opening the recordset or a connection object. The workflow engine requires and recognizes fourteen fields exclusively. In the append method you provide the field name and type as arguments.

[Visual Basic]

   Dim Rs As ADODB.Recordset
   Set Rs = New ADODB.Recordset

   With Rs.Fields
    .Append "ID", adBSTR
    .Append "Caption", adBSTR
    .Append "State", adBSTR
    .Append "NewState", adBSTR
    .Append "EventType", adBSTR
    .Append "Condition", adBSTR
    .Append "EvaluationOrder", adBSTR
    .Append "Action", adBSTR
    .Append "ExpiryInterval", adBSTR
    .Append "RowACL", adBSTR
    .Append "TransitionACL", adBSTR
    .Append "DesignToolFields", adBSTR
    .Append "CompensatingAction", adBSTR
    .Append "Flags", adBSTR
   End With

   Dim varColumnNames As Variant

   varColumnNames = Array(Rs.Fields.Item(0).Name, _
                         Rs.Fields.Item(1).Name, _
                         Rs.Fields.Item(2).Name, _
                         Rs.Fields.Item(3).Name, _
                         Rs.Fields.Item(4).Name, _
                         Rs.Fields.Item(5).Name, _
                         Rs.Fields.Item(6).Name, _
                         Rs.Fields.Item(7).Name, _
                         Rs.Fields.Item(8).Name, _
                         Rs.Fields.Item(9).Name, _
                         Rs.Fields.Item(10).Name, _
                         Rs.Fields.Item(11).Name, _
                         Rs.Fields.Item(12).Name, _
                         Rs.Fields.Item(13).Name)