Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Вопрос не совсем по форуму.. Но команды схожие / 4 сообщений из 4, страница 1 из 1
16.01.2018, 10:06:10
    #39584851
evgenii9586
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос не совсем по форуму.. Но команды схожие
День добрый. Нужно написать маленькую штучку на Delphi, юзая бд Oracle.

Это подключено не через ADO. Через компоненты DOA

Перенёс на форму TOracleSession , залогинил сессию и добавил датасет, указав источник данных вышесказнную сессию.

Так вот как правильно в делфи обратиться к полю таблицы
Чтобы можно было сделать вот так :
Код: plaintext
1.
2.
3.
if (поле таблицы от 1 до конца) = NULL
then записать в это поле DateToStr(nsow)+TimeToStr(nsow)
else записать в поле error информацию от ошибке
...
Рейтинг: 0 / 0
16.01.2018, 11:11:47
    #39584918
krapotkin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос не совсем по форуму.. Но команды схожие
довольно странное желание.
вам нужно пробежать по всем полям записи и в пустые поля запихать текущую дату/время??
подозрение на плохую архитектуру БД
...
Рейтинг: 0 / 0
16.01.2018, 12:00:15
    #39584952
evgenii9586
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос не совсем по форуму.. Но команды схожие
krapotkinдовольно странное желание.
вам нужно пробежать по всем полям записи и в пустые поля запихать текущую дату/время??
подозрение на плохую архитектуру БД

Допустим есть таблица.

Она динамическая и изменяется автоматически.

Допустим есть в ней поле Data.

Там может стоять дата, а может не стоять.
У меня в случае отсутствия даты будет выполняться отправка sms и ставиться текущая дата. А если ошибка отправки, то ставится лог в errror.

Т е мы должны пробегать по всему полю Data. и работать так выполнил скрипт, поставил дату, выполнил скрипт , поставил дату. Если error, написал в следующее поле Error
...
Рейтинг: 0 / 0
16.01.2018, 12:54:39
    #39585029
DarkMaster
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос не совсем по форуму.. Но команды схожие
evgenii9586,

Псевдо код:

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
  Query.Open;
  Query.First;
  while not Query.Eof do
     begin
        if Query.FieldByName('DATA').IsNULL then ...
        else ...
        Query.Next; 
     end;
  Query.Close;
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Вопрос не совсем по форуму.. Но команды схожие / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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