ＣＯＢＯＬでの可変長定義について

質問

ｕｎｉｘ環境下でＣＯＢＯＬ８５を使用しています。
あるデータを可変長でＷＲＩＴＥしていくのですが、
データにヘッダー情報みたいなものが付加されてしまい困っています。
ヘッダー情報を付加しないようにするにはどうすればいいのでしょうか？

定義：
　FD Ａファイル RECORD IS VARYING 1 TO 100 DEPENDING ON A-CNT.
　01 A-DATA PIC X(100).
とか
　FD Ａファイル RECORD IS VARYING IN SIZE DEPENDING ON A-CNT.
　01 A-DATA PIC X(100).
というパターンで試しています。

Ａファイルにaaaという３バイトデータをＷＲＩＴＥすると、
COBOL85020315020304・・・・・aaaというデータが出力されます。
あるコボラーに聞くと「定義がおかしいからでしょう」と言ってたのですが、
どうおかしいかは本人もわからないようです。

どうすればヘッダー情報（COBOL85020315020304・・・・・）がつかず、
可変長でＷＲＩＴＥできるのでしょうか？教えて下さい。

回答No.2

terra5

＞プログラマーとしての仕事範囲しか受けてないので、マシン名称はわかりません。

それは発注側の問題なのでなんとしても必要な情報をもらわないとだめでしょうね。

うちの会社で仕事を受ける場合は、その辺は必要な情報として必ず請求しますし，
なければその範囲でしかできませんと確認して作業してます。
必要な情報があるかどうかもわからない状態で来ることも多いし、実際不足している場合が多いので(^^;;

少なくてもターゲットマシンのコンパイラのマニュアルは必ず要求します。
ほとんどCですが、OSや実行環境依存の物が必ずありますし、
特殊な環境(Lynx,aix,pSOS+等)の場合も多々ありますので。
だいたい、unix環境といったって、いろいろありますし。

なんとかユーザーさんからターゲット環境のマニュアルを奪い取ってください。

「ヘッダ情報はCOBOLが勝手につけるから、
コンパイラのマニュアルを見ないと対応できん！」と。

お礼

ＳＥＬＥＣＴ～ＡＳＳＩＧＮ句の定義変更でなんとかヘッダー情報を外す事ができました。