COBOLのCOMP形式について

質問

久しぶりにＣＯＢＯＬ開発をする事になり、
懐かしく思ってＰＧを解析しているとどうしても
思い出せないものがありました。　
ＣＯＭＰ形式です。
ＡＡＡ　ＰＩＣ　９（０５）
　 　　　５バイトで１２３４５ならば「Ｆ１Ｆ２Ｆ３Ｆ４Ｆ５」
ＢＢＢ　ＰＩＣ　９（０５）ＣＯＭＰ－３
　　　　　３バイトで１２３４５ならば「１２３４５Ｆ」
ＣＣＣ　ＰＩＣ　９（０５）ＣＯＭＰ
　　　　　この場合は何バイトになるのでしょうか？
　　　　　及び、１２３４５の場合、どのようになるのでしょうか？

以上、初歩的な部分ですが皆様よりご教授頂きたいと思います。
よろしくお願いします。

回答No.2

chukenkenkou · ベストアンサー

メーカーやOSによって違うのではないでしょうか？

メインフレームの日立であれば、
PIC S9(n) COMP
の場合、n=1～4は2バイト、n=5～9は以上は4バイト、10～18は8バイトの2進数になります。

お礼

補足情報ありがとうございます。

説明不足ですみません。
今回はPC-COBOLと富士通のＭシリーズが
対象で質問には富士通機を意識して書きました。

回答No.4

ちあき（@Chiaki-F）

そうですね。私の担当機種はオフコンの為回答したように入っていました。
質問者の方の環境がわからなければ両方回答してないと誤解を与えてしまいますので配慮が足りませんでした

ご迷惑をおかけして申し訳ございません

回答No.3

chukenkenkou

>ＡＡＡ　ＰＩＣ　９（０５）は「Ｆ１Ｆ２Ｆ３Ｆ４Ｆ５」
>ではなく「３１３２３３３４３５」と入っていました

IBM互換のメインフレームで使われているEBCDIC（またはEBCDIK）コードなら、前者になります。

JISコードを採用しているNEC、PC上のCOBOLなら後者になるのでは？

お礼

補足情報ありがとうございます。

説明不足ですみません。
今回はPC-COBOLと富士通のＭシリーズが
対象で質問には富士通機を意識して書きました。

回答No.1

ちあき（@Chiaki-F）

４バイトで「００００３０３９」（ＨＥＸ）と入って、負の数の場合は２の補数で入るはずです

ＡＡＡ　ＰＩＣ　９（０５）は「Ｆ１Ｆ２Ｆ３Ｆ４Ｆ５」ではなく「３１３２３３３４３５」と入っていました

お礼

ありがとうございます。

説明不足ですみません。
今回はPC-COBOLと富士通のＭシリーズが
対象で質問には富士通機を意識して書きました。