powered by simpleCommunicator - 2.0.29     © 2024 Programmizd 02
Map
Форумы / Informix [игнор отключен] [закрыт для гостей] / ODBC и пустые названия колонок
4 сообщений из 4, страница 1 из 1
ODBC и пустые названия колонок
    #39437807
ga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У меня есть старая программа. Работает на BDE (Borland Db Engine) используя "native Informix driver". Теперь же хочу, что бы работала через ODBC. Настроил подключение. Всё работает. Но до тех пор пока не происходит вызов хранимой процедуры. А дело всё в том, что возвращаемые процедурой колонки не имеют имён. Сделал трассировку. По ней видно, что виной всему функция SQLDescribeCol из интерфейса ODBC, которая возвращает пустое название колонки если не задан псевдоним для выражения.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
......   114-fdc	ENTER SQLDescribeCol 
		HSTMT               037DB530
		UWORD                        1 
		UCHAR *             0x0205101E 
		SWORD                       32 
		SWORD *             0x0012F822
		SWORD *             0x0012F7DA
		SQLULEN *           0x0012F7D4
		SWORD *             0x02051044
		SWORD *             0x0012F820

......   114-fdc	EXIT  SQLDescribeCol  with return code 0 (SQL_SUCCESS)
		HSTMT               037DB530
		UWORD                        1 
		UCHAR *             0x0205101E        <---- Вот суда кладётся пусто
		SWORD                       32 
		SWORD *             0x0012F822 (0)
		SWORD *             0x0012F7DA (4)
		SQLULEN *           0x0012F7D4 (10)
		SWORD *             0x02051044 (0)
		SWORD *             0x0012F820 (1)



Вот здесь нашел, что раньше вроде, как можно было воспользоваться опцией WorkArounds=64 и тогда драйвер придумает название для пустых колонок. Но с моим драйвером ODBC v 3.50 TC7DE это не работает.

Вопрос: как заставить ODBC драйвер давать имена пустым колонкам ?

Informix v11
...
Рейтинг: 0 / 0
ODBC и пустые названия колонок
    #39438308
bk0010
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
По номеру (Fields[0].asInteger) не хотите обращаться?
...
Рейтинг: 0 / 0
ODBC и пустые названия колонок
    #39438972
ga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
По номеру похоже не получится. Программа уже скомпиленная, а исходников у меня нет.
Покопавшись в exe-шнике редактором ресурсов выяснил, что в коде примерно так написано:
Код: pascal
1.
dbEdit.DataField := "(expression)_1";


И как я понял компонент этот только по названию может к полю обращаться. По номеру он не умеет.

Попробовать хочу в драйвере функцию SQLDescribeCol переписать. Обернуть ODBC dll-ку из CSDK своей. И всё, что в исходной экспортировать на прямую, а SQLDescribeCol переопределить.
...
Рейтинг: 0 / 0
ODBC и пустые названия колонок
    #39454834
ga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В общем то способ обернуть dll c ODBC драйвером в другую dll и переписать в ней часть функции сработал. А в Informix CSDK есть всё, что для этого нужно:
Заголовочные файлы (INFORMIXDIR/lib)

Библиотеки импорта (INFORMIXDIR/incl)
DEF файл. Можно сделать с помощью утилиты DUMPBIN из состава VS

код получился примерно такой:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.
76.
77.
78.
79.
80.
81.
82.
83.
84.
#include "stdafx.h"
#include "sqltypes.h"
#include <string>

extern "C" {


	__declspec(dllexport) SQLRETURN SQL_API SQLDescribeColW
	(
		SQLHSTMT            hstmt,
		SQLUSMALLINT        icol,
		_Out_writes_opt_(cchColNameMax) SQLWCHAR* szColName,
		SQLSMALLINT         cchColNameMax,
		_Out_opt_
		SQLSMALLINT*        pcchColName,
		_Out_opt_
		SQLSMALLINT*        pfSqlType,
		_Out_opt_
		SQLULEN*            pcbColDef,
		_Out_opt_
		SQLSMALLINT*        pibScale,
		_Out_opt_
		SQLSMALLINT*        pfNullable
	){

		HMODULE ICLIT09BDLL = GetModuleHandle(L"ICLIT09B.DLL");

		if (NULL != ICLIT09BDLL) {

			SQLRETURN (__stdcall *SQLDescribeColWOld)
			(
				SQLHSTMT,
				SQLUSMALLINT,
				_Out_writes_opt_(cchColNameMax) SQLWCHAR*,
				SQLSMALLINT,
				_Out_opt_
				SQLSMALLINT*,
				_Out_opt_
				SQLSMALLINT*,
				_Out_opt_
				SQLULEN*,
				_Out_opt_
				SQLSMALLINT*,
				_Out_opt_
				SQLSMALLINT*
			) = (SQLRETURN(__stdcall*)
				(
					SQLHSTMT,
					SQLUSMALLINT,
					_Out_writes_opt_(cchColNameMax) SQLWCHAR*,
					SQLSMALLINT,
					_Out_opt_
					SQLSMALLINT*,
					_Out_opt_
					SQLSMALLINT*,
					_Out_opt_
					SQLULEN*,
					_Out_opt_
					SQLSMALLINT*,
					_Out_opt_
					SQLSMALLINT*
					)) GetProcAddress(ICLIT09BDLL, "SQLDescribeColW");


			SQLRETURN res =
				
				SQLDescribeColWOld(
						hstmt,
						icol,
						szColName,
						cchColNameMax,
						pcchColName,
						pfSqlType,
						pcbColDef,
						pibScale,
						pfNullable);


//После исполнения исходной функции, обрабатываем входные переменные

			return res;
		}
	}
}
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Informix [игнор отключен] [закрыт для гостей] / ODBC и пустые названия колонок
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]