TempDB.Get

From SunFlurry wiki
Jump to: navigation, search
  Get (Работа с текущей записью)
Объект:Временная таблица базы данных
Статус разработки: Реализована
Тип:Функция
Обращение к БД:Нет
Исключения:Невозможно превратить в строку, неверное имя столбца, текущая запись не загружена
Визуальность:Нет

Функция получает значение указанного по наименованию столбца таблицы в случае, если запись уже загружена с помощью функций Next, PeekNext или Find. Функцию можно использовать вместо атрибута <Имя столбца> в случае, к примеру, когда наименование столбца хранится в переменной.

Синтаксис

TempDB.Get(<Наименования столбца (STRING)>):<Значение столбца>

Аргументы

  • <Наименования столбца (STRING)> - Задает наименования столбца, значение которого необходимо получить.

Возвращаемое значение

Возвращает значение указанного столбца.

Примеры

//Пример создает таблицу аТемп, и заполняет ее резервами документа ЗаказНаПроизводство, при этом в ней также заполнено поле документа ВыпускПродукции. 
//  Документ ВыпускПродукции подчинен документу ЗаказНаПроизводство. Выборка документов происходит за период с НачДата по КонДата.
//Таблица номенклатуры из резервов с выпусками и заданиями
аТемп:=TempDB.Create("зДок:DB,зЗад:DB,зН:DB:I,Количество:NUMBER.15.5");
//Заказы на производство
аТемп.LoadFrom("Stor.Резервы","@LINK->зЗад,Номенклатура->зН,?(@EXPENSE=1,-Количество,Количество)->Количество",
  "(BegOfDay(@DATE)>=НачДата)And(BegOfDay(@DATE)<=КонДата)","IsType(@LINK,Doc.ЗаказНаПроизводство)");
//Заполняем зДок (подчиненный документ -- ВыпускПродукции)
вТемп:=TempDB.Create("зДок2:DB,зЗад:DB");
//Выбираются только те документы выпусков, основания которых (ЗаказНаПроизводство) находятся в таблице аТемп
вТемп.LoadFrom("Doc.ВыпускПродукции","@ELEMENT->зДок2,@ELEMENT.ДокОснование->зЗад","@ELEMENT.ДокОснование IN аТемп.зЗад");
//Заполним столбец зДок оригинальной таблицы, объединение происходит по условию ":зЗад=зЗад".
аТемп.Update(вТемп,":зЗад=зЗад,зДок2->зДок");
i:=0;
аТемп.Select();
While аТемп.Next() Do
  i:=i+1;
  //Выводим информацию из таблицы в лог
  Message("Запись: "+i);
  For i:=1 To аТемп.SizeC() Do
    Message("  Столбец "+аТемп.GetColumnName(i)+", значение: "+аТемп.Get(аТемп.GetColumnName(i));
  EndDo;
EndDo;