分析Oracle/Oracle Forms中多用途代码

核心提示： 建立一个警告消息库当然，你的消息库的复杂性和灵活性完全取决于你，分析Oracle/Oracle Forms中多用途代码(2)，假如你的(输出)消息是简单的，那么保持函数过程简单，那么这里也进行类型映射，不管这些，更准确的讲，保持函数过程的个数是最少的

建立一个警告消息库

当然，你的消息库的复杂性和灵活性完全取决于你。假如你的(输出)消息是简单的，那么保持函数过程简单。更准确的讲，保持函数过程的个数是最少的。只要两个简单的过程，ams和amn，就可以用来输出基于字符串和数值的消息了。

假如你需要让输出的文字内容根据运算的输出有所变化，比如DML语句的输出，那么你可能需要三个新的内置过程(插入、更新和删除运算各一个)。可能你想说明删除的类型或者原因。比如一个批处理作业的某一步是计算重复记录的个数。那么像“Records counted: 46” 这样的输出是足够有用的，但是在这种情况下，“Duplicates counted: 46”会显得更有效。因此，我们增加了2个新的内置过程。

这样，我们现在有了至少6个不同的过程。现在，管理性的问题应该比较明显了。我们寻找一些简单的，但是同时又是健壮的过程。至少有两种方式可以用于重新简化需要的功能。一种方法是让警告消息过程能够接收两个输入参数。另外一种方法，正是我准备介绍的，是把这些过程打包。

增加输入参数的个数

再说一遍，假如前面的简单方法可以满足了你的要求，那么就没必要继续深入了。创建有两个输入参数的过程，第一个参数是消息文字或者说基础，第二个参数可以是输出、位置、状态或者数值。如果你关注数据类型的转化，那么这两个输入参数的组合text/text和text/number都可以统一成text/text类型。你的确必须做这样的转换吗?不，但是为了和你已有的保持一致，如果你在别的地方做了类型映射，那么这里也进行类型映射。不管这些，下面的例子显示了第一种方法的灵活性。

CREATE OR REPLACE procedure am (msg1 varchar2, msg2 varchar2) as
begin
dbms_output.put_line(msg1||msg2);
end;
/