COBOLのCOMP形式について

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

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

No.2 ベストアンサー 回答者： chukenkenkou 回答日時： 2007/06/22 16:23

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

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

この回答へのお礼

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

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

お礼日時：2007/06/23 00:27

No.4 回答者： Chiaki-F 回答日時： 2007/06/22 21:19

そうですね。

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

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

No.3 回答者： chukenkenkou 回答日時： 2007/06/22 16:30

>ＡＡＡ　ＰＩＣ　９（０５）は「Ｆ１Ｆ２Ｆ３Ｆ４Ｆ５」

>ではなく「３１３２３３３４３５」と入っていました

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

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

この回答へのお礼

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

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

お礼日時：2007/06/23 00:25

No.1 回答者： Chiaki-F 回答日時： 2007/06/22 00:49

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

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

この回答へのお礼

ありがとうございます。

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

お礼日時：2007/06/23 00:24