home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 18 REXX / 18-REXX.zip / dbmplus.zip / USRRELS.DBM < prev   
Text File  |  1996-04-06  |  263b  |  7 lines

  1. create view usrrels
  2.    (creator, tbname, relation, rules, fkcolnames, pkcolnames) as
  3. select creator, tbname, substr(tbname||'->'||reftbname,1,28),
  4.        deleterule||updaterule,
  5.        substr(fkcolnames,2,20), substr(pkcolnames,2,20)
  6.   from sysibm.sysrels
  7.