home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / w / wr06015.zip / WR06015.SPK / SQLUPIWI.BND (.txt) < prev    next >
DB2 Bind  |  1992-10-23  |  941b  |  18 lines
  1. SQLUPIWIJAiqSXKINULLID  0
  2. INCLUDE SQLCA
  3. BEGIN DECLARE SECTION
  4. END DECLARE SECTION
  5. DECLARE cindex CURSOR FOR               SELECT NAME, CREATOR, TBNAME, TBCREATOR, COLNAMES,               UNIQUERULE, COLCOUNT FROM SYSIBM.SYSINDEXES WHERE               TBNAME=:sqluei_table_name AND TBCREATOR=:sqluei_table_authid
  6. OPEN cindex
  7. FETCH cindex INTO :ai_name , :ai_creator ,                   :ai_tbname , :ai_tbcreator , :ai_colnames ,                   :ai_uniquerule , :ai_colcount 
  8. CLOSE cindex
  9. sqluei_table_name
  10. sqluei_table_authid
  11. ai_name
  12. ai_creator
  13. ai_tbname
  14. ai_tbcreator
  15. ai_colnames
  16. ai_uniquerule
  17. ai_colcount
  18.