Звіти в ГІС 6

[kol_s]

Доброго дня. Переробив ваш список земельних ділянок, але до кінця довести не можу .Список видає всю інформацію з поміченого списку, окрім [DM2.TbTypePerson."Number"] та [DM2.TbTypePerson."Groupe"] тут по всьому списку стоять дані 1 ділянки, яка вибрана . Звіт приклав

[NickS]

Доброго дня. Переробив ваш список земельних ділянок, але до кінця довести не можу .Список видає всю інформацію з поміченого списку, окрім [DM2.TbTypePerson."Number"] та [DM2.TbTypePerson."Groupe"] тут по всьому списку стоять дані 1 ділянки, яка вибрана

1. Шаблони в ГІС6 краще робити в FastReport 3 (fr3), а не в цьому старому, який не має половини функцій і не зручний.
2. Щоб витягувати дані іншої таблиця, а це точно інша таблиця, їх потрібно спочатку знаходити. Адже таблиця ділянок перебирається, а таблиця видів користувачів ні! А треба, щоб для кожної ділянки, програма шукала відповідний запис в таблиця видів користувачів. Це можна зробити прямо в списку або через sql-запит.

Для Вашого прикладу, в FastReport 2 потрібно добавити код:

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

  TPNumber := '';

  If LocateData('DM2.TbTypePerson', 'ID_TypePerson', [DM1.TbUser."ID_TypePerson"]) = true then
    TPNumber := [DM2.TbTypePerson."Number"];

а в поле вивести значення змінної [TPNumber].

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

  TPGroup := '';

  If LocateData('DM2.TbTypePerson', 'ID_TypePerson', [DM1.TbUser."ID_TypePerson"]) = true then
    TPGroup := [DM2.TbTypePerson."Groupe"];

а в поле вивести значення змінної [TPGroup].

Виправлений звіт прикріпляю

[kol_s]

Безмежно вдячний

[acpekttov]

Подскажите пожалуйста если на земельном участке есть вырезки то в каталоге координат или в ведомости перед вырезкой должна ли быть пустая строка?

[NickS]

Подскажите пожалуйста если на земельном участке есть вырезки то в каталоге координат или в ведомости перед вырезкой должна ли быть пустая строка?

Нет, не должна. Никогда не видел, чтобы её вставляли.

[feNICKs]

Подскажите пожалуйста если на земельном участке есть вырезки то в каталоге координат или в ведомости перед вырезкой должна ли быть пустая строка?

Вырезку можно определить по дубликатам координат. Поэтому пустые строки или что-то подобное - не нужное.

[kol_s]

Доброго дня.
Підскажіть чи можна у результаті цього виразу [IIF(<DM3.TmGeoPoint."L"> <> 0, FormatFloat('0.000', <DM3.TmGeoPoint."L">), '')], замінити кому на крапку?

[NickS]

Доброго дня.
Підскажіть чи можна у результаті цього виразу [IIF(<DM3.TmGeoPoint."L"> <> 0, FormatFloat('0.000', <DM3.TmGeoPoint."L">), '')], замінити кому на крапку?

Це краще робити через код.

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

  LHod := '';

  If <DM3.TmGeoPoint."L"> <> 0 then
  begin
    LHod := FormatFloat('0.000', <DM3.TmGeoPoint."L">);

    If Pos(',', LHod) > 0 then
      LHod := Copy(LHod, 1, Pos(',', LHod) - 1) + '.' + Copy(LHod, Pos(',', LHod) + 1, Length(LHod));
  end;

і вставляти його потрібно не в головну програму, а в OnBeforePrint бенда, на якому перебирається таблиця "DM3.TmGeoPoint".

[NoViChoK]

Підкажіть як в шаблоні "Акт приёмо-передачи межевых знаков 2013" відмінусувати перші 7 знаків перемінної [MejnZN."MarkNumber"] ?
Тобто щоб в шаблоні відображало не "2017.04-000-00016" , а наприклад так " ____________ -000-00016"

[NickS]

Підкажіть як в шаблоні "Акт приёмо-передачи межевых знаков 2013" відмінусувати перші 7 знаків перемінної [MejnZN."MarkNumber"] ?
Тобто щоб в шаблоні відображало не "2017.04-000-00016" , а наприклад так " ____________ -000-00016"

Для цього потрібно скористатись функціює копіювання рядка:
____________[Copy(<MejnZN."MarkNumber">, 8, Length(<MejnZN."MarkNumber">) - 7)]