Вынуждает переменную сохранять свое значение только в данной формуле. В синтаксисе Basic эта область действия используется по умолчанию в объявлениях переменных без ключевого слова области действия. Local t v t — оператор объявления переменной. v — допустимое имя переменной. Local NumberVar BonusCount объявляет числовую переменную BonusCount, которая будет сохранять свое значение только во время вычисления данной формулы. Если переменная BonusCount будет объявлена в любых других формулах, она будет содержать нулевое значение. Shared Вынуждает переменную сохранять свое значение в данной формуле, во всех других формулах текущего отчета и во всех подотчетах. Shared t v t — оператор объявления переменной. v —…

Объявляет булевскую переменную, содержащую массив или одиночное значение. BooleanVar Array varname BooleanVar varname varname — имя переменной, не совпадающее ни с одним ключевым словом формул Crystal Reports, не содержащее пробелов и не начинающееся с цифры или какого- либо специального символа. BooleanVar Array Workdays := [False, True, True, True, True, True, False]; Workdays[DayOfWeek(CurrentDate)] возвращает значение True, если функция CurrentDate возвращает значения от Monday (понедельник) до Friday (пятница). Формула объявляет булевскую переменную массива, содержащую семь элементов, а затем извлекает элемент, связанный с соответствующим днем недели. BooleanVar BonusReached; If {Sales .Amount} > 5000 Then BonusReached := True объявляет булевскую переменную и присваивает ей…

Объявляет переменную денежного типа, содержащую массив, массив диапазонов, диапазон или одиночное значение. CurrencyVar Array varname CurrencyVar Range Array varname CurrencyVar Range varname CurrencyVar varname varname — имя переменной, не совпадающее ни с одним ключевым словом формул Crystal Reports, не содержащее пробелов и не начинающееся с цифры или какого- либо специального символа. CurrencyVar Range GoodSales := upFrom 5000; If {Sales.Amount} In GoodSales Then "Хорошая работа" объявляет переменную диапазона денежного типа и присваивает ей все значения включительно, превышающие 5000 долларов. Если значение поля объема продаж (Sales .Amount) соответствует этому диапазону, формула возвращает строку “Хорошая работа”. CurrencyVar HighAmount; If {Sales.Amount} > HighAmount Then…

Объявляет переменную даты-времени, содержащую массив, массив диапазонов, диапазон или одиночное значение. DateTimeVar Array varname DateTimeVar Range Array varname DateTimeVar Range varname DateTimeVar varname varname — имя переменной, не совпадающее ни с одним ключевым словом формул Crystal Reports, не содержащее пробелов и не начинающееся с цифры или какого- либо специального символа. DateTimeVar Range WorkDays := #6/2/2003 8:00am# To #6/6/2003 5:00pm#; If Not (.{Salary.WorkDate} In WorkDays) Then {Salary.DailyPay} + {Salary.OvertimePay}

{Salary.DailyPay} объявляет переменную диапазона значений даты-времени и присваивает ей значения даты-времени с 8 часов утра понедельника до 5 часов вечера пятницы. Затем формула сравнивает значение переменной с датой выполнения работы для определения необходимости повышенной оплаты труда. DateTimeVar OutOfTolerance; If {Meas.Sample Value} > {Standards.Sample} Then OutOfTolerance := {Meas.Sample Date' Time} объявляет переменную даты-времени и проверяет, превышает ли время чтения образца текста допустимое значение. Если да, формула присваивает переменной данное значение даты-времени.

Объявляет переменную даты, содержащую массив, массив диапазонов, диапазон или одиночное значение. DateVar Array varname DateVar Range Array varname DateVar Range varname DateVar varname varname — имя переменной, не совпадающее ни с одним ключевым словом формул Crystal Reports, не содержащее пробелов и не начинающееся с цифры или какого- либо специального символа. DateVar Range Array CompanyHolidays := [DateValue("1/1/2003") to DateValue("1/2/2003") , DateValue("2/17/2003"),DateValue("5/26/2003") , DateValue("7/4/2003"),DateValue("9/1/2003") , DateValue("11/27/2003") to DateValue("11/28/2003") , DateValue("12/25/2003") to DateValue("12/31/2003") ] ; If {Salary.WorkDate} In CompanyHolidays Then "Bonus Pay Required" объявляет массив диапазонов дат и присваивает ей значения отдельных дат и диапазонов дат, принятых в компании праздничных дней. Затем формула…

Объявляет числовую переменную, содержащую массив, массив диапазонов, диапазон или одиночное значение. NumberVar Array varname NumberVar Range Array varname NumberVar Range varname NumberVar varname varname — имя переменной, не совпадающее ни с одним ключевым словом формул Crystal Reports, не содержащее пробелов и не начинающееся с цифры или какого- либо специального символа. NumberVar SalesRepTotal; If {Sales.Amount} > {SalesRep.BonusLevel} Then SalesRepTotal := SalesRepTotal + {Sales.Amount} объявляет числовую переменную и сравнивает объем продаж с призовым уровнем. Если объем продажи больше призового уровня, формула увеличивает значение переменной на объем продажи. NumberVar SalesRepTotal := 0 в одном операторе формулы объявляет числовую переменную и присваивает ей нулевое…

Объявляет строковую переменную, содержащую массив, массив диапазонов, диапазон или одиночное значение. StringVar Array varname StringVar Range Array varname StringVar Range varname StringVar varname varname — имя переменной, не совпадающее ни с одним ключевым словом формул Crystal Reports, не содержащее пробелов и не начинающееся с цифры или какого- либо специального символа. StringVar ShippersUsed; If Not ({Orders. Ship Via} In ShippersUsed) Then ShippersUsed := ShippersUsed & {Orders.Ship Via} & ", " объявляет строковую переменную. Затем формула проверяет, содержит ли переменная значение поля базы данных грузоотправителей. Если нет, формула добавляет поле базы данных грузоотправителя к содержимому переменной, дописывая в конце строки запятую и…

Объявляет переменную времени, содержащую массив, массив диапазонов, диапазон или одиночное значение. TimeVar Array varname TimeVar Range Array varname TimeVar Range varname TimeVar varname varname — имя переменной, не совпадающее ни с одним ключевым словом формул Crystal Reports, не содержащее пробелов и не начинающееся с цифры или какого- либо специального символа. TimeVar Range WorkHours; If DayOfWeek({Sales.Date}) In 2 to 6 Then WorkHours := TimeValue("9:00 am”) To TimeValue("7:00 pm") Else WorkHours := TimeValue("10:00 am") To TimeValue("5:00 pm") ; "Время работы: " & Minimum(WorkHours) & " до " & Maximum(WorkHours) объявляет переменную диапазона времени. Затем формула сравнивает день продажи с днем недели и…