0

コマンド「vutil32.exe -i -kx pogl.dad」を発行して分析した後、フィールド セクションの構造を xfd ファイルに形成する際に問題が発生しています。以下に強調表示されているように、フィールド構造を形成する方法を誰かが助けてくれることを願っています。「pglc.dad」として知られる私のファイルのサンプルをアップロードしました。専門家のスキルから .xfd ファイルを作成する方法を誰かが教えてくれ、私を導いてくれることを願っています。ありがとう

vutil32.exe の結果

file size: 250880
record size (min/max): 121/1024 compressed(80%)
# of keys: 4
key size: 16:02 31:03 56:03 15
key offset: 0 0 0 1
duplicates okay: N N N N

block size: 512
blocks per granule: 1
tree height: 4/2/2.7
# of nodes: 200
# of deleted nodes: 1
total node space: 101800
node space used: 67463 (66%)
user count: 0

Key Dups Seg-1 Seg-2 Seg-3 Seg-4 Seg-5 Seg-6
(sz/of) (sz/of) (sz/of) (sz/of) (sz/of) (sz/of)

0 N 1/0 15/1
1 N 1/0 15/66 15/1
2 N 1/0 40/81 15/1
3 N 15/1

Here is my further construction of .xfd file.
XFD,02,PGLC,PGLC
00300,00041,004
1,0,013,00000
01
PGSTAT
3,0,004,00004,020,00021,004,00000
3
PGSTAT
PGDESC
PGLINE
3,0,004,00004,008,00013,004,00000
03
PGSTAT
PGDESC
PGLINE
1,0,012,00021
01
PGSTAT
000
0150,00150,00003 =================>> How can i form this field section.
00000,00013,16,00016,+00,000,000,PGSTAT
00000,00001,16,00001,+00,000,000,PGDESC
00001,00015,16,00015,+00,000,000,PGLINE

ここに私の pglc.dad のリンクがあります: http://files.engineering.com/getfile.aspx?folder=080fdad6-b1d5-4a37-8dd0-b89f9a985c69&file=PGLC.DAD

適切な人に感謝します。

4

1 に答える 1

1

Perl と Cobol の両方でこのファイル形式のパーサーをいくつか書いたので、私は XFD 形式をよく知っています。

そうは言っても、ゼロから XFD ファイルを手作りしようとしないことを強くお勧めします。

AcuCobol (MicroFocus) コンパイラがあり、ファイルSELECTと定義のソースがある場合は、定義と定義FDのみを持つ非常に小さな Cobol プログラムを作成し、次のコマンドを使用してプログラムをコンパイルできます。SELECTFD

ccbl32.exe -Fx <program>

これにより、インデックス付きファイル定義の XFD ファイルが作成されます。-Fo <directory>オプションを使用して、作成された XFD ファイルのディレクトリを指定できることに注意してください。

ファイル定義のソースがない場合は、フィールドの内容と場所を推測することになります。索引付けされたファイル自体は、その情報を教えてくれません。ファイル内のデータを (オプションを使用してvutil -e) 抽出すると、ファイルにはテキストだけでなくバイナリ データも含まれていることがわかります。そのため、これらのフィールドが PICture であることが正確にわからないと (COMP-?)、構造を理解するのに苦労することになります。それらのフィールド。

于 2015-06-23T21:54:10.653 に答える