home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a522 / 19.ddi / IDXSTAT.SQL < prev    next >
Encoding:
Text File  |  1989-09-24  |  1.5 KB  |  62 lines
  1. Rem Copyright (c) 1989 by Oracle Corporation
  2. Rem  NAME
  3. Rem    IDXSTAT.SQL
  4. Rem  FUNCTION
  5. Rem    See IDXSTAT.DOC
  6. Rem  NOTES
  7. Rem    1. All files need to be in the same directory.
  8. Rem    2. Needs to be modified for concatenated indexes.
  9. Rem    3. Requires SQLPLUS 3.0.3.1 or greater
  10. Rem  MODIFIED
  11. Rem   Porter    09/23/89 - Change filenames to 8 character lengths
  12. Rem   Porter    04/04/89 - Commenting, cleanup
  13. Rem   Porter    03/27/89 - Creation
  14. Rem
  15. Rem *** Set up variables ***
  16. Rem
  17. Set Heading Off
  18. Set Verify Off
  19. Set Feedback Off
  20. column table_name new_value index_table_name
  21. column column_name new_value index_column_name
  22. SELECT upper('&1') table_name, upper('&2') column_name FROM DUAL;
  23. Set Heading On
  24. Set Verify On
  25. Set Feedback On
  26.  
  27. SET ECHO OFF
  28. SET VERIFY OFF
  29. SET FEEDBACK OFF
  30. SET PAGESIZE 999
  31. SET HEADING OFF
  32. SPOOL IDXSTAT.TMP
  33. Column COL1 Format A16
  34. Column COL2 Format A31
  35. Column COL3 Format A31
  36. SELECT '@ONEIDXS' COL1, 
  37.        UIC.TABLE_NAME COL2, UIC.COLUMN_NAME COL3 
  38.   FROM USER_IND_COLUMNS UIC, 
  39.        USER_INDEXES UI 
  40.   WHERE UIC.INDEX_NAME=UI.INDEX_NAME AND
  41.         UI.UNIQUENESS != 'UNIQUE' AND
  42.         UIC.COLUMN_POSITION = 1 AND
  43.         UIC.TABLE_NAME LIKE '&INDEX_TABLE_NAME' AND
  44.         UIC.COLUMN_NAME LIKE '&INDEX_COLUMN_NAME';
  45. SPOOL OFF
  46. SET HEADING ON
  47. SET VERIFY ON
  48. SET FEEDBACK ON
  49.  
  50. Rem
  51. Rem Clean up
  52. Rem
  53. undefine 1
  54. undefine 2
  55. undefine index_table_name
  56. undefine index_column_name
  57.  
  58. Rem 
  59. Rem Now, run the file that we have created.
  60. Rem
  61. @IDXSTAT.TMP
  62.