DataDomain: DbDataDomain;
The DataDomain property determines the data type of data source field, if it is intended for storage of multibyte information.
The field can store multibyte information if the DataType property is set to DbDataType.String or DbDataType.Blob.
Also, if the table field has the type - DbDataType.DateTime and the field can store date and time up to milliseconds, the DataDomain property returns DbDataDomain.MSec.
Executing the example requires that the repository contains a table with the TBL identifier.
Sub UserProc;
Var
MB: IMetabase;
DSInst: IDatasetInstance;
DSModel: IDatasetModel;
Fields: IDatasetModelFields;
Field: IDatasetModelField;
Begin
MB := MetabaseClass.Active;
DSInst := MB.ItemById("TBL").Open(Null) As IDatasetInstance;
DSModel := DSInst.Dataset;
Fields := DSModel.Fields;
For Each Field In Fields Do
If (Field.DataType = DbDataType.Blob) Then
Select Case Field.DataDomain
Case DbDataDomain.None: Debug.WriteLine("The " + Field.Name + " field stores binary data");
Case DbDataDomain.Memo: Debug.WriteLine("The " + Field.Name + " field stores text data");
Case DbDataDomain.Raw: Debug.WriteLine("The " + Field.Name + " field stores custom data");
End Select;
Elseif Field.DataType = DbDataType.DateTime Then
If Field.DataDomain = DbDataDomain.MSec Then
Debug.WriteLine("The " + Field.Name + " field stores date and time up to milliseconds");
End If;
End If;
End For;
End Sub UserProc;
After executing the example, the console window displays the information on table fields that are used to store multibyte information.
See also: