|
1:COBOL4って まあぼー 02/26 11:04 COBOL4で日本語入力（ソース記述）はできますか？ 2:Re: COBOL4って tahrayan 02/28 05:46 まあぼーさん、はじめまして。 COBOL4のソースに直接日本語入力できるか、という質問だと思いますが、 私は、普段はCOBOL85を使っている、（ANSI74用の）COBOLの修正ぐらいならしたことがある、 というレベルの人間なので、それより１つ前のCOBOLはわからないです。 かなり昔、別の人がちょっと違う感じのCOBOLコーディングしているソースの修正して いるのを見たことがあって、そのCOBOLは漢字が表示できていたような気がするので、 もしこの「ちょっと違うCOBOLコーディング」がCOBOL4なら、できるかもしれません。 もしかしたら、データ側に漢字が使えただけかもしれませんが。 私の話はあまり参考になくて、すみません。 でも、ここを見ている方で他にもっと詳しそうな方がいらっしゃるので、その方の回答を待ってみましょう。 もしかして、今もCOBOL4を使用しているのでしょうか？ それともマシンの置き換えか何かで、COBOL4のソースをVCか何かに変更するために、調査中とかですか。 P.S. サイトにオフコンの歴史とか書いている私が、一番知らないのかもしれないという気が、最近してきました。もうちょっとがんばってみます！ 3:Re: COBOL4って 江須扇 03/01 03:44 はじめまして江須扇と申します。 > COBOL4で日本語入力（ソース記述）はできますか？ 全くＣＯＢＯＬ４の資料がないので解りません。 ＣＯＢＯＬの資料にＩＴＯＳ ＣＯＢＯＬ４との比較に次の記述がありました。 「ＩＴＯＳ?４（Ｖ）ＣＯＢＯＬのＣＯＢＯＬ４モードでも、表示選択による日本語入力しかできない。」 逆に読めば表示選択はＣＯＢＯＬ４でもできると読めます。 ＡＣＥＰＣＲＴ （行，列） ＳＥＬＥＣＴ 一意名 とすれば良いようにも思います。 コンパイル時か＃ＬＢＭ等でステーションタイプをＫ２５にする必要はあると思います。 いつのバージョンかは解りませんが、当初のＩＴＯＳ（１９７８年）の時点では日本語はサポートされてないと思います。 あくまでもサポートされてからの話です。 また、ＩＴＯＳでも後半ではＣＯＢＯＬ４は画面でコンパイルのパラメータ入力も画面エラーになったような記憶があります。（ＪＣＬはＯＫ？） 上記は内容は私はアバウトＳＥですのですべて記憶です。 4:Re: COBOL4って ＣＢＬ４ 03/02 02:12 > COBOL4で日本語入力（ソース記述）はできますか？ できません。１６進コードで記述します。 5:Re: x4: COBOL4って 江須扇 03/04 03:40 こんにちは、ＣＢＬ４さん 意味的にはそういうことですか。 私は実行時の日本語入力する為のソース記述方法を書きました。 ＣＢＬ４さんは開発時のソースに日本語が入らないというこですね。 前にも書きましたが、１９７８年にＩＴＯＳが発表されてから ＣＯＢＯＬ４→高級ＣＯＢＯＬ＝ＣＯＢＯＬ→ＣＯＢＯＬ８５ （「高級」はあくまでもＣＯＢＯＬ４に対して名称変更してＣＯＢＯＬになりました。） たしか、ＣＯＢＯＬでは日本語のソース記述は NX"467C" １６進表記 NH"ニホンゴ" ひらがな表記 NK"ニホンゴ" かたかな表記 がありました。ＣＯＢＯＬ４ではこれもなかったということですよね。 他に NI"ニホンゴ" 索引定数？ NC"日本語" 日本語表記 もありましが、ＮＣは＃ＴＥＤＩＴで日本語入力がサポートされてからと思います。 日本語入力が出来てからＸタイプ（１バイト文字）のエリアのＶＡＬＵＥ句にむりやり "日本語" をいれてた人もいました。 ＣＯＢＯＬ４はシステム保守の為に必要としても ＯＳの種類とバージョンがわからないこの方法も可能かどうかわかりませんね。 > > COBOL4で日本語入力（ソース記述）はできますか？ > > できません。１６進コードで記述します。 6:Re: x4: COBOL4って 温泉好きのうさぎ 03/04 13:53 はじめまして。 ＣＯＢＯＬ４では、ＰＩＣ句の文字タイプとして Ｎ を使うことができません。 Ｘ タイプで漢字を表現します。 具体的には、ＣＯＢＯＬでは、 ＰＩＣ Ｎ（２） ＶＡＬＵＥ ＮＣ”漢字” ＰＩＣ Ｎ（２） ＶＡＬＵＥ ＮＸ”３４４１３Ｂ７Ａ” というような書き方に対して、ＣＯＢＯＬ４では、 ＰＩＣ Ｘ（４） ＶＡＬＵＥ ””Ｋ３４４１３Ｂ７Ａ”” というようになります。 定数の指定は、二重の引用符の後に漢字を示す「Ｋ」をつけ、４桁のＪＩＳコード１６進数で行います。 また、ワークステーションには１２０種類の簡易漢字を表示する機能があり、ＣＯＢＯＬ４でもこれを使用できますので、その場合は、例えば「伝票」という簡易漢字を表示するには、 ＰＩＣ Ｘ（４） ＶＡＬＵＥ ””ＥＥ０００Ａ００”” とします。 なにぶんにも約２０年前の記憶で、かなりうろ覚えのため、間違っているかもしれません。 7:Re: x4: COBOL4って まあぼー 03/10 00:23 みなさま、回答有り難うございます。大変助かりました。COBOL4を知らないCOBOL85世代の私には非常に参考になりました。 |