Crystal Reports基本语法

 

在Crystal Reports中支持两种语法，Crystal和Basic，本文只介绍Crystal语法。

Crystal语法是不区分大小写的。

1) 数据类型

在Crystal Reports中，支持七种简单数据类型

数字：1,-100

货币：$100.1，-$12或CCur(100.1)，CCur(-12)

字符串：“123”,“字符串”

布尔值：True，False

日期：CDate(“2/2/2009”)

时间：CTime(“10:20 am”)

日期时间：#10:20 am#，#2/2/2009#，#9 Aug 2009 1:30:15 pm#或CDateTime(“9 Aug 2009 1:30:15 pm”)

 

范围数据类型

从2到5（包括2和5）

2 To 5

 

从2到5（不包括2包括5）

2 _To 5

 

小于或等于5

UpTo 5

 

小于5的所有数字

 

UpTo_ 5

日期范围

#Jan 5,2009# To #Dec 12,2009#

 

数组类型

[1,2,3]

[”a”,”b”,”c”]

2) 变量作用域

局部变量:

局部变量只限于单个公式以及该公式的单个求值。也就是说，无法从其他公式访问某个公式中的局部变量值。

局部变量声命格式:

 Local + 类型名称（带有后缀 Var）+ 该变量名声明的

例子:Local StringVar x := "hello";

 

全局变量:

全局变量使用相同的内存块在整个主报表中存储一个值。除子报表中的公式外，该值随后可用于所有声明此变量的公式。

全局变量声命格式:

Global+类型名称（带有后缀 Var）+ 该变量名声明的

例子:Global StringVar y;

默认情况下，也可以省略创建全局变量的 Global 关键字。

 

共享变量:

共享变量使用相同的内存块，在整个主报表及其所有子报表中存储变量值。因而，共享变量甚至比全局变量更普遍。若要使用共享变量，请在主报表内的公式中声明它

共享变量声命格式:

Shared+类型名称（带有后缀 Var）+ 该变量名声明的

例子:Shared StringVar y;

3) 运算符

算术运算符用于组合数字、数值变量、数值字段和数值函数以得到另一个数字。

算术运算符是加 (+)、减 (-)、乘 (*)、除 (/)、整除 (")、百分比 (%)、求余 (Mod)、求反 (-) 和求幂 (^)。

下面是优先顺序从高到低排列的算术运算符：

求幂 (^)

求反 (-)

乘、除和百分比 (*, /, %)

整除 (")

求余 (Mod)

加和减 (+, -)

 

比较运算符通常用于比较控制结构中的条件（如 If 表达式）的操作数。

比较运算符有等于 (=)、不等于 (<>)、小于 (<)、小于或等于 (<=)、大于 (>) 和大于或等于 (>=)。

 

布尔运算符通常与比较运算符一起使用，生成控制结构的条件。

按照从优先级最高到最低的顺序，布尔运算符有：Not、And、Or、Xor、Eqv 和 Imp。

 

一般情况下，Crystal Reports 在公式中遇到空值字段时，会立即停止公式求值而不产生任何值。若要处理公式中的空字段值，则必须使用专门用于处理空字段值的特殊函数进行显式处理。这些函数包括：IsNull、PreviousIsNull 或 NextIsNull。

 

4) 控制结构

If 表达式是最有用的控制结构之一。它使您得以在条件为 true 时对一系列表达式求值，而在条件不为 true 时对其他一系列表达式求值。

例子:

If {Employee.Dept} = "Sales" Then

{Employee.Salary} * 0.06

Else

{Employee.Salary} * 0.04

 

Select 表达式与 If 表达式相似。然而，有时可以使用 Select 表达式编写更清楚且重复少的公式。下例对 {客户.传真} 字段求值，以确定区号是北京区号 (010) 还是其他地方：

例子:

Select {Customer.Fax}[1 To 3]

Case "010" :

"北京"

Default :

"其他";

 

For 循环使您能够对一系列表达式多次求值。这不同于 If 和 Select 表达式，在 If 和 Select 语句中，程序在对公式求值时几乎同时传递每个语句。

如果事先知道需要对语句求值的次数，最好使用 For 循环。

使用 For 循环

Local NumberVar strLen :=0;

Local NumberVar i;

Local NumberVar sum;

For i := 1 To 100 Do

(

sum := sum +1i

);

 

While ... Do 循环对条件求值，如果条件为 true，则对 Do 后面的表达式求值。

完成对表达式的求值后，再次对该条件求值，如果条件为 true，则再次对 Do 后面的表达式求值。

它不断重复该过程，直到条件为 false 时为止。

 

Do ... While 循环对任何表达式求值一次。

然后对条件求值，如果条件为 true，则再次对表达式求值。该过程持续进行，直到条件为 false 时为止。

5) 函数

在Crystal Reports中,系统提供了很多函数,有数学、汇总、财务、字符串、日期/时间、日期范围、数组、类型转换、编程快捷方式、求值时间、打印状态、文档属性和附加函数。还有一些函数是条件格式设置公式专用函数。