home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0000 - 0009 / ibm0000-0009 / ibm0003.tar / ibm0003 / ORACLE10.ZIP / 43DBIOS.SQL < prev    next >
Encoding:
Text File  |  1987-08-31  |  1.6 KB  |  38 lines
  1. set echo oFF
  2.  
  3. rem **********************************************************************
  4. rem Enter the master record for the CRT definition
  5. rem **********************************************************************
  6.  
  7. delete from crt where name='43DBIOS';
  8. insert into crt (name, type, base, lines, columns, msgl, modl, clearscreen,
  9.     cleareol, att3, att2_3, att1_2_3,
  10.     backspace, forespace, goto_cl, offset, clearline, tset, trset, att1,
  11.     att2, att1_2, att1_3, attoff, scrup, scrdn, graphon,
  12.     graphoff, cursorup, cursordown)
  13.  values ('43DBIOS', 'CHAR', 1, 43, 80, 42, 43, '\eC\eL\002',
  14.     '\eE', '\eL\204', '\eL\027', '\eL\027',
  15.     '\eB', '\eA', '\eK\y\x', 0, '\eE\eF', '\eQ', '\eR', '\eL\027',
  16.     '\eL\011', '\eL\107', '\eL\004', '\eL\002', '\eG', '\eH', NULL,
  17.     NULL, '\eU', '\eT')
  18. /
  19.  
  20. rem **********************************************************************
  21. rem Define the box-graphic characters
  22. rem **********************************************************************
  23.  
  24. delete from crtbox where crtname='43DBIOS';
  25. insert into crtbox values ('43DBIOS', 'Y', '│', '─', '┌', '┐', '└', '┘',
  26.     '├', '┤', '┬', '┴', '┼', '|', '-', '+', '+', '+', '+', '+', '+', '+',
  27.     '+', '+');
  28.  
  29. rem **********************************************************************
  30. rem Define the function keys
  31. rem **********************************************************************
  32.  
  33. DELETE FROM esc WHERE NAME='43DBIOS';
  34. insert into esc select prod_code, '43DBIOS', func, escseq, comments
  35.                   from esc
  36.                  where name='PCBIOS';
  37. commit
  38.