private ICursorFilter CreateFilter(string categoryName, FilterType filterType)
{
using (ICommenceDatabase db = new CommenceDatabase())
{
using (ICommenceCursor cur = db.GetCursor(categoryName))
{
switch (filterType)
{
case FilterType.Field:
return((CursorFilterTypeF)cur.Filters.Create(_model.ClauseNumber, filterType));
case FilterType.ConnectionToItem:
return((CursorFilterTypeCTI)cur.Filters.Create(_model.ClauseNumber, filterType));
case FilterType.ConnectionToCategoryField:
return((CursorFilterTypeCTCF)cur.Filters.Create(_model.ClauseNumber, filterType));
case FilterType.ConnectionToCategoryToItem:
return((CursorFilterTypeCTCTI)cur.Filters.Create(_model.ClauseNumber, filterType));
}
}
}
return(null);
}
private static string GetDatabaseName()
{
using (ICommenceDatabase db = new CommenceDatabase()) {
return(db.Name);
}
}
private static DirectoryInfo GetDatabaseDirectory()
{
using (ICommenceDatabase db = new CommenceDatabase()) {
return(new DirectoryInfo(db.Path));
}
}
/// <summary>
/// Reads data using DDE. This is extremely show and should only ever be used as a last resort.
/// </summary>
/// <param name="mocktables"></param>
internal void GetDataByDDE(List <TableDef> mocktables) // needs fixing
{
/* DDE requests are limited to a maximum length of 255 characters,
* which is easily exceeded. A workaround is splitting the requests.
* Not pretty but the only way to get to many-many relationships that contain >93750 worth of connected characters
* without setting the maxfieldsize higher.
*/
List <List <CommenceValue> > rows;
List <CommenceValue> rowvalues;
ICommenceDatabase db = new CommenceDatabase();
// always define a category
db.ViewCategory(this.cursor.Category);
// are we dealing with a view?
if (!string.IsNullOrEmpty(cursor.View))
{
db.ViewView(this.cursor.View);
}
int itemCount = db.ViewItemCount();
for (int i = 1; i <= itemCount; i++) // note that we use a 1-based iterator
{
rows = new List <List <CommenceValue> >();
rowvalues = new List <CommenceValue>();
foreach (TableDef td in mocktables)
{
string[] DDEResult = null;
List <string> fieldNames = td.ColumnDefinitions.Select(o => o.FieldName).ToList();
if (td.Primary)
{
// ViewFields and ViewConnectedFields have a limited capacity
// the total length of a DDE command cannot exceed 255 characters
// What we are going to do is limit the number of characters to a value of up to 150 chars,
// to be on the safe side (ViewConnectedFilter and two delimiters already make up 35 characters!)
ListChopper lcu = new ListChopper(fieldNames, 150);
foreach (List <string> l in lcu.Portions)
{
DDEResult = db.ViewFields(i, l);
// we have our results, we now have to create CommenceValue objects from it
// and we also have to match them up with their respective column
// this is a little tricky...
for (int j = 0; j < DDEResult.Length; j++)
{
ColumnDefinition cd = td.ColumnDefinitions.Find(o => o.FieldName.Equals(l[j]));
string[] buffer = new string[] { DDEResult[j] };
//buffer = FormatValues(buffer,this.Formatting, cd);
buffer = FormatValues(buffer, cd);
CommenceValue v = new CommenceValue(buffer[0], cd);
rowvalues.Add(v);
} // for
} // list l
}
else // we are dealing with a connection
{
int conItemCount = db.ViewConnectedCount(i, td.ColumnDefinitions[0].Connection, td.ColumnDefinitions[0].Category); // doesn't matter which one we use
// here's a nice challenge:
// upon every iteration we get a row of fieldvalues from the connection
// to make things worse, we chop them up so it aren't even complete rows.
// we must aggregate the values for each field.
// We'll construct a datatable to hack around that;
// we could have also used a dictionary I suppose.
// using a datatable may be easiest
DataTable dt = new DataTable();
for (int c = 0; c < fieldNames.Count; c++)
{
dt.Columns.Add(fieldNames[c]); // add fields as columns, keeping everything default
}
// loop all connected items
for (int citemcount = 1; citemcount <= conItemCount; citemcount++)
{
DataRow dr = dt.NewRow(); // create a row containing all columns
ListChopper lcu = new ListChopper(fieldNames, 150);
foreach (List <string> list in lcu.Portions)
{
DDEResult = db.ViewConnectedFields(i, td.ColumnDefinitions[0].Connection, td.ColumnDefinitions[0].Category, citemcount, list);
// populate colums for the fields we requested
for (int j = 0; j < DDEResult.Length; j++)
{
dr[list[j]] = DDEResult[j];
}
} // list l
dt.Rows.Add(dr);
} // citemcount
// create a CommenceValue from every column in the datatable
foreach (DataColumn dc in dt.Columns)
{
// this will also return columns that have no data, which is what we want.
string[] query =
(from r in dt.AsEnumerable()
select r.Field <String>(dc.ColumnName)).ToArray();
ColumnDefinition cd = td.ColumnDefinitions.Find(o => o.FieldName.Equals(dc.ColumnName));
CommenceValue cv = null;
if (query.Length > 0) // only create value if there is one
{
//query = FormatValues(query, this.Formatting, cd);
query = FormatValues(query, cd);
cv = new CommenceValue(query, cd);
}
else
{
// create empty CommenceValue
cv = new CommenceValue(cd);
}
rowvalues.Add(cv);
}
} // if
} // foreach tabledef
rows.Add(rowvalues);
CursorDataReadProgressChangedArgs args = new CursorDataReadProgressChangedArgs(rows, i, totalRows); // progress within the cursor
OnDataProgressChanged(args);
} // i
db = null;
ExportCompleteArgs a = new ExportCompleteArgs(itemCount);
OnDataReadCompleted(a);
}
/// <summary>
/// Gets all the field and column information from Commence.
/// </summary>
protected internal List <ColumnDefinition> ParseColumns()
{
_columnDefinitions = new List <ColumnDefinition>();
using (ICommenceDatabase db = new CommenceDatabase())
{
// can't use using here, because we would close the database prematurely and lose our cursor. Not sure why that happens, it is a new reference?.
_connNames = db.GetConnectionNames(_cursor.Category); // retrieve all connections for current category. Used to check columns against.
if (_connNames != null) // there are connections
{
// retrieve name field names from connections
if (_connectedNameFields == null)
{
_connectedNameFields = GetNameFieldsFromConnectedCategories(_connNames);
}
}
// inject extra columndefintion for thid
// it should always be the first definition!
// this is a little tricky
if (((CommenceCursor)_cursor).Flags.HasFlag(CmcOptionFlags.UseThids))
{
ColumnDefinition cd = new ColumnDefinition(0, ColumnDefinition.ThidIdentifier)
{
FieldName = ColumnDefinition.ThidIdentifier,
CustomColumnLabel = ColumnDefinition.ThidIdentifier,
ColumnLabel = ColumnDefinition.ThidIdentifier,
Category = _cursor.Category,
CommenceFieldDefinition = new CommenceFieldDefinition() // provide empty definition to prevent DDEException on GetFieldDefinition
};
_columnDefinitions.Add(cd);
}
// process actual columns
using (CmcLibNet.Database.ICommenceQueryRowSet qrs = _cursor.GetQueryRowSet(0))
{
// create a rowset of 0 items
for (int i = 0; i < qrs.ColumnCount; i++)
{
ColumnDefinition cd = new ColumnDefinition(_columnDefinitions.Count, qrs.GetColumnLabel(i, CmcOptionFlags.Fieldname));
cd.ColumnLabel = qrs.GetColumnLabel(i);
if (this._customHeaders != null)
{
cd.CustomColumnLabel = this._customHeaders[i];
}
if (ColumnIsConnection(cd.ColumnName)) // we have a connection
{
IRelatedColumn rc = GetRelatedColumn(cd.ColumnName);
cd.RelatedColumn = rc;
if (((CommenceCursor)_cursor).Flags.HasFlag(CmcOptionFlags.UseThids))
{
cd.CommenceFieldDefinition = new CommenceFieldDefinition()
{
MaxChars = CommenceLimits.MaxNameFieldCapacity,
Type = CommenceFieldType.Text
};
}
else
{
cd.CommenceFieldDefinition = db.GetFieldDefinition(rc.Category, rc.Field);
}
}
else // we have a direct field
{
cd.Category = _cursor.Category;
cd.FieldName = cd.ColumnName;
cd.CommenceFieldDefinition = db.GetFieldDefinition(cd.Category, cd.FieldName);
}
_columnDefinitions.Add(cd);
}
}
}
return(_columnDefinitions);
}
private IList <ConnectedItem> PopulateConnectedItemNamesList(string searchString)
{
IList <ConnectedItem> retval = new List <ConnectedItem>();
if (string.IsNullOrEmpty(this.SelectedConnectedCategory))
{
return(retval);
}
using (ICommenceDatabase db = new CommenceDatabase())
{
using (ICommenceCursor cur = db.GetCursor(this.SelectedConnectedCategory))
{
string nameField = db.GetNameField(this.SelectedConnectedCategory);
var columns = this.CategoryDefinition.Clarified
? new[] { nameField, this.CategoryDefinition.ClarifyField }
: new[] { nameField };
if (!cur.SetColumns(columns))
{
return(retval);
} // something went wrong bad
var number = cur.RowCount;
if (string.IsNullOrEmpty(searchString))
{
if (number == 0)
{
retval.Add(new ConnectedItem("(No items to display)", null, null, null));
return(retval);
}
else if (number < 1000)
{
return(GetConnectedItems(cur).ToList());
}
else
{
retval.Add(new ConnectedItem("(Too many items to display.)", null, null, null));
return(retval);
}
}
else
{
CursorFilterTypeF f = cur.Filters.Create(1, FilterType.Field);
f.FieldValue = this.ConnectedItemSearchString;
f.FieldName = nameField;
f.Qualifier = FilterQualifier.Contains;
int count = cur.Filters.Apply();
if (count > 1000)
{
retval.Add(new ConnectedItem("(Too many items to display)", null, null, null));
return(retval);
}
else if (count == 0)
{
retval.Add(new ConnectedItem($"(No items contain '{ this.ConnectedItemSearchString }')", null, null, null));
return(retval);
}
else
{
return(GetConnectedItems(cur).ToList());
}
}
}
}
}
protected override void ProcessRecord()
{
var db = new CommenceDatabase();
string result = db.ViewCategory(fromCategory); // if fromCategory is not found, nothing happens
if (result.ToLower() != "ok")
{
WriteError(new ErrorRecord(new Vovin.CmcLibNet.CommenceDDEException(result),
"CategoryNotFound",
ErrorCategory.InvalidResult,
db));
return;
}
string clarifyState = db.ClarifyItemNames();
try {
int connectedItemCount = -1;
// no item supplied, process entire category
if (string.IsNullOrEmpty(fromItem))
{
int numItems = db.GetItemCount(fromCategory);
List <string> itemNames = db.GetItemNames(fromCategory);
db.ClarifyItemNames("TRUE");
for (int i = 1; i <= numItems; i++) // DDE-call indexes in Commence are 1-based
{
// since this not rely on string values, it should be reliable
connectedItemCount = db.ViewConnectedCount(i, connectionName, toCategory);
WriteObject(new
{
ItemName = itemNames[i - 1],
FromCategory = fromCategory,
Connection = connectionName,
ToCategory = toCategory,
Count = connectedItemCount
},
false); // return and do not enumerate. I.e. pass every object separately.
}
}
else
{
if (!string.IsNullOrEmpty(clarifyValue) && !string.IsNullOrEmpty(clarifySeparator))
{
fromItem = db.GetClarifiedItemName(fromItem, clarifySeparator, clarifyValue);
db.ClarifyItemNames("TRUE");
}
connectedItemCount = db.GetConnectedItemCount(fromCategory, fromItem, connectionName, toCategory);
WriteObject(new
{
ItemName = fromItem,
FromCategory = fromCategory,
Connection = connectionName,
ToCategory = toCategory,
Count = connectedItemCount
},
false);
}
if (connectedItemCount == -1)
{
WriteError(new ErrorRecord(new Vovin.CmcLibNet.CommenceDDEException("Vovin.CmcLibNet was unable to get a valid result from Commence."),
"CommenceDDEError",
ErrorCategory.InvalidArgument,
db));
WriteVerbose("A count of -1 means an error occurred while trying to receive the count from Commence.\n"
+ "This is likely caused by one or more of the arguments being invalid.\n"
+ "Note that connection- and viewnames in Commence are case-sensitive!\n\n"
+ "A clarify separator may include spaces. Make sure to include them in the command.\n\n");
return;
}
}
finally
{
db.ClarifyItemNames(clarifyState); // restore state
db.Close();
}
}
