home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0000 - 0009 / ibm0000-0009 / ibm0003.tar / ibm0003 / ORACLE12.ZIP / SETUPIAD.SQL < prev    next >
Encoding:
Text File  |  1987-06-30  |  2.4 KB  |  128 lines
  1. SYSTEM/MANAGER
  2. rem     SETUPIAD.SQL
  3.  
  4. set echo OFF
  5. set termout off
  6. drop public synonym iapapp
  7. /
  8. drop public synonym iapblk
  9. /
  10. drop public synonym iapfld
  11. /
  12. drop public synonym iapmap
  13. /
  14. drop public synonym iapsqltxt
  15. /
  16. drop public synonym iaptrg
  17. /
  18. drop public synonym iaptrigger
  19. /
  20. drop public synonym iapcomment
  21. /
  22. drop index iiapappnam
  23. /
  24. drop index iiapappid
  25. /
  26. drop index iiapblk
  27. /
  28. drop index iiapfld
  29. /
  30. drop index iiaptrg
  31. /
  32. drop index iiaptrigger
  33. /
  34. drop index iiapsqltxt
  35. /
  36. drop index iiapmap
  37. /
  38. drop index iiapcomment
  39. /
  40. set termout on
  41. spool setupiad.lis
  42. grant select, insert, update, delete
  43. on    system.iapapp
  44. to    public
  45. /
  46. grant select, insert, update, delete
  47. on    system.iapblk
  48. to    public
  49. /
  50. grant select, insert, update, delete
  51. on    system.iapfld
  52. to    public
  53. /
  54. grant select, insert, update, delete
  55. on    system.iapmap
  56. to    public
  57. /
  58. grant select, insert, update, delete
  59. on    system.iapsqltxt
  60. to    public
  61. /
  62. grant select, insert, update, delete
  63. on    system.iaptrg
  64. to    public
  65. /
  66. grant select, insert, update, delete
  67. on    system.iaptrigger
  68. to    public
  69. /
  70. grant select, insert, update, delete
  71. on    system.iapcomment
  72. to    public
  73. /
  74. create public synonym iapapp
  75. for    system.iapapp
  76. /
  77. create public synonym iapblk
  78. for    system.iapblk
  79. /
  80. create public synonym iapfld
  81. for    system.iapfld
  82. /
  83. create public synonym iapmap
  84. for    system.iapmap
  85. /
  86. create public synonym iapsqltxt
  87. for    system.iapsqltxt
  88. /
  89. create public synonym iaptrg
  90. for    system.iaptrg
  91. /
  92. create public synonym iaptrigger
  93. for    system.iaptrigger
  94. /
  95. create public synonym iapcomment
  96. for    system.iapcomment
  97. /
  98. create unique index iiapappnam
  99. on iapapp(appowner,appname)
  100. /
  101. create unique index iiapappid
  102. on iapapp(appid)
  103. /
  104. create unique index iiapblk
  105. on iapblk(blkappid,blkname)
  106. /
  107. create unique index iiapfld
  108. on iapfld(fldappid,fldblk,fldname)
  109. /
  110. create unique index iiaptrg
  111. on iaptrg(trgappid,trgblk,trgfld,trgtype,trgseq)
  112. /
  113. create unique index iiaptrigger
  114. on iaptrigger(trigappid,trigblk,trigfld,trigtype)
  115. /
  116. create unique index iiapsqltxt
  117. on iapsqltxt(sqtappid,sqtno,sqtline)
  118. /
  119. create unique index iiapmap
  120. on iapmap(mapappid,mappage,mapline,mapgrph)
  121. /
  122. create unique index iiapcomment
  123. on iapcomment(cmtappid,cmtblk,cmtfld,cmttrgtyp,cmttrgseq,cmtline)
  124. /
  125. set termout on
  126. prompt You may look at and then ERASE IADTABLE.LIS and SETUPIAD.LIS files.
  127. exit
  128.