[掲示板に戻る]

---

Re: x4: COBOL4って 江須扇 2004-3-4 3:40

Re: x4: COBOL4って 温泉好きのうさぎ 2004-3-4 13:53

Re: x4: COBOL4って まあぼー 2004-3-10 0:23

---

5	Re: x4: COBOL4って
	江須扇 2004-3-4 3:40  [返信] [編集] こんにちは、ＣＢＬ４さん 意味的にはそういうことですか。 私は実行時の日本語入力する為のソース記述方法を書きました。 ＣＢＬ４さんは開発時のソースに日本語が入らないというこですね。 前にも書きましたが、１９７８年にＩＴＯＳが発表されてから ＣＯＢＯＬ４→高級ＣＯＢＯＬ＝ＣＯＢＯＬ→ＣＯＢＯＬ８５ （「高級」はあくまでもＣＯＢＯＬ４に対して名称変更してＣＯＢＯＬになりました。） たしか、ＣＯＢＯＬでは日本語のソース記述は NX"467C" １６進表記 NH"ニホンゴ" ひらがな表記 NK"ニホンゴ" かたかな表記 がありました。ＣＯＢＯＬ４ではこれもなかったということですよね。 他に NI"ニホンゴ" 索引定数？ NC"日本語" 日本語表記 もありましが、ＮＣは＃ＴＥＤＩＴで日本語入力がサポートされてからと思います。 日本語入力が出来てからＸタイプ（１バイト文字）のエリアのＶＡＬＵＥ句にむりやり　"日本語" をいれてた人もいました。 ＣＯＢＯＬ４はシステム保守の為に必要としても ＯＳの種類とバージョンがわからないこの方法も可能かどうかわかりませんね。 > > COBOL4で日本語入力（ソース記述）はできますか？ > > できません。１６進コードで記述します。
6	Re: x4: COBOL4って
	温泉好きのうさぎ 2004-3-4 13:53  [返信] [編集] はじめまして。 ＣＯＢＯＬ４では、ＰＩＣ句の文字タイプとして　Ｎ　を使うことができません。　Ｘ　タイプで漢字を表現します。 具体的には、ＣＯＢＯＬでは、 ＰＩＣ　　Ｎ（２）　　ＶＡＬＵＥ　　ＮＣ”漢字” ＰＩＣ　　Ｎ（２）　　ＶＡＬＵＥ　　ＮＸ”３４４１３Ｂ７Ａ” というような書き方に対して、ＣＯＢＯＬ４では、 ＰＩＣ　　Ｘ（４）　　ＶＡＬＵＥ　　””Ｋ３４４１３Ｂ７Ａ”” というようになります。 定数の指定は、二重の引用符の後に漢字を示す「Ｋ」をつけ、４桁のＪＩＳコード１６進数で行います。 また、ワークステーションには１２０種類の簡易漢字を表示する機能があり、ＣＯＢＯＬ４でもこれを使用できますので、その場合は、例えば「伝票」という簡易漢字を表示するには、 ＰＩＣ　　Ｘ（４）　　ＶＡＬＵＥ　　””ＥＥ０００Ａ００”” とします。 なにぶんにも約２０年前の記憶で、かなりうろ覚えのため、間違っているかもしれません。
7	Re: x4: COBOL4って
	まあぼー 2004-3-10 0:23  [返信] [編集] みなさま、回答有り難うございます。大変助かりました。COBOL4を知らないCOBOL85世代の私には非常に参考になりました。