Google
オフコン練習帳内を検索
インターネット全体を検索

NECオフコン関連
オフコン一般
情報

[掲示板に戻る]


8 Re: ファイルの各種情報をファイルに出力したい
温泉好きのうさぎ 2011-5-10 1:04  [返信] [編集]

2バイトの2進数項目は、COMP-1
4バイトの2進数項目は、COMP-2
で定義します。

従って、レコード長やブロック長、キーブロック長、キー長、キー位置などはCOMP-1
アロケートサイズや二次アロケートサイズ、エクステントのアドレスはCOMP-2
となります。

お尋ねの有効レコード数は6バイトの2進数項目ですが、それを表現できるCOBOLの書き方はありません。
ただし、4バイトの2進数項目のとる値の範囲は約21億なので、常識的なデータ数を扱うのであれば前2バイトを無視するというのが最も手っ取り早いです。

正確に6バイトの2進数項目を表現しようとすれば、前2バイトをCOMP-1、後4バイトをCOMP-2と定義し、それぞれの値から計算することは可能ですが、マイナスの値となった場合は2の補数として換算しなければならず、少々複雑になります。

書き方としては、
01 FDF-REC.
  02 FILLER PIC X(44).
  02 RECCNT COMP-2.
  02 FILLER PIC X(208).
となります。
COMP-1項目およびCOMP-2項目にはPICTURE句を書きません。


ファイルの各種情報をファイルに出力し... ろろけい 2011-4-28 12:15
Re: ファイルの各種情報をファイルに出... 回転の達人 2011-4-28 12:40
Re: ファイルの各種情報をファイルに出... ろろけい 2011-4-28 13:36
Re: ファイルの各種情報をファイルに出... 温泉好きのうさぎ 2011-4-28 22:29
Re: ファイルの各種情報をファイルに出... 回転の達人 2011-4-29 22:15
Re: ファイルの各種情報をファイルに出... ろろけい 2011-5-9 14:31
Re: ファイルの各種情報をファイルに出... ろろけい 2011-5-9 17:18
Re: ファイルの各種情報をファイルに出... 温泉好きのうさぎ 2011-5-10 1:04 ←いまここ〜
Re: ファイルの各種情報をファイルに出... ろろけい 2011-5-10 10:42
Re: ファイルの各種情報をファイルに出... ろろけい 2013-3-6 10:08
Re: ファイルの各種情報をファイルに出... TOM 2013-3-6 11:57
Re: ファイルの各種情報をファイルに出... ろろけい 2013-3-6 14:39
Re: ファイルの各種情報をファイルに出... TOM 2013-3-8 17:25
Re: ファイルの各種情報をファイルに出... ろろけい 2013-3-8 19:06
BluesBB ©Sting_Band