Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Результат скалярной UDF в поле формы / 13 сообщений из 13, страница 1 из 1
25.10.2004, 18:08:15
    #32753594
Guest01
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
ADP2002+SQL2000
Функция:
ALTER FUNCTION dbo.МояФункция
(@Код int,
@Дата smalldatetime)
RETURNS decimal (10,4)
AS
BEGIN
RETURN ( SELECT TOP 1 Ставка
FROM dbo.МояТаблица
WHERE (КодВидСубконто = @Код) AND (Дата <= @Дата)
ORDER BY Дата DESC )
END
Подскажите, как получить результат функции в вычисляемом поле формы.
...
Рейтинг: 0 / 0
25.10.2004, 18:17:12
    #32753623
incold
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
А форма с источником данных?
...
Рейтинг: 0 / 0
25.10.2004, 18:18:16
    #32753628
Guest01
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
Да.
...
Рейтинг: 0 / 0
25.10.2004, 18:28:33
    #32753646
incold
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
Варианты:
- добавить в источник формы поле=результат функции
- сделать храним.процедуру = функции, сделать вызов этой процедуры на VBA с возвратом значения через рекордсет
...
Рейтинг: 0 / 0
25.10.2004, 18:29:21
    #32753647
ищ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
currentproject.Connection.Execute("select dbo.MyFunction(1,13694,13202)")(0)
...
Рейтинг: 0 / 0
25.10.2004, 18:34:45
    #32753658
Guest01
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
Предложенный второй пункт как раз и пытаюсь обойти - дублирование кода.
Первый пункт пробовал - в поле ":ИМЯ?". Буду провоать еще 1 вариант,
возможно аргументы плохо передал.

Спасибо.
...
Рейтинг: 0 / 0
25.10.2004, 18:36:24
    #32753661
incold
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
авторПервый пункт пробовал - в поле ":ИМЯ?".

select dbo.myfunction(myfield) as myfield
...
Рейтинг: 0 / 0
25.10.2004, 18:39:05
    #32753669
Guest01
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
Всем спасибо.
Завтра буду шаманить. Результат сообщу.
...
Рейтинг: 0 / 0
26.10.2004, 12:02:57
    #32754457
Guest01
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
Вышло через VBA функцию:

Public Function MyFunction(Дата As String, Код As Integer)
Dim cnn As ADODB.Connection
Set cnn = CurrentProject.Connection
MyFunction = cnn.Execute("Select dbo.MyUDFFunction(" _
& Код & "," & Format(Дата, "'yyyymmdd'") & ")")(0)
cnn.Close
Set cnn = Nothing
End Function
...
Рейтинг: 0 / 0
26.10.2004, 12:09:56
    #32754486
Alexey Sh
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
Зачем писанины столько :)
Код: plaintext
1.
2.
CurrentProject.Connection..Execute("Select dbo.MyUDFFunction(" _
& Код & "," & Format(Дата, "'yyyymmdd'") & ")")( 0 )

да и cnn.Close несколько смущает
...
Рейтинг: 0 / 0
26.10.2004, 12:11:49
    #32754496
Alexey Sh
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
Сорри , точка лишняя
Код: plaintext
1.
2.
CurrentProject.Connection.Execute("Select dbo.MyUDFFunction(" & Код & "," & Format(Дата, "'yyyymmdd'") & ")")( 0 )

...
Рейтинг: 0 / 0
26.10.2004, 12:16:27
    #32754516
Guest01
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
Люблю порядок.
Предпочитаю явно закрывать все ссылки.
...
Рейтинг: 0 / 0
26.10.2004, 12:19:27
    #32754530
Alexey Sh
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Результат скалярной UDF в поле формы
явное "закрытие ссылки" (ументшение счётчика ссылок на объект, IUnknown::Release )есть
Код: plaintext
Set cnn = Nothing
а .Close есть несколько более серьёзное действие
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Результат скалярной UDF в поле формы / 13 сообщений из 13, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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