Код

Процедура ПриОткрытии ()
	ЗагрузитьВнешнююКомпоненту ("1cpp.dll");
КонецПроцедуры

//-----------------------------------------------------------------------------

Процедура Сформировать ()
	Соединение = СоздатьОбъект ("OLEDBData");
	СтрокаПодключения = Шаблон ("Provider=VFPOLEDB.1; Mode=ReadWrite;
	|Data Source=[КаталогИБ ()];");

	Соединение.Соединение (СтрокаПодключения);

	Команда = Соединение.СоздатьКоманду ();

	КолвоКолонок = 100;

	ИмяКолонки = "1234567890";
	Для Ч = 1 По 10 Цикл
		ИмяКолонки = ИмяКолонки + ИмяКолонки;
	КонецЦикла;
	//Предупреждение (ИмяКолонки);
	ИмяКолонки = "К" + ИмяКолонки;

	ТекстЗапроса = "
	|SELECT TOP 1
	|	ID
	|";

	Для Ч = 1 По КолвоКолонок Цикл
		ТекстЗапроса = ТекстЗапроса + "
		|	,Ном" + Ч + " AS " + ИмяКолонки + "_" + Ч;
	КонецЦикла;

	ТекстЗапроса = ТекстЗапроса + "
	|FROM
	|	$Справочник.Номенклатура
	|";

	Для Ч = 1 По КолвоКолонок Цикл
		ТекстЗапроса = ТекстЗапроса + "
		|	LEFT JOIN $Справочник.Номенклатура AS Ном" + Ч + "
		|";
	КонецЦикла;

	ТекстЗапроса = ТекстЗапроса + "
	|ORDER BY ID
	|";

	ТЗ = Команда.ВыполнитьИнструкцию (ТекстЗапроса);
	ТЗ.ВыбратьСтроку ();
КонецПроцедуры
 

Код

	for(ULONG nCol = 0; nCol < nCols; nCol++)
	{
		// заполняем мою структуру
		//
		CString strName = OLE2T(pColumnsInfo[nCol].pwszName); // ЖОПА ЗДЕСЬ

		pColInfo1C[nCol].m_Index	 = nCol;
		pColInfo1C[nCol].m_strName	 = strName;
		pColInfo1C[nCol].m_wType	 = pColumnsInfo[nCol].wType;
		pColInfo1C[nCol].m_nType1C	 = GetType1C(&pColInfo1C[nCol]);