home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #31 / NN_1992_31.iso / spool / comp / database / ingres / 2137 < prev    next >
Encoding:
Internet Message Format  |  1992-12-22  |  5.1 KB
  1. Path: sparky!uunet!murphy!dwrsun4!perl
  2. From: perl@dwrsun4.UUCP (Robert Perlberg)
  3. Newsgroups: comp.databases.ingres
  4. Subject: Re: Question on INgres and Openwin
  5. Message-ID: <2968@perl-sun.dwrsun4.UUCP>
  6. Date: 22 Dec 92 22:14:25 GMT
  7. References: <1992Dec8.200034.29151@advtech.uswest.com> <1992Dec9.194830.15379@acuson.com>
  8. Organization: Dean Witter Reynolds Inc., New York
  9. Lines: 188
  10.  
  11. While this might be overkill for some, I am very picky about such
  12. things, so I wrote my own termcap entries and mapping files and did
  13. some keyboard remapping to get it to work the way I wanted.
  14.  
  15. The following should be added to the $II_SYSTEM/ingres/files/termcap
  16. file:
  17.  
  18. ::: START :::
  19. s4|xterm-sun-t4|XTerm under OpenWindows on Sun with Type 4 keyboard:\
  20.     :wg=\E7\E[r\E[999;999H\E[6n\E8:wr=\E[%d;%dR:\
  21.     :bs:cd=\E[J:ce=\E[K:cl=\E[H\E[J:cm=\E[%i%d;%dH:nd=\E[C:\
  22.     :is=\E(B^O\E[?7h\E[?1l\E>:rv=\E[7m:bl=\E[7m:bo=\E[1m:us=\E[4m:ea=\E[m:\
  23.     :za=\E[1;4;7m:zb=\E[1;4m:zc=\E[1;7m:zd=\E[1;7m:ze=\E[4;7m:zf=\E[4;7m:\
  24.     :zg=\E[7m:zh=\E[1;4;7m:zi=\E[4;7m:zj=\E[1;7m:zk=\E[1;4;7m:ld=:\
  25.     :ls=\E)0^N:le=\E(B^O:qa=j:qb=k:qc=l:qd=m:qe=n:qf=q:qg=t:qh=u:qi=v:\
  26.     :qj=w:qk=x:kn#25:ky:k0=\E[224z:k1=\E[225z:k2=\E[226z:k3=\E[227z:\
  27.     :k4=\E[228z:k5=\E[229z:k6=\E[230z:k7=\E[231z:k8=\E[232z:k9=\E[233z:\
  28.     :kA=\E[234z:kB=\E[235z:kC=\E[208z:kD=\E[210z:kE=\E[211z:kF=\E[212z:\
  29.     :kG=\E[213z:kH=\E[214z:kI=\E[216z:kJ=\E[218z:kK=\E[220z:kL=\E[222z:\
  30.     :kM=\E[2z:kN=\E[249z:kO=\E[250z:\
  31.     :ku=\E[A:kd=\E[B:kl=\E[D:kr=\E[C:do=\E[B:sr=\EM:\
  32.     :cs=\E[%d;%dr:sf=\n:te=\E(B^O\E[?7h\E[?1l\E>:ti=\E(B^O\E[?7h\E[?1l\E>:\
  33.     :ke=\E(B^O\E[?7h\E[?1l\E>:ks=\E(B^O\E[?7h\E[?1l\E>:\
  34.     :mf=xterm-sun-t4.map:
  35. ::: END :::
  36.  
  37. Note that you have to set your TERM_INGRES to "xterm-sun-t4", or else
  38. change the name of the above termcap entry to whatever you like.
  39.  
  40. Put the following into a file called
  41. $II_SYSTEM/ingres/files/xterm-sun-t4.map:
  42.  
  43. ::: START :::
  44. /* DWR FRS Mapping file for xterm-sun-t4 */
  45.  
  46. /* Menu Key */
  47.     menu = pf13 (R1)
  48.  
  49.     nextfield = controlI (Tab)
  50.  
  51.     previousfield = controlP (^P)
  52.  
  53.     nextword = controlU (^U)
  54.  
  55.     previousword = controlR (^R)
  56.  
  57. /* Switch between insert and overstrike */    
  58.     mode = PF23 (Ins)
  59.  
  60.     redraw = controlW (^W)
  61.  
  62. /* Remove character under cursor */
  63.     deletechar = pf24 (Del)
  64.  
  65.     rubout = controlDEL (Delete)
  66.  
  67.     editor = controlV (^V)
  68.  
  69.     /* leftchar = */
  70.  
  71.     /* rightchar = */
  72.  
  73.     /* downline = */
  74.  
  75.     /* upline = */
  76.     controlK = off
  77.     controlJ = off
  78.  
  79.     newrow = controlN (^N)
  80.  
  81. /* Clear the field */
  82.     clear = controlB (^B)
  83.  
  84.     clearrest = controlX (^X)
  85.  
  86. /* Previous screen or set of rows in table field */
  87.     scrolldown = pf19 (PgUp)
  88.  
  89. /* Next screen or set of rows in table field */
  90.     scrollup = pf22 (PgDn)
  91.  
  92. /* Scroll page or form left */
  93.     scrollleft = controlL (^L)
  94.  
  95. /* Scroll page or form right */
  96.     scrollright = controlH (^H)
  97.  
  98.     duplicate = controlA (^A)
  99.  
  100. /* Print contents of current screen to file or printer */
  101.     printscreen = controlG (^G)
  102.  
  103.     nextitem = controlM (Return)
  104.  
  105. /* Select first menu item */
  106.     menuitem1 = pf1 (F1)
  107.  
  108. /* Select second menu item */
  109.     menuitem2 = pf2 (F2)
  110.  
  111. /* Select third menu item */
  112.     menuitem3 = pf3 (F3)
  113.  
  114. /* Select fourth menu item */
  115.     menuitem4 = pf4 (F4)
  116.  
  117. /* Select fifth menu item */
  118.     menuitem5 = pf5 (F5)
  119.  
  120. /* Select sixth menu item */
  121.     menuitem6 = pf6 (F6)
  122.  
  123. /* Select seventh menu item */
  124.     menuitem7 = pf7 (F7)
  125.  
  126. /* Select eighth menu item */
  127.     menuitem8 = pf8 (F8)
  128.  
  129. /* Select nineth menu item */
  130.     menuitem9 = pf9 (F9)
  131.  
  132. /* Help facility */
  133.     frskey1 = pf11 (F11)
  134.  
  135. /* Quit from program */
  136.     frskey2    = pf15 (R4)
  137.  
  138. /* End current screen and return to previous screen */
  139.     frskey3    = pf14 (R3)
  140.  
  141. /* Go or execute function */
  142.     frskey4 = pf25 (Enter)
  143.  
  144. /* toggle active flag or Put cursor on top of form or table field */
  145.     frskey5 = pf18 (Home)
  146.  
  147. /* Put cursor on bottom of form or table field */
  148.     frskey6    = pf21 (End)
  149.  
  150. /* Find next occurrence of string in this column of table field */
  151.     frskey7    = pf10 (F10)
  152.  
  153. /* Save Function */
  154.     frskey8 = pf16 (R5)
  155.  
  156. /* Undo and Forget Function */
  157.     frskey9 = pf17 (R6)
  158.  
  159. /* Bring up List Choices */
  160.     frskey10 = pf12 (F12)
  161. ::: END :::
  162.  
  163. The following needs to be added to the file
  164. $OPENWINHOME/lib/XKeysymDB:
  165.  
  166. ::: START :::
  167. KP_Del:                FFFE
  168. ::: END :::
  169.  
  170. You may have to restart OpenWindows for that to take effect.
  171.  
  172. Finally, invoke xterm with the following command (I have this in a
  173. shell script, of course):
  174.  
  175. xterm -sf -xrm \
  176.     'XTerm*VT100.Translations: #override \
  177.         <Key>L6:select-set(CLIPBOARD)\n\
  178.         <Key>L8:insert-selection(CLIPBOARD) \n\
  179.         <Key>SunXK_F36: string(0x1b) string("[234z") \n\
  180.         <Key>SunXK_F37: string(0x1b) string("[235z") \n\
  181.         <Key>apXK_Read: string(0x1b) string("[234z") \n\
  182.         <Key>apXK_Edit: string(0x1b) string("[235z") \n\
  183.         <Key>KP_Del: string(0x1b) string("[249z") \n\
  184.         <Key>KP_Enter: string(0x1b) string("[250z")'
  185.  
  186. Note that this is all under OpenWindows 3.0 under SunOS 4.1.2 with at
  187. Type-4 keyboard.  I can't vouch for any other configurations.
  188.  
  189. BTW, does Ingres have any intentions of fixing wview to work under
  190. OpenWindows, or is the problem in OpenWindows, and if so, does Sun have
  191. any intention of fixing it?
  192.  
  193. Robert Perlberg
  194. Dean Witter Reynolds Inc., New York
  195. dwrsun4!perl@murphy.com -or- philabs!dwrsun4!perl
  196.  
  197. "We don't believe the software industry is ripping off the customer."
  198.     -- Ken Wasch, executive director of the Software Publishers Association
  199.