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

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

[掲示板に戻る]


Re:COBOL4⇔RDB ターラヤン 2007-5-22 0:43
Re:COBOL4⇔RDB おーちゃん 2007-5-22 18:44
Re:COBOL4⇔RDB 温泉好きのうさぎ 2007-5-24 19:44

2 Re:COBOL4⇔RDB
ターラヤン 2007-5-22 0:43  [返信] [編集]

的外れな回答かもしれませんが、



NECの「リレーショナル型データベース説明書」の

「第4章 RDBへの移行」を見てみてください。



A−VX RDBには、RDBを順編成や相対編成、索引順編成の

ようにアクセスする

機能があるので、(プログラムの作りにもよるかと思いますが)

基本的にほぼ修正なしでデータベースファイルにアクセスできるよう

になります。



それともCOBOL4でSQL文を使用したいということでしょうか。

3 Re:COBOL4⇔RDB
おーちゃん 2007-5-22 18:44  [返信] [編集]

ターラヤンさんありがとうございます。



現在COBOL85で利用していますが

昔のPGがCOBOL4コンパイル→今回そのPG上で新規にてRDBを追加して見ようとしてます。

そしてコンパイルをCOBOL4にて考えております。



実際COBOL4でのRDB使用がした事ありませんので



4 Re:COBOL4⇔RDB
温泉好きのうさぎ 2007-5-24 19:44  [返信] [編集]

私の読解力が無いのか、質問者様のやりたいことがいまいち理解できませんが、



(1) COBOLソースの修正を行う場合

 当然、コンパイルし直す必要がありますので、RDBファイルにアクセス可能なようにソースの記述を修正すればよいでしょう。

 ただ、1129、1136の文面から何でコンパイルされるのか判断できかねています。「CBL85」なのか、それともいわゆる「TモードCOBOL」をお持ちで、そのオプションパラメータのコンパイルモードをCOBOL4にして使用されるのか。

 後者であれば環境部で、

  SELECT ファイル名 ASSIGN 内部ファイル名-RDB

 と記述したら、FATALエラーになると思われます。



(2) COBOLソースの修正を行わない場合

 (2-1) コンパイルし直さない場合 (COBOL4で作成されていたLMをそのまま使う)

   ディスク上の従来ファイルと同じ名前で表定義を行い、物理ファイルのアロケートをする。従来ファイルはファイル名の変更またはディアロケートします。



 (2-2) CBL85でコンパイルし直す場合

   COBOL4独自のコーディングを行っている場合、CBL85でコンパイルすると、FATALエラーが発生する可能性があります。その場合はソースの修正が必要となり、(1) になります。

コンパイルが通った場合は、(2-1) になります。

   COBOL4独自のコーディングというのは、画面入出力で使う「DISPCRT」や「ACEPCRT」といった命令です。

BluesBB ©Sting_Band