This commit is contained in:
SchreiberM
2016-04-08 14:55:25 +02:00
parent d1eb7ecb5b
commit ef2a87d849
47 changed files with 12718 additions and 9964 deletions

View File

@@ -18155,6 +18155,10 @@ Partial Public Class DD_DMSDataSet
Private columnIDX_FILE_WORKED As Global.System.Data.DataColumn
Private columnSQL_PARENT_RECORD As Global.System.Data.DataColumn
Private columnONLY_RECORD_CREATING As Global.System.Data.DataColumn
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
Public Sub New()
@@ -18302,6 +18306,22 @@ Partial Public Class DD_DMSDataSet
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
Public ReadOnly Property SQL_PARENT_RECORDColumn() As Global.System.Data.DataColumn
Get
Return Me.columnSQL_PARENT_RECORD
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
Public ReadOnly Property ONLY_RECORD_CREATINGColumn() As Global.System.Data.DataColumn
Get
Return Me.columnONLY_RECORD_CREATING
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _
@@ -18339,9 +18359,9 @@ Partial Public Class DD_DMSDataSet
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
Public Overloads Function AddTBPMO_WD_IMPORT_PROFILERow(ByVal NAME As String, ByVal WD_SEARCH As String, ByVal UNIQUE_DOC_SQL As String, ByVal NEW_OBJECTTYPE As String, ByVal CONNECTION_ID As Integer, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal ENTITY_ID As Integer, ByVal SQL_DOCTYPE As String, ByVal OLD_OBJECTTYPE As String, ByVal IDX_FILE_WORKED As String) As TBPMO_WD_IMPORT_PROFILERow
Public Overloads Function AddTBPMO_WD_IMPORT_PROFILERow(ByVal NAME As String, ByVal WD_SEARCH As String, ByVal UNIQUE_DOC_SQL As String, ByVal NEW_OBJECTTYPE As String, ByVal CONNECTION_ID As Integer, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal ENTITY_ID As Integer, ByVal SQL_DOCTYPE As String, ByVal OLD_OBJECTTYPE As String, ByVal IDX_FILE_WORKED As String, ByVal SQL_PARENT_RECORD As String, ByVal ONLY_RECORD_CREATING As Boolean) As TBPMO_WD_IMPORT_PROFILERow
Dim rowTBPMO_WD_IMPORT_PROFILERow As TBPMO_WD_IMPORT_PROFILERow = CType(Me.NewRow,TBPMO_WD_IMPORT_PROFILERow)
Dim columnValuesArray() As Object = New Object() {Nothing, NAME, WD_SEARCH, UNIQUE_DOC_SQL, NEW_OBJECTTYPE, CONNECTION_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ENTITY_ID, SQL_DOCTYPE, OLD_OBJECTTYPE, IDX_FILE_WORKED}
Dim columnValuesArray() As Object = New Object() {Nothing, NAME, WD_SEARCH, UNIQUE_DOC_SQL, NEW_OBJECTTYPE, CONNECTION_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ENTITY_ID, SQL_DOCTYPE, OLD_OBJECTTYPE, IDX_FILE_WORKED, SQL_PARENT_RECORD, ONLY_RECORD_CREATING}
rowTBPMO_WD_IMPORT_PROFILERow.ItemArray = columnValuesArray
Me.Rows.Add(rowTBPMO_WD_IMPORT_PROFILERow)
Return rowTBPMO_WD_IMPORT_PROFILERow
@@ -18384,6 +18404,8 @@ Partial Public Class DD_DMSDataSet
Me.columnSQL_DOCTYPE = MyBase.Columns("SQL_DOCTYPE")
Me.columnOLD_OBJECTTYPE = MyBase.Columns("OLD_OBJECTTYPE")
Me.columnIDX_FILE_WORKED = MyBase.Columns("IDX_FILE_WORKED")
Me.columnSQL_PARENT_RECORD = MyBase.Columns("SQL_PARENT_RECORD")
Me.columnONLY_RECORD_CREATING = MyBase.Columns("ONLY_RECORD_CREATING")
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -18417,6 +18439,10 @@ Partial Public Class DD_DMSDataSet
MyBase.Columns.Add(Me.columnOLD_OBJECTTYPE)
Me.columnIDX_FILE_WORKED = New Global.System.Data.DataColumn("IDX_FILE_WORKED", GetType(String), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnIDX_FILE_WORKED)
Me.columnSQL_PARENT_RECORD = New Global.System.Data.DataColumn("SQL_PARENT_RECORD", GetType(String), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnSQL_PARENT_RECORD)
Me.columnONLY_RECORD_CREATING = New Global.System.Data.DataColumn("ONLY_RECORD_CREATING", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnONLY_RECORD_CREATING)
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
Me.columnGUID.AutoIncrement = true
Me.columnGUID.AllowDBNull = false
@@ -18439,6 +18465,11 @@ Partial Public Class DD_DMSDataSet
Me.columnOLD_OBJECTTYPE.DefaultValue = CType("",String)
Me.columnOLD_OBJECTTYPE.MaxLength = 100
Me.columnIDX_FILE_WORKED.MaxLength = 100
Me.columnSQL_PARENT_RECORD.AllowDBNull = false
Me.columnSQL_PARENT_RECORD.DefaultValue = CType("",String)
Me.columnSQL_PARENT_RECORD.MaxLength = 5000
Me.columnONLY_RECORD_CREATING.AllowDBNull = false
Me.columnONLY_RECORD_CREATING.DefaultValue = CType(false,Boolean)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -19785,17 +19816,17 @@ Partial Public Class DD_DMSDataSet
Me.columnENTITY_ID.AllowDBNull = false
Me.columnGROUP_ID.AllowDBNull = false
Me.columnEDIT_REC.AllowDBNull = false
Me.columnEDIT_REC.DefaultValue = CType(False, Boolean)
Me.columnADD_REC.AllowDBNull = False
Me.columnADD_REC.DefaultValue = CType(True, Boolean)
Me.columnDELETE_REC.AllowDBNull = False
Me.columnDELETE_REC.DefaultValue = CType(False, Boolean)
Me.columnADD_DOC.AllowDBNull = False
Me.columnADD_DOC.DefaultValue = CType(True, Boolean)
Me.columnVIEW_DOC.AllowDBNull = False
Me.columnVIEW_DOC.DefaultValue = CType(True, Boolean)
Me.columnDELETE_DOC.AllowDBNull = False
Me.columnDELETE_DOC.DefaultValue = CType(False, Boolean)
Me.columnEDIT_REC.DefaultValue = CType(true,Boolean)
Me.columnADD_REC.AllowDBNull = false
Me.columnADD_REC.DefaultValue = CType(true,Boolean)
Me.columnDELETE_REC.AllowDBNull = false
Me.columnDELETE_REC.DefaultValue = CType(false,Boolean)
Me.columnADD_DOC.AllowDBNull = false
Me.columnADD_DOC.DefaultValue = CType(true,Boolean)
Me.columnVIEW_DOC.AllowDBNull = false
Me.columnVIEW_DOC.DefaultValue = CType(true,Boolean)
Me.columnDELETE_DOC.AllowDBNull = false
Me.columnDELETE_DOC.DefaultValue = CType(false,Boolean)
Me.columnADDED_WHO.MaxLength = 50
Me.columnCHANGED_WHO.MaxLength = 50
End Sub
@@ -28922,6 +28953,28 @@ Partial Public Class DD_DMSDataSet
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
Public Property SQL_PARENT_RECORD() As String
Get
Return CType(Me(Me.tableTBPMO_WD_IMPORT_PROFILE.SQL_PARENT_RECORDColumn),String)
End Get
Set
Me(Me.tableTBPMO_WD_IMPORT_PROFILE.SQL_PARENT_RECORDColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
Public Property ONLY_RECORD_CREATING() As Boolean
Get
Return CType(Me(Me.tableTBPMO_WD_IMPORT_PROFILE.ONLY_RECORD_CREATINGColumn),Boolean)
End Get
Set
Me(Me.tableTBPMO_WD_IMPORT_PROFILE.ONLY_RECORD_CREATINGColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
Public Function IsUNIQUE_DOC_SQLNull() As Boolean
@@ -46100,6 +46153,8 @@ Namespace DD_DMSDataSetTableAdapters
tableMapping.ColumnMappings.Add("SQL_DOCTYPE", "SQL_DOCTYPE")
tableMapping.ColumnMappings.Add("OLD_OBJECTTYPE", "OLD_OBJECTTYPE")
tableMapping.ColumnMappings.Add("IDX_FILE_WORKED", "IDX_FILE_WORKED")
tableMapping.ColumnMappings.Add("SQL_PARENT_RECORD", "SQL_PARENT_RECORD")
tableMapping.ColumnMappings.Add("ONLY_RECORD_CREATING", "ONLY_RECORD_CREATING")
Me._adapter.TableMappings.Add(tableMapping)
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.DeleteCommand.Connection = Me.Connection
@@ -46110,11 +46165,13 @@ Namespace DD_DMSDataSetTableAdapters
Me._adapter.InsertCommand.Connection = Me.Connection
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBPMO_WD_IMPORT_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (NAME, WD_SEARCH, U"& _
"NIQUE_DOC_SQL, NEW_OBJECTTYPE, CONNECTION_ID, ADDED_WHO, ENTITY_ID, SQL_DOCTYPE,"& _
" OLD_OBJECTTYPE, IDX_FILE_WORKED)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@NAME,@WD_SEARCH,@UNIQUE_DOC_S"& _
"QL,@NEW_OBJECTTYPE,@CONNECTION_ID,@ADDED_WHO,@ENTITY_ID,@SQL_DOCTYPE,@OLD_OBJECT"& _
"TYPE,@IDX_FILE_WORKED); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, WD_SEARCH, UNIQUE_DOC_SQL, NEW_"& _
"OBJECTTYPE, CONNECTION_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM"& _
" TBPMO_WD_IMPORT_PROFILE WHERE (GUID = SCOPE_IDENTITY())"
" OLD_OBJECTTYPE, IDX_FILE_WORKED, SQL_PARENT_RECORD, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
"ONLY_RECORD_CREATING)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@NAME,@WD_SEARCH,@UNIQUE_DOC_SQL,@NEW_OBJE"& _
"CTTYPE,@CONNECTION_ID,@ADDED_WHO,@ENTITY_ID,@SQL_DOCTYPE,@OLD_OBJECTTYPE,@IDX_FI"& _
"LE_WORKED,@SQL_PARENT_RECORD,@ONLY_RECORD_CREATING); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, "& _
"WD_SEARCH, UNIQUE_DOC_SQL, NEW_OBJECTTYPE, CONNECTION_ID, ADDED_WHO, ADDED_WHEN,"& _
" CHANGED_WHO, CHANGED_WHEN FROM TBPMO_WD_IMPORT_PROFILE WHERE (GUID = SCOPE_IDEN"& _
"TITY())"
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WD_SEARCH", Global.System.Data.SqlDbType.VarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_SEARCH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -46126,16 +46183,19 @@ Namespace DD_DMSDataSetTableAdapters
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_DOCTYPE", Global.System.Data.SqlDbType.VarChar, 5000, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_DOCTYPE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@OLD_OBJECTTYPE", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "OLD_OBJECTTYPE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDX_FILE_WORKED", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "IDX_FILE_WORKED", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_PARENT_RECORD", Global.System.Data.SqlDbType.VarChar, 5000, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_PARENT_RECORD", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ONLY_RECORD_CREATING", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ONLY_RECORD_CREATING", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.UpdateCommand.Connection = Me.Connection
Me._adapter.UpdateCommand.CommandText = "UPDATE TBPMO_WD_IMPORT_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET NAME = @NAME, WD_SEARCH "& _
"= @WD_SEARCH, UNIQUE_DOC_SQL = @UNIQUE_DOC_SQL, NEW_OBJECTTYPE = @NEW_OBJECTTYPE"& _
", CONNECTION_ID = @CONNECTION_ID, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" CHANGED_WHO = @CHAN"& _
"GED_WHO, ENTITY_ID = @ENTITY_ID, SQL_DOCTYPE = @SQL_DOCTYPE, OLD_OBJECTTYPE = @O"& _
"LD_OBJECTTYPE, IDX_FILE_WORKED = @IDX_FILE_WORKED"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Origina"& _
"l_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, WD_SEARCH, UNIQUE_DOC_SQL, NEW_OBJECTTYPE, CON"& _
"NECTION_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBPMO_WD_IMPOR"& _
"T_PROFILE WHERE (GUID = @GUID)"
"LD_OBJECTTYPE, IDX_FILE_WORKED = @IDX_FILE_WORKED, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SQ"& _
"L_PARENT_RECORD = @SQL_PARENT_RECORD, ONLY_RECORD_CREATING = @ONLY_RECORD_CREATI"& _
"NG"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, WD_SEARCH, "& _
"UNIQUE_DOC_SQL, NEW_OBJECTTYPE, CONNECTION_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WH"& _
"O, CHANGED_WHEN FROM TBPMO_WD_IMPORT_PROFILE WHERE (GUID = @GUID)"
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WD_SEARCH", Global.System.Data.SqlDbType.VarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_SEARCH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -46147,6 +46207,8 @@ Namespace DD_DMSDataSetTableAdapters
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_DOCTYPE", Global.System.Data.SqlDbType.VarChar, 5000, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_DOCTYPE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@OLD_OBJECTTYPE", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "OLD_OBJECTTYPE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDX_FILE_WORKED", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "IDX_FILE_WORKED", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_PARENT_RECORD", Global.System.Data.SqlDbType.VarChar, 5000, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_PARENT_RECORD", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ONLY_RECORD_CREATING", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ONLY_RECORD_CREATING", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
End Sub
@@ -46166,8 +46228,8 @@ Namespace DD_DMSDataSetTableAdapters
Me._commandCollection(0).Connection = Me.Connection
Me._commandCollection(0).CommandText = "SELECT GUID, NAME, WD_SEARCH, UNIQUE_DOC_SQL, NEW_OBJECTTYPE, CONNECTION_I"& _
"D, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ENTITY_ID, SQL_DOCTYPE, OLD"& _
"_OBJECTTYPE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" IDX_FILE_WORKED"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPMO_W"& _
"D_IMPORT_PROFILE"
"_OBJECTTYPE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" IDX_FILE_WORKED, SQL_PARENT_RECORD, ONLY"& _
"_RECORD_CREATING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPMO_WD_IMPORT_PROFILE"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
End Sub