home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0000 - 0009 / ibm0000-0009 / ibm0003.tar / ibm0003 / ORACLE12.ZIP / IADTABLE.SQL < prev    next >
Encoding:
Text File  |  1987-04-22  |  3.0 KB  |  141 lines

  1. SYSTEM/MANAGER
  2. rem     IADTABLE.SQL
  3.  
  4. set termout on
  5. spool iadtables.lis
  6. rem drop table iapapp;
  7. rem drop table iapblk;
  8. rem drop table iapfld;
  9. rem drop table iaptrigger;
  10. rem drop table iapsqltxt;
  11. rem drop table iaptrg;
  12. rem drop table iapmap;
  13. rem drop table iapcomment;
  14. create table iapapp
  15. (
  16.    appid        number     not null,
  17.    appowner     char(30),
  18.    appname      char(30)   not null,
  19.    apptitle     char(80),
  20.    appwksize    number
  21. )
  22. /
  23. insert into iapapp values( 1, null, 'Next ID', null, null )
  24. /
  25. COMMIT
  26. create table iapblk
  27. (
  28.    blkappid   number       not null,
  29.    blkname    char(30)     not null,
  30.    blkdesc    char(60),
  31.    blkhide    char(1),
  32.    blkseq     number,
  33.    blkunqkey  char(1),
  34.    blkctrl    char(1),
  35.    blktowner  char(30),
  36.    blktname   char(30),
  37.    blknorec   number,
  38.    blknobuf   number,
  39.    blkblin    number,
  40.    blklnrc    number,
  41.    blkobysql  number
  42. )
  43. /
  44. create table iapfld
  45. (
  46.    fldappid   number       not null,
  47.    fldblk     char(30)     not null,
  48.    fldname    char(30)     not null,
  49.    fldseq     number,
  50.    fldtype    char(7),
  51.    fldlen     number,
  52.    flddlen    number,
  53.    fldqlen    number,
  54.    fldbtab    char(1),
  55.    fldkey     char(1),
  56.    fldckblk   char(30),
  57.    fldckfld   char(30),
  58.    flddflt    char(80),
  59.    flddisp    char(1),
  60.    fldpage    number,
  61.    fldline    number,
  62.    fldcol     number,
  63.    fldprompt  char(80),
  64.    fldprabov  char(1),
  65.    fldprrpt   char(1),
  66.    fldenter   char(1),
  67.    fldquery   char(1),
  68.    fldupdate  char(1),
  69.    fldupdnul  char(1),
  70.    fldmand    char(1),
  71.    fldfixed   char(1),
  72.    fldskip    char(1),
  73.    fldhide    char(1),
  74.    fldautohlp char(1),
  75.    fldupper   char(1),
  76.    fldlovt    char(61),
  77.    fldlovc    char(30),
  78.    fldlow     char(30),
  79.    fldhi      char(30),
  80.    fldhelp    char(80)
  81. )
  82. /
  83. create table iaptrigger
  84. (
  85.    trigappid  number       not null,
  86.    trigblk    char(30),
  87.    trigfld    char(30),
  88.    trigtype   char(30)     not null,
  89.    trigdesc   char(20),
  90.    trighide   char(1)
  91. )
  92. /
  93. create table iaptrg
  94. (
  95.    trgappid   number       not null,
  96.    trgblk     char(30),
  97.    trgfld     char(30),
  98.    trgtype    char(30),
  99.    trgseq     number,
  100.    trglabel   char(30),
  101.    trgsql     number,
  102.    trgcurs    char(1),
  103.    trgmve     char(1),
  104.    trginv     char(1),
  105.    trgroll    char(1),
  106.    trgslab    char(30),
  107.    trgflab    char(30),
  108.    trgmsg     char(80)
  109. )
  110. /
  111. create table iapsqltxt
  112. (
  113.    sqtappid   number       not null,
  114.    sqtno      number       not null,
  115.    sqtline    number,
  116.    sqttext    char(80)
  117. )
  118. /
  119. create table iapmap
  120. (
  121.    mapappid   number       not null,
  122.    mappage    number       not null,
  123.    mapline    number,
  124.    mapgrph    char(1),
  125.    maptext    char(132)
  126. )
  127. /
  128. create table iapcomment
  129. (
  130.    cmtappid   number       not null,
  131.    cmtblk     char(30),
  132.    cmtfld     char(30),
  133.    cmttrgtyp  char(30),
  134.    cmttrgseq  number,
  135.    cmtline    number,
  136.    cmttext    char(80)
  137. )
  138. /
  139. REM    Now you may start SETUPIAD
  140. EXIT
  141.