home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 8 Other / 08-Other.zip / 10ageout.zip / DFIDBUT.BND (.txt) < prev   
DB2 Bind  |  1993-08-19  |  795b  |  16 lines
  1. DFIDBUT yA8AKTIJUSERID  0
  2. BEGIN DECLARE SECTION
  3. END DECLARE SECTION
  4. UPDATE LANM.SYSTEM_PARAMETERS SET RESERVED1 = :hl1
  5. UPDATE LANM.SYSTEM_PARAMETERS SET RESERVED2 = :hl1
  6. UPDATE LANM.SYSTEM_PARAMETERS SET RESERVED3 = :hl1
  7. UPDATE LANM.SYSTEM_PARAMETERS SET RESERVED4 = :hl1
  8. COMMIT
  9. COMMIT
  10. BEGIN DECLARE SECTION
  11. END DECLARE SECTION
  12. SELECT COUNT(*) INTO :hlCount FROM SYSIBM.SYSINDEXES          WHERE TBCREATOR = :hachCreator AND                TBNAME = :hachTbName AND CLUSTERRATIO = 100
  13. hlCount
  14. hachCreator
  15. hachTbName
  16.