home *** CD-ROM | disk | FTP | other *** search
/ PC Treasures, Inc. / pctreasures.mdf / WINDOWS / adabas / f_0001 / env / termchar.ind < prev    next >
File List  |  1999-11-01  |  778b  |  27 lines
  1. DROP TERMCHAR SET IBM437_GER
  2. /* */
  3. CREATE TERMCHAR SET IBM437_GER AS ASCII ENABLE WITH
  4.    X'C4' TO X'8E' FOR 'A-umlaut',
  5.    X'E4' TO X'84' FOR 'a-umlaut',
  6.    X'D6' TO X'99' FOR 'O-umlaut',
  7.    X'F6' TO X'94' FOR 'o-umlaut',
  8.    X'DC' TO X'9A' FOR 'U-umlaut',
  9.    X'FC' TO X'81' FOR 'u-umlaut',
  10.    X'DF' TO X'E1' FOR 'sharp s',
  11.    X'A7' TO X'15' FOR 'paragrph'
  12. /* */
  13. IF $RC <> 0 THEN STOP (1)
  14. /* */
  15. DROP TERMCHAR SET USASCII_GER
  16. /* */
  17. CREATE TERMCHAR SET USASCII_GER AS ASCII ENABLE WITH
  18.    X'C4' TO X'5B' FOR 'A-umlaut',
  19.    X'E4' TO X'7B' FOR 'a-umlaut',
  20.    X'D6' TO X'5C' FOR 'O-umlaut',
  21.    X'F6' TO X'7C' FOR 'o-umlaut',
  22.    X'DC' TO X'5D' FOR 'U-umlaut',
  23.    X'FC' TO X'7D' FOR 'u-umlaut',
  24.    X'DF' TO X'7E' FOR 'sharp s'
  25. /* */
  26. IF $RC <> 0 THEN STOP (1)
  27.