Передать переменную

[srg]

Ребята, вопрос такой, как передать переменную с формы в отчет/другую форму?

[InTacto]

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

[srg]

а если передать переменную с формы, которая является фильтром, другой переменной на реквест форму Репорта?
вот к примеру от сюда >

Моя форма


в Мой Отчет
на реквест форму

[zuzka]

я обычно передаю в отчет фильтра через вызов функции, к примеру - SetMyFilters(text); где text - текстовая переменная содержащая данные после функции GETVIEW, переменная присваивается какой-то переменной (text) - глобальной для отчета.
В отчете функция имеет вид:

SetMyFilters(_text : text[1024])
text := _text

Если у Вас на исходной форме есть сабформа - тогда вытащить ее фильтра можно конструкцией CurrForm.сабформа.FORM.GetMyFilters; функция на сабформе:

GetMyFilters()text:text[1024]
text := GETVIEW;

В отчете на таблицу где-нибудь в PreReport я делаю таблица.SETVIEW(text) - и таблица отфильтрована по нужным полям и значениям. Способ для ленивых...
На форму запроса тоже можно вытащить эти данные - ведь известно по каким полям нужны (опять же передать фильтра и таблицу ими прогнать), String := Record.GETFILTER(Field), String передать в качестве SourceExpr поля формы...

[srg]

Вопрос такого характера..

сделал на реквест форме построение отчета по периодам

вот код

Col:=3;
CASE PeriodType OF
 PeriodType::Day:
   Formula:='<1D>';
 PeriodType::Week:
   Formula:='<1W>';
 PeriodType::Month:
   Formula:='<1M>';
 PeriodType::Quarter:
   Formula:='<1Q>';
 PeriodType::Year:
   Formula:='<1Y>';
END;

REPEAT
 CASE PeriodType OF
  PeriodType::Day:
    DateText:=FORMAT(CurDate);
  PeriodType::Week:
    DateText:=FORMAT(CurDate,7,'<Week>.<Year4>');
  PeriodType::Month:
    DateText:=FORMAT(CurDate,12,'<Month Text,3> <Year4>');
  PeriodType::Quarter:
    DateText:=FORMAT(CurDate,7,'<Quarter>/<Year4>');
  PeriodType::Year:
    DateText:=FORMAT(DATE2DMY(CurDate,3));
 END;

Но появилась иная задача, и как реализовать вообще хз.
мне нужно вот эти периоды, получать с самой формы и передавать себе в отчет уже.

[zuzka]

Если период это переменная - в чем проблема ее передать? Завести в отчете переменную типа Option и передавать... Главное чтобы порядок следования параметров в Option совпадал у той что на форме и в той что в отчете. Даже если на форме даты "С..." и "До..." - можно легко обработать их и вычислить какому периоду они соответствуют, или если на форме строки можно взять самую раннюю и самую позднюю - и опять же узнать период...

[srg]

Цитата:

Сообщение от zuzka

Если период это переменная - в чем проблема ее передать? Завести в отчете переменную типа Option и передавать... Главное чтобы порядок следования параметров в Option совпадал у той что на форме и в той что в отчете. Даже если на форме даты "С..." и "До..." - можно легко обработать их и вычислить какому периоду они соответствуют, или если на форме строки можно взять самую раннюю и самую позднюю - и опять же узнать период...

правильно говорите, сделал уже))

а дату в формате

01.01.01..12.12.12
передать в две переменные
дата начала к примеру и дата окончание

[srg]

Цитата:

Сообщение от Fierce

Цитата:

Сообщение от zuzka

Если период это переменная - в чем проблема ее передать? Завести в отчете переменную типа Option и передавать... Главное чтобы порядок следования параметров в Option совпадал у той что на форме и в той что в отчете. Даже если на форме даты "С..." и "До..." - можно легко обработать их и вычислить какому периоду они соответствуют, или если на форме строки можно взять самую раннюю и самую позднюю - и опять же узнать период...

правильно говорите, сделал уже))

а дату в формате

01.01.01..12.12.12
передать в две переменные
дата начала к примеру и дата окончание

как параметр я ее получаю, у себя, но дальше походу нужно искать эти '..', чтоб можно было скопировать символы

[InTacto]

можно наложить этот фильтр на какое-нибудь поле таблицы, а потом получить границы через ф-ции GETRANGEMIN и GETRANGEMAX по этому полю

[srg]

Цитата:

Сообщение от InTacto

можно наложить этот фильтр на какое-нибудь поле таблицы, а потом получить границы через ф-ции GETRANGEMIN и GETRANGEMAX по этому полю

а можно какой то пример использования?

[InTacto]

Пример из справки />

These examples show how to use the GETRANGEMIN function.

With a filter which is a single range:

Customer.SETFILTER("No.",'100..200');
Val := Customer.GETRANGEMIN("No.");
MESSAGE(Text000', Val);

The message window shows:

The minimum value is: 100

With a filter which is single value:

Customer.SETFILTER("No.",'100');
Val := Customer.GETRANGEMIN("No.");
MESSAGE(Text000, Val);

Create the following text constant in the C/AL Globals window:

Text Constant
ENU Value

Text000
'The minimum value is: %1'


The message window shows:

The minimum value is: 100

With a filter which is not a single range:

Customer.SETFILTER("No.",'200|300');
Val := Customer.GETRANGEMIN("No.");

This code causes a run-time error to occur.

[srg]

а если дату ввели ..12.12.12 что делать??

на сколько я понял, идея заключается в том, чтоб узнать минимальный и максимальный.
я их получаю и после этого вывожу на свою реквест форму, правильно?
а что делать если, дата ..12.12.12 или 12.12.12..?
мне то нужна полная, а ее могут и не ввести, как мне нужно..

[InTacto]

Так это как вы с пользователями договоритесь. Нужно уточнять ТЗ.
Что будет означать пусто поле - дата не введена или нет границы?

[srg]

Цитата:

Сообщение от InTacto

Так это как вы с пользователями договоритесь. Нужно уточнять ТЗ.
Что будет означать пусто поле - дата не введена или нет границы?

нет границы, от начала времен будет считать.

[InTacto]

Значит вы ответили на свой вопрос?

[srg]

Цитата:

Сообщение от InTacto

Значит вы ответили на свой вопрос?

в том то и весь подвох, что на форме оно должно так считать, поле DateFilter
а на отчете должно считать от Дата Начало, до Дата окончание, но то что указано в DateFilter, оно должно автоматически заносить в Дата начало и Дата окончание, исходя с этого, если в DateFilter не будет начальной даты, то просто не смогу определить эту дату*.

буду наверное находить позицию '..', а после '..'записывать цифры к себе, ну и наоборот.

[Sancho]

убедимся, что поле "Date Filter" есть в таблице источнике
далее сделаем 2 переменные с типом Дата, например, ДатаНачалы и ДатаКонцы
далее на триггер OnPreReport напишем одну фразу:
SETRANGE("Date Filter", ДатаНачалы, ДатаКонцы);
если надо от начала времен, то ДатуНачалы не заполняем.

с точечками играться не стоит

[Sancho]

Цитата:

Сообщение от Fierce

... исходя с этого, если в DateFilter не будет начальной даты, то просто не смогу определить эту дату*.

буду наверное находить позицию '..', а после '..'записывать цифры к себе, ну и наоборот.

если гад пользователь ввел какой-то фильтр на дату и надо определить дату от и дату до, то идем другим путем
создаем глобальную переменную на таблицу Date (есть такая служебная таблица)
ставим фильтр на тип даты = день
а на поле Starting Date - тот самый фильтр, что указал пользователь.
далее Date.Find('-') дает нам первую дату фильтра, а Date.Find('+') - последнюю.
и опять же никакого разбора на точечьки

[srg]

Цитата:

Сообщение от Sancho

убедимся, что поле "Date Filter" есть в таблице источнике
далее сделаем 2 переменные с типом Дата, например, ДатаНачалы и ДатаКонцы
далее на триггер OnPreReport напишем одну фразу:
SETRANGE("Date Filter", ДатаНачалы, ДатаКонцы);
если надо от начала времен, то ДатуНачалы не заполняем.

с точечками играться не стоит />/>

ну и опять же, по поводу даты начала, если ее не введут, оно в ексель будет выводить с какого то там 1700 года...

[zuzka]

Цитата:

Сообщение от Fierce

ну и опять же, по поводу даты начала, если ее не введут, оно в ексель будет выводить с какого то там 1700 года...

А кто мешает урезать то что без даты до максимально возможного отрезка?
К примеру: выбрали 5 лет - у Вас максимум 1 год, режьте год от имеющейся даты... (...12.12.12 => 12.12.11..12.12.12)