Приклади робочих скриптів у звітових формах

[feNICKs]

А на счёт переменной которая хранит значение "мужской/женский"?

Пример использования:
[IIF (<DM1.QbPeople."Gender">=1, 'мужской', 'женский')]

[007stas]

Код для вывода на печать отчета для Выделенных земельных участков, не помеченных зеленой меткой ?

[NickS]

Код для вывода на печать отчета для Выделенных земельных участков, не помеченных зеленой меткой ?

Такого кода нет. А что Вы хотите сделать?

[007stas]

Такого кода нет. А что Вы хотите сделать?

Печатать отчет на 2 участка, но что бы каждый раз не помечать зеленой меткой, а просто выделить. Например как экспорт в dxf AutoCAD есть выбор : активного, помеченных зеленой меткой, выделенных.

[NickS]

Такого кода нет. А что Вы хотите сделать?

Печатать отчет на 2 участка, но что бы каждый раз не помечать зеленой меткой, а просто выделить. Например как экспорт в dxf AutoCAD есть выбор : активного, помеченных зеленой меткой, выделенных.

Нет, такое не поддерживается в шаблонах.

[feNICKs]

Код для вывода на печать отчета для Выделенных земельных участков, не помеченных зеленой меткой ?

Попробуйте использовать отчетную форму для отмеченных зем.участков, только измените ее:
1. Найдите графу

Код: Виділити все

FilterData('DM1.QbObject', 'OK = ''ю''');

2. удалите/закомментируйте ее.
3. можете еще закомментировать

Код: Виділити все

FilterData ('DM1.QbObject', '');
LocateData ('DM1.QbObject', 'ID_Object', VarToStr(ID_Object));

- чтоб не снимать фильтр в главном окне.
Тогда в самой отч.форме, в цикле для DM1.QbObject будут перебираться зем.учаски, отфильтрованные в главном окне программы "Земельные участки".

[NickS]

Попробуйте использовать отчетную форму для отмеченных зем.участков, только измените ее:

Ну впринципе да, если отфильтровать список в главном окне и просто перебирать его без дополнительных функций, то тоже будет похожий вариант без отметки, но для этого надо задать условие фильтра. Ведь по сути своей, стандартные отчётные формы для отмеченных используют такой алгоритм:
- по зелёным меткам фильтруют;
- перебирают отфильтрованные;
- вконце снимают фильтр.
Вот как раз если не применять фильтрацию для зелёных меток в отчётной форме, а предварительно отфильтровать по любому условию, то будет тоже самое.

[007stas]

Код должен выводить название "Вид землевользователя" в аренде

Код: Виділити все

If LOCATEDATA( 'DM2.TbTypePerson', 'ID_TypePerson', <DM1.QbLease."ID_TypePerson">) = True Then
   begin
     NomZ1 := <DM2.TbTypePerson."Groupe">;
     NomZ2 := <DM2.TbTypePerson."Number">;
     NameZ := Lowercase(Copy(Trim(<DM2.TbTypePerson."Name">), 1, 1)) +
              Copy(Trim(<DM2.TbTypePerson."Name">), 2, Length(Trim(<DM2.TbTypePerson."Name">)) - 1);
   end;

Что в нем не так? Пишет ошибка

[LeViK]

Код должен выводить название "Вид землевользователя" в аренде. Что в нем не так? Пишет ошибка

Ай хитрец!) Только беда в <DM1.QbLease."ID_TypePerson">. Такого поля не существует в таблице DM1.QbLease. Вернее его значение есть на сервере, но при формировании отчёта его не получаешь. Список полей доступных баз данных смотри через "вид/панели инструментов/дерево данных". Получить к ним доступ, наверно, можно через таблицу Query.

[007stas]

Такого поля не существует в таблице DM1.QbLease. Вернее его значение есть на сервере, но при формировании отчёта его не получаешь. Список полей доступных баз данных смотри через "вид/панели инструментов/дерево данных". Получить к ним доступ, наверно, можно через таблицу Qwery.

Но есть поле <DM4.QiLease."ID_TypePerson">. Но при выводе оно все равно пустое. А что за таблица Qwery?