oracle ebs系统二开,ORACLEERP开发基础之OracleForms基础(二)

FORMS变量类型

FORMS有提供多种变量，提供给PL/SQL使用，不同的变量，生存周期是不一致的。

1.项变量：只能在当前的确表单内引用。

语法：:blockname.itemname

2.全局变量：只能存储字符型数据，可以在当前会话的所有表单内引用。

语法：:global.name

例：可以when-new-form-instance中声明一个全局变量

Global.name:=‘this is a global‘;

然后在when-button-pressed中引用

Message(:Global.name);

3.参数(Parameter)：在Forms中直接创建一个参数。

语法：:Parameter.parameter1 := ?test‘;

另外：在EBS中，可以通过在注册功能时，给Parameter赋值。

4. 系统变量:这个是FORMS预定义的，直接使用即可

例：:SYSTEM.CURRENT_DATETIME

判断数据块的项是否为空

IF :BlockName.Item1 is null THEN

message(?Item1为空‘);

END IF;

这个和一般的编程语言使用字符串比较很不一致，但从PL/SQL的语句来看，却也是正常的。

信息提示框之基本用法

1、message Usage：message('提示信息');

Effect：在FORMS左下角会出现这个提示信息。

2、fnd_message用法大全 2.1 FND_Message.Debug

Usage:：fnd_message.debug('提示信息');

Effect:会直接弹出一个对话框，与vb中的msgbox("提示信息")类似。

2.2、fnd_message.question .

Usage: -----------------------------------------------------------------------------

declare

v_num number;

begin

FND_MESSAGE.SET_STRING('确要执行此操作吗?');

v_num := FND_MESSAGE.QUESTION('否', '是',NULL, 1,2); i

f v_num=2 then fnd_message.debug('选择了是');

elsif v_num=1 then fnd_message.debug('选择了否');

end if;

end;

Effect: Effect:会直接弹出一个选择框，与vb中的msgbox("提示信息",vbokcancel)类似。

2.3、FND_MESSAGE.show 这是一个Procedure，把信息以最基本的方式显示给用户，和FND_MESSAGE.DEBUG一样的效果。但分成了两步来写。

begin

fnd_message.set_string('show a string!);

fnd_message.show;

end;

2.4、FND_MESSAGE.hint 这是一个Procedure这种方式不会弹出对话框给用户，而是显示在左下脚的状态栏上面。

2.5、FND_MESSAGE.error 这是一个Procedure以Error信息的方式显示给用户