Код

		ID_Table = глODBC.ВыполнитьСкалярный("select id AS [id $Число] from sysobjects where id = object_id(N'dbo.ВидыСубконто')");
		Если ID_Table = 0 Тогда
			ТекстЗП= "
			|CREATE TABLE dbo.ВидыСубконто
			|(
			|ID Int NOT NULL,
			|Идентификатор Varchar(200) NOT NULL)  ON [PRIMARY]
			|
			|CREATE UNIQUE CLUSTERED
			|INDEX [IX_ID] ON [dbo].[ВидыСубконто] ([ID])
			|ON [PRIMARY]";
			глODBC.Выполнить(ТекстЗП);
		Иначе
			глODBC.Выполнить("DELETE FROM [dbo].[ВидыСубконто]");
		КонецЕсли;


		Для нОб = 1 По Метаданные.ВидСубконто() Цикл  

			ТекМД = Метаданные.ВидСубконто(нОб);
			Инд = ТекМД.Идентификатор;
			Ид = глMDW.ИДОбъекта(ТекМД);


			Если глODBC.Выполнить("INSERT INTO dbo.ВидыСубконто (ID,Идентификатор)
			|VALUES ("+Ид+",'"+Инд+"')") = 0 Тогда
				Сообщить(глODBC.ПолучитьОписаниеОшибки());
			КонецЕсли;

		КонецЦикла;