ファイルの各種情報をファイルに出力したい

7:Re: ファイルの各種情報をファイルに出力したい
ろろけい 05/09 17:18
すみません。

できると思ったけど、まだできてません…。

続けてお聞きしたいのですが。

16進で格納されている項目は、COBOLソース上、どう書けばよいのでしょうか?

たとえばSYS@FDFの「有効レコード数」の項目。
43桁目から6バイトが 
00 00 00 00 1D 3E
となっている場合、このファイルを#MAPで見ると、10進で7486と表示されますよね。

これを、COBOLで実現させたいわけです。

仮にこの部分だけを取り出すためのレコードレイアウト(256バイト/Rec)を作るとして、
その場合、下記のような感じでよいかと思ったのですが、
アンダーバーの部分に書くべき数値やキーワードが、わからないのです。

FD FDF-FILE
(中略)
01 FDF-REC.
  02 FILLER PIC X(42).
  02 RECCNT PIC 9(__) USAGE __________.
  02 FILLER PIC X(208).

そもそも、上記の考え方であっているのかどうかも、あまり自信がないのですが…(>_<)

どうかもう少しお付き合いいただけると幸いです。

よろしくお願いいたします。


1-

BluesBB ©Sting_Band