rpgle中引用完整性的实现

rpgle编程中，也经常会碰到这样的问题，向B物理文件中添加数据的时候，一定要先检查A物理文件中是否有其相关数据的存在；

若不存在，则不允许添加，若存在于A中，则可以向B物理文件中添加数据。这种检查操作，叫做引用完整性。

引用完整性可理解为一个表中的数据依赖于另外一个表，也就是子表中的数据依赖于父表中的数据而存在。

下面是用rpgle去实现引用完整性的代码片段：

create table cdtd01(actype  char(3) not null,actno   char(4) not null,......,primary key (actype,actno))create table cdtd02(actype  char(3) not null ,actno   char(4) not null,......,constraint fk_actype_no foreign key(actype,actno) references cdtd01(actype,actno))

这样定义之后，上面在程序中做检查的事情，我们就交给数据库管理器去做了；

如果你想添加一条未做登记的数据，那么数据库将会给你返回一个错误码，这样岂不美哉！

更多DB2表的定义，参照：create table

--the end--