Enhanced SQL script generation

Public Function CreateBinaryUpdateStatement(dbs As DAO.Database, TableName As String, BinaryFieldName As String, KeyFieldList As String, Optional WhereOrOrderByClause As String = "") As String

Generate enhanced BINARY_UPDATE statement to update data in binary fields of table TableName using text-encoded hex values. Only one field may be scripted at a time because of possible script size issues (the hex-formatted binary block can be very large).


Public Function CreateDummyInsertStatement(TableName As String, AutoNumberValue As Long, dbs As DAO.Database) As String

Generate an insert statement to reset the autonumber for TableName.
Insert the passed value to the Autonumber column and use dummy values for all the other columns.

Public Function CreateInsertStatement(dbs As DAO.Database, TableName As String, Optional WhereOrOrderByClause As String = "" , Optional SkipAutonumberInsert As Boolean = True, Optional MssqlMode As Boolean = False, Optional ColumnList As String = "") As String

Generate insert statements to create data in table TableName

Public Sub CreateTableCreateScript(dbs As DAO.Database, ReturnScript1 As String, ReturnScript2 As String, TableName As String, Optional WithDrop As Boolean = False, Optional WithIndexes As Boolean = False, Optional WithRelations As Boolean = False, Optional WithFieldProps As Boolean = False, Optional WithTableProps As Boolean = False, Optional SuppressColWidthProp As Boolean = False)

Process an individual SQL command or statement This is not recommended for external use - pass the command to ProcessScript

Public Function CreateUpdateStatement(dbs As DAO.Database, TableName As String, UpdateFieldList As String, KeyFieldList As String, Optional WhereOrOrderByClause As String = "") As String

Generate update statements to update data in specified fields of table TableName

Public Function PrintTabledefs(Optional ShowFields As Boolean = False, Optional UseAddlLegacyVals As Boolean = False , Optional StripDbo As Boolean = True, Optional MaxLookupValsReturned As Integer = 50, Optional ProgressTextbox As TextBox = Nothing) As String

Return a 'brain dump' of information about all the TableDefs in the database as text. Also print the information to the debug window.
the information includes:
- table names and link data
- field types
- a list of all unique FK values actually in use where an FK relationship exists

Public Function ScriptZeroModeSetting() As String

Return the scripted 'ALLOW_EMPTY_STRING_MODE' setting

Public Function SqlFormatFieldVal(FieldType As DAO.DataTypeEnum, val As Variant, Optional MssqlMode As Boolean = False) As String

Return a value formatted for an SQL script according to the specified DataTypeEnum. Binary columns return a value of 0, as JET SQL doesn't handle binary types. The XF augmented SQL scripts and processes the BINARY_UPDATE statement to allow binary values to be encoded to and from text.