EBCDIC 関数

構文

EBCDIC (expression)

説明

EBCDIC 関数を使用すると、expression の各文字を ASCII 表記値から EBCDIC 表記値へ変換できます。EBCDIC 関数と ASCII 関数は補数演算を行います。ASCII コードで表現されないデータの結果は不定です。

expression が NULL 値として評価されると、EBCDIC 関数は正しく実行されずプログラムはランタイム・エラー・メッセージを出力して終了します。

X = 'ABC 123'
Y = EBCDIC(X)
PRINT "ASCII", "EBCDIC", " X "
PRINT "------", "-----", "---"
FOR I = 1 TO LEN (X)
PRINT SEQ(X[I,1]) , SEQ(Y[I,1]),X[I,1]
NEXT I

次のプログラム出力が得られます。

ASCII     EBCDIC   X
------    -----    ---
65        193      A
66        194      B
67        195      C
32        64
49        241      1
50        242      2
51        243      3

変換表

以下の表には、EBCDIC BASIC 関数で使用される変換情報をリストしてあります。

ASCII EBCDIC ASCII EBCDIC ASCII EBCDIC ASCII EBCDIC
00 00 40 7C 80 04 C0 75
01 01 41 C1 81 06 C1 76
02 02 42 C2 82 08 C2 77
03 03 43 C3 83 09 C3 78
04 37 44 C4 84 0A C4 8A
05 2D 45 C5 85 13 C5 8B
06 2E 46 C6 86 14 C6 8C
07 2F 47 C7 87 15 C7 8D
08 16 48 C8 88 17 C8 8E
09 05 49 C9 89 1A C9 8F
0A 25 4A D1 8A 1B CA 9A
0B 0B 4B D2 8B 20 CB 9B
0C 0C 4C D3 8C 21 CC 9C
0D 0D 4D D4 8D 22 CD 9D
0E 0E 4E D5 8E 23 CE 9E
0F 0F 4F D6 8F 24 CF 9F
10 10 50 D7 90 28 D0 A0
11 11 51 D8 91 29 D1 AA
12 12 52 D9 92 2A D2 AB
13 3A 53 E2 93 2B D3 AC
14 3C 54 E3 94 2C D4 AD
15 3D 55 E4 95 30 D5 AE
16 32 56 E5 96 31 D6 AF
17 26 57 E6 97 33 D7 B0
18 18 58 E7 98 34 D8 B1
19 19 59 E8 99 35 D9 B2
1A 3F 5A E9 9A 36 DA B3
1B 27 5B 80 9B 38 DB B4
1C 1C 5C E0 9C 39 DC B5
1D 1D 5D 90 9D 3B DD B6
1E 1E 5E 5F 9E 3E DE B7
1F 1F 5F 6D 9F 41 DF B8
20 40 60 79 A0 42 E0 B9
21 5A 61 81 A1 43 E1 BA
22 7F 62 82 A2 44 E2 BB
23 7B 63 83 A3 45 E3 BC
24 5B 64 84 A4 46 E4 BD
25 6C 65 85 A5 47 E5 BE
26 50 66 86 A6 48 E6 BF
27 7D 67 87 A7 49 E7 CA
28 4D 68 88 A8 4A E8 CB
29 5D 69 89 A9 4F E9 CC
2A 5C 6A 91 AA 51 EA CD
2B 4E 6B 92 AB 52 EB CE
2C 6B 6C 93 AC 53 EC CF
2D 60 6D 94 AD 54 ED DA
2E 4B 6E 95 AE 55 EE DB
2F 61 6F 96 AF 56 EF DC
30 F0 70 97 B0 57 F0 DD
31 F1 71 98 B1 58 F1 DE
32 F2 72 99 B2 59 F2 DF
33 F3 73 A2 B3 62 F3 E1
34 F4 74 A3 B4 63 F4 EA
35 F5 75 A4 B5 64 F5 EB
36 F6 76 A5 B6 65 F6 EC
37 F7 77 A6 B7 66 F7 ED
38 F8 78 A7 B8 67 F8 EE
39 F9 79 A8 B9 68 F9 EF
3A 7A 7A A9 BA 69 FA FA
3B 5E 7B C0 BB 70 FB FB
3C 4C 7C 6A BC 71 FC FC
3D 7E 7D D0 BD 72 FD FD
3E 6E 7E A1 BE 73 FE FE
3F 6F 7F 07 BF 74 FF FF