...

PowerRDBconnector説明書 Oracle編 - ソフトウェア

by user

on
Category: Documents
324

views

Report

Comments

Transcript

PowerRDBconnector説明書 Oracle編 - ソフトウェア
PowerRDBconnector
サーバパッケージ for NetCOBOL V3.0 L10
PowerRDBconnector 説明書
Oracle 編
Windows
B1FW-5741-01Z0
2008 年 8 月
まえがき
製品の呼び名について
本書に記載されている製品の名称を、以下のように略して表記します。オペレーティング・システムを総称して、OS と記載します。デー
タベース製品を総称して、データベースと記載します。
・ 以下の製品を、「PowerRDBconnector」と記載します。
- PowerRDBconnector サーバパッケージ for NetCOBOL (本製品)
・ 以下の製品を、「Windows」または、「Windows 2000」と記載します。
- Microsoft(R) Windows(R) 2000 Professional operating system
- Microsoft(R) Windows(R) 2000 Server
- Microsoft(R) Windows(R) 2000 Advanced Server
・ 以下の製品を、「Windows」または、「Windows XP」と記載します。
- Microsoft(R) Windows(R) XP Professional operating system
・ 以下の製品を、「Windows」または、「Windows Vista」と記載します。
- Microsoft(R) Windows Vista(R) Business
- Microsoft(R) Windows Vista(R) Enterprise
- Microsoft(R) Windows Vista(R) Ultimate
・ 以下の製品を、「Windows」または、「Windows Server 2003」と記載します。
- Microsoft(R) Windows Server(R) 2003, Standard Edition
- Microsoft(R) Windows Server(R) 2003, Enterprise Edition
- Microsoft(R) Windows Server(R) 2003 R2, Standard Edition
- Microsoft(R) Windows Server(R) 2003 R2, Enterprise Edition
・ 以下の製品を、「Windows」または、「Windows Server 2003(x64)」と記載します。
- Microsoft(R) Windows Server(R) 2003, Standard x64 Edition
- Microsoft(R) Windows Server(R) 2003, Enterprise x64 Edition
- Microsoft(R) Windows Server(R) 2003 R2, Standard x64 Edition
- Microsoft(R) Windows Server(R) 2003 R2, Enterprise x64 Edition
・ 以下の製品を、「Windows」または、「Windows Server 2008」と記載します。
- Microsoft(R) Windows Server(R) 2008 Standard
- Microsoft(R) Windows Server(R) 2008 Enterprise
・ 以下の製品を、「Windows」または、「Windows Server 2008(x64)」と記載します。
- Microsoft(R) Windows Server(R) 2008 Standard (x64)
- Microsoft(R) Windows Server(R) 2008 Enterprise (x64)
・ 以下の製品を、「SQL Server」または、「SQL Server 2000」と記載します。
- Microsoft(R) SQL Server(R) 2000 Enterprise Edition
- Microsoft(R) SQL Server(R) 2000 Standard Edition
- Microsoft(R) SQL Server(R) 2000 Workgroup Edition
-i-
- Microsoft(R) SQL Server(R) 2000 Developer Edition
・ 以下の製品を、「SQL Server」または、「SQL Server 2005」と記載します。
- Microsoft(R) SQL Server(R) 2005 Workgroup Edition
- Microsoft(R) SQL Server(R) 2005 Standard Edition
- Microsoft(R) SQL Server(R) 2005 Enterprise Edition
- Microsoft(R) SQL Server(R) 2005 Developer Edition
- Microsoft(R) SQL Server(R) 2005 Standard Edition x64 Extended
- Microsoft(R) SQL Server(R) 2005 Enterprise Edition x64 Extended
- Microsoft(R) SQL Server(R) 2005 Developer Edition x64 Extended
・ 以下の製品を、「Oracle」または、「Oracle9i」と記載します。
- Oracle9i Database Enterprise Edition Release 2
- Oracle9i Database Standard Edition Release 2
- Oracle9i Database Standard Edition One Release 2
- Oracle9i Database Personal Edition Release 2
・ 以下の製品を、「Oracle」または、「Oracle10g」と記載します。
- Oracle Database 10g Enterprise Edition Release 1 / Release 2
- Oracle Database 10g Standard Edition Release 1 / Release 2
- Oracle Database 10g Standard Edition One Release 1 / Release 2
- Oracle Database 10g Personal Edition Release 1 / Release 2
・ 以下の製品を、「Oracle」または、「Oracle10g(x64)」と記載します。
- Oracle Database 10g Enterprise Edition Release 2 for Microsoft Windows (x64)
- Oracle Database 10g Standard Edition Release 2 for Microsoft Windows (x64)
・ 以下の製品を、「Oracle」または、「Oracle11g」と記載します。
- Oracle Database 11g Enterprise Edition
- Oracle Database 11g Standard Edition
- Oracle Database 11g Standard Edition One
- Oracle Database 11g Personal Edition
・ 以下の製品を、「Oracle」または、「Oracle11g(x64)」と記載します。
- Oracle Database 11g Enterprise Edition for Microsoft Windows (x64)
- Oracle Database 11g Standard Edition for Microsoft Windows (x64)
・ 以下の製品を、「NetCOBOL」または、「NetCOBOL for Windows」と記載します。
- NetCOBOL Base Edition for Windows V7.0
- NetCOBOL Standard Edition for Windows V7.0
- NetCOBOL Professional Edition for Windows V7.0
- NetCOBOL Base Edition 開発パッケージ for Windows V7.2/V8.0
- NetCOBOL Standard Edition 開発パッケージ for Windows V7.2/V8.0
- NetCOBOL Professional Edition 開発パッケージ for Windows V7.2/V8.0
- NetCOBOL Base Edition サーバ運用パッケージ for Windows V7.0/V7.2/V8.0
- ii -
- NetCOBOL Standard Edition サーバ運用パッケージ for Windows V7.0/V7.2/V8.0
- NetCOBOL Base Edition 開発パッケージ V9.0/V10.0.0(注)
- NetCOBOL Standard Edition 開発パッケージ V9.0/V10.0.0(注)
- NetCOBOL Professional Edition 開発パッケージ V9.0/V10.0.0(注)
- NetCOBOL Base Edition サーバ運用パッケージ V9.0/V10.0.0(注)
- NetCOBOL Standard Edition サーバ運用パッケージ V9.0/V10.0.0(注)
・ 以下の製品を、「NetCOBOL」または、「NetCOBOL for .NET」と記載します。
- NetCOBOL Base Edition for .NET V2.0
- NetCOBOL Standard Edition for .NET V2.0
- NetCOBOL Base Edition 開発パッケージ for .NET V2.1/V3.0/V3.1
- NetCOBOL Standard Edition 開発パッケージ for .NET V2.1/V3.0/V3.1
- NetCOBOL Base Edition サーバ運用パッケージ for .NET V2.0/V2.1/V3.0/V3.1
- NetCOBOL Standard Edition サーバ運用パッケージ for .NET V2.0/V2.1/V3.0/V3.1
- NetCOBOL Enterprise Edition 開発パッケージ for .NET V3.0/V3.1
- NetCOBOL Enterprise Edition サーバ運用パッケージ for .NET V3.0/V3.1
(注)
製品名に、for Windows と付いていませんが、「NetCOBOL for .NET」と区別するときに、本書では、「NetCOBOL for Windows」と
略して表記します。
PowerRDBconnector 説明書の体系
PowerRDBconnector 説明書は、以下の 2 冊から構成されています。
・ 「PowerRDBconnector 説明書 SQL Server 編」
・ 「PowerRDBconnector 説明書 Oracle 編」
なお、PowerRDBconnector サーバパッケージ for NetCOBOL と、PowerRDBconnector クライアントパッケージ for NetCOBOL は、別
マニュアルです。
本書は、以下について説明しています。
・ PowerRDBconnector サーバパッケージ for NetCOBOL
・ Oracle との接続
上記以外の接続の場合には、対応するマニュアルを参照してください。
本書の目的
本書は、PowerRDBconnector の製品概要および環境設定から運用管理について説明しています。
本書の読者
本書は、PowerRDBconnector の導入、環境設定および運用管理を行う方を対象としています。
本書を読むにあたり、以下の事項について熟知している必要があります。
・ NetCOBOL
- iii -
・ Oracle
・ Windows
本書の構成
本書は、以下の章で構成しています。
第 1 章 導入前に考慮すること
本製品を使用する際に考慮および配慮が必要なことを説明します。
PowerRDBconnector の導入を判断する前に、業務システムの機能範囲に適合するかを開発者が判断する上で、特に注意すべき観
点を確認するときにお読みください。
第 2 章 PowerRDBconnector とは
PowerRDBconnector の特長と機能について説明しています。
業務システムにおける本製品の機能の適用方法や範囲を明確化するためにお読みください。
第 3 章 PowerRDBconnector の使用手引き
PowerRDBconnector の環境設定と使用方法について説明しています。
PowerRDBconnector を使用し、業務アプリケーションの開発、保守を行うのに必要な作業方法を説明しています。
第 4 章 COBOL アプリケーションの開発について
本製品を使用する際の注意事項を説明しています。
業務アプリケーションの開発時に、他のシステムから COBOL アプリケーションを移行する場合に、特に注意すべきこと、および COBOL
アプリケーション開発時の注意事項を確認するときにお読みください。
第 5 章 エラー時の対処
PowerRDBconnector 使用時に発生したエラーの原因と対処、およびトレース機能について説明します。
エラーが発生したときにお読みください。
付録 A 他製品のファイル資源
他製品(ファイルシステム、データベース系)のファイル資源との関係、および代替方法について説明します。
開発者が、業務システムの機能・構成設計時に移行前のデータベース資産としてよく使用される論理ファイルとの違いについて確認
するときにお読みください。
付録 B トラブルシューティング
PowerRDBconnector の使用時に発生したトラブルの調査方法、およびトラブル事例について説明します。
トラブルが発生したときにお読みください。
付録 C 開発用サンプル情報
PowerRDBconnector を使用する上で役立つサンプル集です。
開発者およびシステム管理者が、業務アプリケーションを開発するときに、参考にしてください。
付録 D リリース情報
PowerRDBconnector のリリース情報について説明します。
- iv -
開発者およびシステム管理者が、前版との機能差を確認するときにお読みください。
本書の読み方
本書は、PowerRDBconnector の使用方法について記載しています。
・ NetCOBOL については、NetCOBOL のマニュアルを参照してください。
・ Oracle については、Oracle のマニュアルを参照してください。
製品の仕様について
PowerRDBconnector は、本書の記載範囲で検証しています。本書に記載していない PowerRDBconnector、オペレーティング・システ
ムやデータベースの機能については、PowerRDBconnector の動作保証ができません。このため、この機能を使用する場合には、自己
責任で十分検証した上で使用してください。
商標について
・ Microsoft、Windows、Windows Vista、Windows NT、Windows Server、SQL Server またはその他のマイクロソフト製品の名称およ
び製品名は、米国 Microsoft Corporation の米国およびその他の国における登録商標または商標です。
・ Oracle またはその他の Oracle 製品の名称および製品名は、米国 Oracle Corporation の登録商標です。
・ その他、本書に記載されているシステム名、製品名などには、必ずしも商標表示(TM、R)を付記していません。
マニュアルの変更点について
本書は、以下のマニュアルを元に作成されています。
・ PowerRDBconnector クライアントパッケージ for NetCOBOL V2.0L20
PowerRDBconnector 説明書(Oracle 編)
・ PowerRDBconnector サーバパッケージ for NetCOBOL V2.0L10
PowerRDBconnector 説明書(Oracle 編)
前版のマニュアルからの主な追加、変更点は、以下のとおりです。
変更点
No
変更箇所
1
マニュアルの形式を富士通標準形式に変更しました。
全体
2
以下の OS をサポートしました。
2.3
・ Microsoft(R) Windows Vista(R) Business
・ Microsoft(R) Windows Vista(R) Enterprise
・ Microsoft(R) Windows Vista(R) Ultimate
・ Microsoft(R) Windows Server(R) 2008 Standard (注)
・ Microsoft(R) Windows Server(R) 2008 Enterprise (注)
・ Microsoft(R) Windows Server(R) 2008 Standard (x64) (注)
・ Microsoft(R) Windows Server(R) 2008 Enterprise (x64) (注)
(注) Windows Server 2008 のサポートについて
Windows Server 2008 上の PowerRDBconnector からアクセス可能なデータベースは、
SQL Server 2005 のみです。
3
以下のデータベースをサポートしました。
2.3
・ Oracle Database 11g Enterprise Edition
-v-
変更点
No
変更箇所
・ Oracle Database 11g Standard Edition
・ Oracle Database 11g Standard Edition One
・ Oracle Database 11g Personal Edition
・ Oracle Database 11g Enterprise Edition for Microsoft Windows (x64)
・ Oracle Database 11g Standard Edition for Microsoft Windows (x64)
4
以下の NetCOBOL をサポートしました。
2.3
・ NetCOBOL Base Edition 開発パッケージ for .NET V3.1
・ NetCOBOL Standard Edition 開発パッケージ for .NET V3.1
・ NetCOBOL Base Edition サーバ運用パッケージ for .NET V3.1
・ NetCOBOL Standard Edition サーバ運用パッケージ for .NET V3.1
・ NetCOBOL Enterprise Edition 開発パッケージ for .NET V3.1
・ NetCOBOL Enterprise Edition サーバ運用パッケージ for .NET V3.1
・ NetCOBOL Base Edition 開発パッケージ V9.0/V10.0.0
・ NetCOBOL Standard Edition 開発パッケージ V9.0/V10.0.0
・ NetCOBOL Professional Edition 開発パッケージ V9.0/V10.0.0
・ NetCOBOL Base Edition サーバ運用パッケージ V9.0/V10.0.0
・ NetCOBOL Standard Edition サーバ運用パッケージ V9.0/V10.0.0
5
COBOL 初期化ファイルの注意事項に以下を追加しました。
・ JIS2004 で追加された文字を指定するとエラーとなります。
6
JIS X 0213:2004 に対応した文字セット(JIS2004)の注意事項を追加しました。
3.1.3
3.1.5
3.1.3
3.1.4
3.1.5
4.1.2.7
7
指定可能な Oracle のキャラクターセットを追加しました。
3.1.2
3.1.3.2
4.1.2.7
8
NetCOBOL の RCS コンパイルオプション(UTF16)について記載しました。
3.1.6.1
9
UTF-8 で作成された PowerRDBconnector 動作環境ファイル、COBOL 初期化ファイルを
サポートしました。
3.1.4
マルチセッションプログラミングの場合、テーブルロック解除時のトランザクション取消し機
能の誤記を以下のように、修正しました。
3.5.3.2
10
3.1.5
・ 修正前
テーブルロック対象のファイルを全てクローズするまでの更新を取り消します。
・ 修正後
セッションを閉設するサブルーチン(COB_PRDB_END)を呼び出すまでの更新を取
り消します。
11
発生しないエラーコードを削除しました。
5.1.1.3
12
ErrorLog プロパティの注意事項に以下を追加しました。
3.1.4
・ 使用可能な文字についての注意事項
- vi -
変更点
No
変更箇所
・ 環境変数の注意事項
・ Windows Vista 上で使用するときの注意事項
13
データベースでエラーが発生した場合に出力されるイベントログの例を追加しました。
5.1.1.5
14
サポートする OS とデータベースの組合わせについて記載しました。
2.3.2.3
15
未サポートの運用形態について記載しました。
2.3.2.4
16
開発用サンプル情報に以下を追加しました。
付録 C
・ PowerRDBconnector 動作環境ファイルのサンプル
・ COBOL 初期化ファイルのサンプル
・ エントリ情報ファイルのサンプル
・ セッションサブルーチンのサンプル
・ 認証サブルーチンのサンプル
・ トランザクションサブルーチンのサンプル
17
unicode 使用時の注意事項を追加しました。
3.7.1
18
リリース情報を変更しました。
付録 D
高度な安全性が要求される用途への使用について
本製品は、一般事務用、パーソナル用、家庭用、通常の産業等の一般的用途を想定して開発・設計・製造されているものであり、原子
力施設における核反応制御、航空機自動飛行制御、航空交通管制、大量輸送システムにおける運行制御、生命維持のための医療
用機器、兵器システムにおけるミサイル発射制御など、極めて高度な安全性が要求され、仮に当該安全性が確保されない場合、直接
生命・身体に対する重大な危険性を伴う用途(以下「ハイセイフティ用途」という)に使用されるよう開発・設計・製造されたものではあり
ません。
お客さまは本製品を必要な安全性を確保する措置を施すことなくハイセイフティ用途に使用しないでください。 また、お客さまがハイ
セイフティ用途に本製品を使用したことにより発生する、お客様または第三者からのいかなる請求または損害賠償に対しても富士通株
式会社およびその関連会社は一切責任を負いかねます。
インターネットでの使用について
本製品はインターネットへのサービスを提供する用途を想定して設計・製造されておりません。 インターネットに接続しない環境(ロー
カルネットワークまたはイントラネット内)で使用するか、 インターネットに接続して使用する場合は、運用環境によりセキュリティ侵害対
策を構築した上でご使用ください。
2008 年 8 月
Copyright FUJITSU LIMITED 2003-2008
- vii -
目 次
第 1 章 導入前に考慮すること....................................................................................................................................................1
1.1 本製品を使用する前に.......................................................................................................................................................................1
1.2 本製品で実現できる性能....................................................................................................................................................................1
1.3 本製品で実現できる排他制御............................................................................................................................................................2
1.4 対象とする既存システム......................................................................................................................................................................2
1.5 データベース製品の使用における注意.............................................................................................................................................2
1.6 インターネットでの使用について........................................................................................................................................................2
第 2 章 PowerRDBconnector とは.............................................................................................................................................3
2.1 PowerRDBconnector の特長..............................................................................................................................................................3
2.1.1 入出力文でのデータベースアクセス...........................................................................................................................................3
2.1.2 2 種類のプログラミングスタイル...................................................................................................................................................3
2.1.2.1 シングルセッションプログラミング..........................................................................................................................................3
2.1.2.2 マルチセッションプログラミング.............................................................................................................................................4
2.1.3 既存 COBOL 資産の活用...........................................................................................................................................................5
2.1.4 データベースを活用したシステム構築........................................................................................................................................5
2.2 機能.....................................................................................................................................................................................................5
2.2.1 ファイルアクセス機能...................................................................................................................................................................5
2.2.1.1 ファイルアクセス機能............................................................................................................................................................6
2.2.1.2 COBOL アプリケーションから利用できる機能範囲.............................................................................................................6
2.2.1.3 参考:データベースの機能範囲...........................................................................................................................................9
2.2.2 プログラミングスタイル................................................................................................................................................................10
2.2.2.1 プロセスとスレッド................................................................................................................................................................10
2.2.2.2 シングルスレッド(プロセス)プログラムとマルチスレッドプログラム....................................................................................10
2.2.2.3 プログラミングスタイルとは..................................................................................................................................................10
2.2.2.4 シングルセッション...............................................................................................................................................................11
2.2.2.5 マルチセッション..................................................................................................................................................................11
2.2.3 認証機能....................................................................................................................................................................................12
2.2.4 トランザクション機能...................................................................................................................................................................12
2.2.5 排他制御....................................................................................................................................................................................12
2.3 システム構成.....................................................................................................................................................................................13
2.3.1 必要なソフトウェア......................................................................................................................................................................13
2.3.1.1 開発時のシステム構成........................................................................................................................................................13
2.3.1.2 運用時のシステム構成........................................................................................................................................................15
2.3.2 運用形態....................................................................................................................................................................................16
2.3.2.1 開発時の形態......................................................................................................................................................................16
2.3.2.2 運用時の形態......................................................................................................................................................................17
2.3.2.3 サポートする OS とデータベースの組合せ........................................................................................................................17
2.3.2.4 未サポートの運用形態........................................................................................................................................................19
第 3 章 PowerRDBconnector の使用手引き............................................................................................................................20
3.1 環境構築...........................................................................................................................................................................................20
3.1.1 PowerRDBconnector を構成する要素.......................................................................................................................................20
3.1.2 環境構築の手順.........................................................................................................................................................................21
3.1.3 データベースオブジェクトの作成...............................................................................................................................................23
3.1.3.1 データベースオブジェクトの作成手順................................................................................................................................23
3.1.3.2 データベースの作成...........................................................................................................................................................24
3.1.3.3 データベースにアクセスするための権限設定...................................................................................................................25
3.1.3.4 ファイルとテーブルまたはビューの対応.............................................................................................................................25
3.1.3.5 列定義の対応......................................................................................................................................................................26
3.1.3.6 OPEN_CURSORS の設定..................................................................................................................................................31
3.1.3.7 データベースに対する統計情報の収集............................................................................................................................31
3.1.4 PowerRDBconnector 動作環境ファイル....................................................................................................................................31
3.1.5 COBOL 初期化ファイル............................................................................................................................................................37
3.1.6 コンパイル方法...........................................................................................................................................................................40
- viii -
3.1.6.1 NetCOBOL for Windows でのコンパイル方法..................................................................................................................40
3.1.6.2 NetCOBOL for .NET でのコンパイル方法.........................................................................................................................42
3.2 セッションの制御方法........................................................................................................................................................................44
3.2.1 セッションの制御方法.................................................................................................................................................................44
3.2.2 セッションサブルーチンのインターフェース..............................................................................................................................45
3.2.2.1 セッション開設サブルーチンのインターフェース...............................................................................................................45
3.2.2.2 セッション閉設サブルーチンのインターフェース...............................................................................................................46
3.2.3 セッションの使用例.....................................................................................................................................................................47
3.3 認証...................................................................................................................................................................................................48
3.3.1 OS 認証の使用方法...................................................................................................................................................................49
3.3.2 データベース認証の使用方法(シングルセッション)................................................................................................................49
3.3.2.1 データベース認証の動作概要(シングルセッション).........................................................................................................49
3.3.2.2 認証情報登録サブルーチンのインターフェース(シングルセッション).............................................................................50
3.3.3 データベース認証の使用方法(マルチセッション)...................................................................................................................52
3.3.3.1 データベース認証の動作概要(マルチセッション)............................................................................................................52
3.3.3.2 認証情報登録サブルーチンのインターフェース(マルチセッション)................................................................................53
3.4 トランザクション..................................................................................................................................................................................55
3.4.1 トランザクション機能とは.............................................................................................................................................................55
3.4.2 トランザクションの使用方法(シングルセッション).....................................................................................................................55
3.4.2.1 トランザクションプログラム(シングルセッション).................................................................................................................55
3.4.2.2 トランザクション使用時の注意事項(シングルセッション)..................................................................................................56
3.4.2.3 トランザクションサブルーチンのインターフェース(シングルセッション)...........................................................................57
3.4.3 トランザクションの使用方法(マルチセッション)........................................................................................................................58
3.4.3.1 トランザクションプログラム(マルチセッション)....................................................................................................................58
3.4.3.2 トランザクション使用時の注意事項(マルチセッション).....................................................................................................60
3.4.3.3 トランザクションサブルーチンのインターフェース(マルチセッション)..............................................................................60
3.5 排他制御...........................................................................................................................................................................................61
3.5.1 排他制御の種類.........................................................................................................................................................................62
3.5.2 レコードロック機能......................................................................................................................................................................62
3.5.2.1 トランザクション未適用時のレコードロック..........................................................................................................................63
3.5.2.2 トランザクション適用時のレコードロック..............................................................................................................................64
3.5.2.3 レコードロックの獲得待合わせ...........................................................................................................................................64
3.5.3 テーブルロック機能....................................................................................................................................................................65
3.5.3.1 テーブルロック機能の使用方法.........................................................................................................................................65
3.5.3.2 テーブルロック解除時のトランザクション取消し機能.........................................................................................................66
3.5.4 チェックロック機能......................................................................................................................................................................67
3.6 タイムアウト機能.................................................................................................................................................................................67
3.6.1 レコードロック獲得の待合わせ..................................................................................................................................................68
3.6.2 処理完了待合わせ時間の設定.................................................................................................................................................68
3.6.3 高負荷な実行環境での Oracle の処理完了の待合わせ.........................................................................................................68
3.7 データ補正機能................................................................................................................................................................................68
3.7.1 後方空白補正............................................................................................................................................................................69
3.7.2 項目属性に違反するデータのチェックと補正...........................................................................................................................71
3.7.2.1 データチェック.....................................................................................................................................................................73
3.7.2.2 データ補正..........................................................................................................................................................................74
第 4 章 COBOL アプリケーションの開発について.....................................................................................................................77
4.1 開発のポイント...................................................................................................................................................................................77
4.1.1 環境設定のポイント....................................................................................................................................................................77
4.1.1.1 ファイル識別名について.....................................................................................................................................................77
4.1.1.2 データベースの照合順序について....................................................................................................................................77
4.1.2 データベース作成のポイント......................................................................................................................................................77
4.1.2.1 混在項目を使用する場合...................................................................................................................................................77
4.1.2.2 OCCURS 句、REDEFINES 句を使用する場合.................................................................................................................78
4.1.2.3 ビューについて....................................................................................................................................................................78
4.1.2.4 列の定義について..............................................................................................................................................................78
4.1.2.5 データベースで扱えないデータ値との整合性について...................................................................................................78
- ix -
4.1.2.6 インデックスの作成について...............................................................................................................................................79
4.1.2.7 文字コードについて............................................................................................................................................................79
4.1.2.8 ユーティリティを使用する場合............................................................................................................................................82
4.1.3 COBOL アプリケーション作成のポイント...................................................................................................................................82
4.1.3.1 トランザクションについて.....................................................................................................................................................83
4.1.3.2 テーブルロック機能について..............................................................................................................................................83
4.1.3.3 レコードロック機能について................................................................................................................................................83
4.1.3.4 OUTPUT モードのオープンについて................................................................................................................................83
4.1.3.5 レコードの削除方法について.............................................................................................................................................83
4.1.3.6 LOW-VALUE、HIGH-VALUE について..........................................................................................................................84
4.1.3.7 使用メモリ量について.........................................................................................................................................................84
4.1.3.8 マルチセッションプログラミングについて............................................................................................................................84
4.1.4 性能向上のポイント....................................................................................................................................................................85
4.1.4.1 インデックスの定義..............................................................................................................................................................85
4.1.4.2 データ更新時のトランザクション適用.................................................................................................................................85
4.1.4.3 履歴ファイルのディスク配置...............................................................................................................................................85
4.1.4.4 データベースに対する統計情報の収集............................................................................................................................86
4.1.4.5 NOLOGGING モードの使用選択......................................................................................................................................86
4.1.4.6 OUTPUT モードの OPEN 文での Truncate プロパティ.....................................................................................................87
4.1.4.7 データベース・ユーティリティの活用..................................................................................................................................87
4.1.4.8 I-O オープンでの READ 性能...........................................................................................................................................87
4.2 注意事項...........................................................................................................................................................................................88
4.2.1 トランザクションに関する注意事項............................................................................................................................................88
4.2.1.1 トランザクションの確定、取消しを実行せずに終了した場合.............................................................................................88
4.2.1.2 テーブルロック機能とトランザクションについて..................................................................................................................89
4.2.2 排他制御に関する注意事項.....................................................................................................................................................89
4.2.2.1 COBOL アプリケーションを終了した場合..........................................................................................................................89
4.2.2.2 削除したレコードの待合せについて..................................................................................................................................89
4.2.2.3 レコードロックの排他制御について....................................................................................................................................90
4.2.2.4 テーブルロックの排他制御について..................................................................................................................................92
4.2.2.5 デッドロック状態について...................................................................................................................................................94
4.2.2.6 テーブルロックとレコードロックの混在について.................................................................................................................94
4.2.3 COBOL アプリケーションに関する注意事項............................................................................................................................95
4.2.3.1 キーに重複した値がある索引ファイルについて................................................................................................................96
4.2.3.2 ビューの使用について........................................................................................................................................................96
4.2.3.3 レコードの格納位置について.............................................................................................................................................96
4.2.3.4 文字コード変換について....................................................................................................................................................96
4.2.3.5 OUTPUT モードのオープンの使用について....................................................................................................................96
4.2.3.6 読み取り一貫性に関する注意事項....................................................................................................................................97
4.2.4 マルチスレッド使用時の注意事項.............................................................................................................................................97
4.2.4.1 マルチスレッドプログラムについて.....................................................................................................................................97
4.2.4.2 スレッドとセッションの関係について...................................................................................................................................97
4.2.4.3 セッションとトランザクションの関係について......................................................................................................................99
4.2.5 リモートのデータベースアクセスに関する注意事項...............................................................................................................100
4.2.5.1 大量のレコードアクセスについて......................................................................................................................................100
4.2.5.2 セキュリティについて.........................................................................................................................................................100
第 5 章 エラー時の対処..........................................................................................................................................................102
5.1 エラー時の対処...............................................................................................................................................................................102
5.1.1 ファイルアクセス時のエラー情報.............................................................................................................................................103
5.1.1.1 ファイルアクセス時のイベントログ情報.............................................................................................................................103
5.1.1.2 イベントログに出力されないエラー情報...........................................................................................................................104
5.1.1.3 ファイルアクセス時のエラーコード一覧............................................................................................................................104
5.1.1.4 COBOL アプリケーション終了時のメッセージ一覧.........................................................................................................111
5.1.1.5 データベースのエラー発生時のイベントログ情報...........................................................................................................112
5.1.2 トランザクションアクセス時のエラー情報.................................................................................................................................113
5.1.2.1 トランザクションアクセス時のイベントログ情報.................................................................................................................113
-x-
5.1.2.2 トランザクションアクセス時のエラーコード一覧................................................................................................................114
5.1.3 認証情報登録サブルーチンのエラー情報.............................................................................................................................115
5.1.3.1 認証情報登録サブルーチンのイベントログ情報.............................................................................................................115
5.1.3.2 認証情報登録サブルーチンのエラーコード一覧............................................................................................................115
5.1.4 セッションサブルーチンのエラー情報.....................................................................................................................................116
5.1.4.1 セッションサブルーチンのイベントログ情報.....................................................................................................................116
5.1.4.2 セッションサブルーチンのエラーコード一覧....................................................................................................................117
5.2 トレース出力機能............................................................................................................................................................................117
5.2.1 トレース機能の使用方法..........................................................................................................................................................117
5.2.2 トレースの種類..........................................................................................................................................................................118
5.2.3 トレース情報の内容..................................................................................................................................................................118
5.2.3.1 トレース情報の形式...........................................................................................................................................................119
5.2.3.2 トレースの出力例...............................................................................................................................................................121
付録 A 他製品のファイル資源................................................................................................................................................127
A.1 論理ファイル...................................................................................................................................................................................127
付録 B トラブルシューティング................................................................................................................................................128
B.1 トラブルへの対処方法....................................................................................................................................................................128
B.2 事例.................................................................................................................................................................................................128
B.2.1 製品仕様について...................................................................................................................................................................128
B.2.2 トラブル事例.............................................................................................................................................................................130
B.2.3 性能..........................................................................................................................................................................................133
付録 C 開発用サンプル情報..................................................................................................................................................135
C.1 NetCOBOL for .NET のプログラム原型........................................................................................................................................135
C.1.1 XMROTSTR サブルーチン....................................................................................................................................................135
C.1.2 XMROTEND サブルーチン...................................................................................................................................................135
C.1.3 XMROTCNL サブルーチン....................................................................................................................................................136
C.1.4 XMROTRBK サブルーチン...................................................................................................................................................136
C.1.5 XMROAUTH サブルーチン...................................................................................................................................................137
C.2 マニュアル内で使用した図表に対するテキスト形式の雛型.........................................................................................................137
C.2.1 PowerRDBconnector 動作環境ファイルのサンプル..............................................................................................................137
C.2.2 COBOL 初期化ファイルのサンプル.......................................................................................................................................138
C.2.3 エントリ情報ファイルのサンプル..............................................................................................................................................138
C.2.4 セッションサブルーチンのサンプル........................................................................................................................................138
C.2.5 認証サブルーチンのサンプル................................................................................................................................................139
C.2.6 トランザクションサブルーチンのサンプル...............................................................................................................................140
付録 D リリース情報...............................................................................................................................................................142
D.1 リリース情報....................................................................................................................................................................................142
D.2 非互換について.............................................................................................................................................................................144
索引......................................................................................................................................................................................145
- xi -
第1章
導入前に考慮すること
本章では、本製品を使用する際に考慮および配慮することを説明します。
この製品をはじめてお使いになる方は、必ずお読みください。
1.1
本製品を使用する前に
本製品は、データベースをファイルシステムと同様に READ/WRITE 文でアクセスするためのものですが、ファイルシステム系製品の
機能互換を保証するものではありません。
本製品を使用する上で排他制御、データ構造、性能確保などの考慮が必要です。
例えば、ファイルアクセス系製品とは、データ値の扱いが異なります。データベースでは、文字データ型には文字のみ、数字データ型
には数値のみが格納可能です。一方、COBOL ではプログラミングの仕方で、数字データ型に文字が設定されることがあります。
このようなデータ操作はできないため、COBOL アプリケーションの修正が必要となります。
詳しくは、「第 3 章 PowerRDBconnector の使用手引き」および「第 4 章 COBOL アプリケーションの開発について」を参照してくださ
い。
1.2
本製品で実現できる性能
本製品は、データベース製品が提供する SQL アクセスインターフェースを使用して、COBOL アプリケーションの入出力文を処理しま
す。
そのため実現できる性能は、入出力文を直接サポートしているファイルシステム系製品に対して、入出力文で記述した COBOL アプリ
ケーションからアクセスした場合と同等の性能を保証するものではなく、入出力文の処理論理を変更せずに、SQL アクセスインター
フェースでアクセスした場合と同等となります。
一般的に、SQL アクセスインターフェースを持つデータベース製品は、以下の傾向があります。
・ アプリケーションで集合操作の処理を行うと、性能がよくなります。
・ アプリケーションで、カーソルを宣言し、1 レコードずつ処理すると、集合操作と比較してデータ件数に応じて性能が劣化します。
本製品では、COBOL のアクセス文に合わせ、カーソルを宣言し、1 レコードずつ処理しています。このため、本製品を使用したアプリ
ケーションの性能よりも、データベース製品へ直接 SQL 文でアクセスするアプリケーションの方が高性能となります。
データ検索では、COBOL の索引ファイルのレコードキーに対応するデータベースのインデックスが必要です。
データ更新を行うと、データベースではデータ保証のため、履歴管理されているトランザクションログファイルにも更新が行われます。
そのため、履歴管理されないファイルシステム系製品と同等の更新性能は得られません。
データ更新の性能を向上させるには、トランザクションを適用して、複数の更新データをまとめて確定するなどの方法があります。性能
向上については、「4.1.4 性能向上のポイント」を参照してください。
-1-
1.3
本製品で実現できる排他制御
データベースでは、排他制御の仕組みがファイルシステム系製品と大きく異なります。また、データベース製品によっても排他制御の
仕組みが異なります。
このため、使用するデータベースで実現している排他制御の理解が必要です。
本製品の排他制御について、詳しくは「3.5 排他制御」を参照してください。
1.4
対象とする既存システム
本製品は、既存システムの入出力文で記述した COBOL アプリケーションを、SQL 文を使用した COBOL アプリケーションに書き直さ
ずに、活用することを目的としたものです。
主に、以下の既存システムの入出力文で記述した COBOL アプリケーションを対象としています。
・ 中小規模のシステム
・ 既存システムの COBOL アプリケーションの活用
・ CSP/FX(FX-RDB)、ASP(RDB/6000、Symfoware6000)からの移行
1.5
データベース製品の使用における注意
データベース製品を使用するため、データベースを熟知した、高い技術力を持つ技術者が業務を設計してください。
1.6
インターネットでの使用について
本製品はインターネットへのサービスを提供する用途を想定して設計・製造されておりません。このため、以下の環境で使用してくださ
い。
・ インターネットに接続しない環境(ローカルネットワークまたはイントラネット内)
・ インターネットに接続して使用する場合は、VPN、ファイアーウォールなど運用環境によりセキュリティ侵害対策を構築した環境
-2-
第2章
PowerRDBconnector とは
本章では、PowerRDBconnector の機能について説明します。
開発者およびシステム管理者が、業務システムを設計するときに、本製品の機能範囲を理解するためにお読みください。
2.1
PowerRDBconnector の特長
本製品は、データベースをファイルシステムと同様に READ/WRITE 文でアクセスするためのものです。
ここでは、PowerRDBconnector の特長を説明します。
2.1.1
入出力文でのデータベースアクセス
PowerRDBconnector は、COBOL アプリケーションの OPEN、START、READ、REWRITE、WRITE、DELETE、CLOSE といった入出
力文で、一般の順ファイルや索引ファイルと同様に、データベースのテーブルまたはビューにアクセスできます。
図 2.1 入出力文でのデータベースアクセス
2.1.2
2 種類のプログラミングスタイル
本製品は、以下の 2 つのプログラミングスタイルが可能です。
・ シングルセッションプログラミング
・ マルチセッションプログラミング
セッションは、「認証、排他制御、トランザクション制御を行う単位」のことです。
2.1.2.1
シングルセッションプログラミング
コンソールアプリケーションや、バッチアプリケーションなどのように、1 プロセス上で 1 つのユーザーアプリケーションを動作させるプロ
グラミングスタイルです。
-3-
シングルセッションプログラミングの場合、COBOL アプリケーションと PowerRDBconnector の間には、暗黙のセッションが1つあるもの
とみなされ、データベースとのセッションも、プロセス上に1つだけ開設されます。
図 2.2 シングルセッションプログラミングの概要
シングルセッションプログラミングとは、PowerRDBconnector V1.0 からサポートされているプログラミングスタイルのことです。
シングルセッションプログラミングの利点については、「表 2.4 プログラミングスタイルごとの利点について」を参照してください。
2.1.2.2
マルチセッションプログラミング
マルチスレッドで動作する Web アプリケーションのように、1 プロセス上でユーザーアプリケーションを複数動作させるため、アプリケー
ションでセッションの制御を行うプログラミングスタイルです。
マルチセッションプログラミングの場合、PowerRDBconnector のセッションと、データベースのセッションは、1対1に対応付けられます。
図 2.3 マルチセッションプログラミングの概要
マルチセッションプログラミングの利点については、「表 2.4 プログラミングスタイルごとの利点について」を参照してください。
-4-
2.1.3
既存 COBOL 資産の活用
入出力文で記述した従来の COBOL アプリケーションを、SQL 文による記述に設計変更せずに、データベース(テーブル、ビュー)に
アクセスできるため、従来の COBOL アプリケーションのソースコードや開発スキルを活用できます。
例えば、ファイルシステムのデータをデータベースに移行し、入出力文で記述した COBOL アプリケーションを活用して、データベー
スにアクセスすることができます。
図 2.4 既存 COBOL 資産の活用
なお、COBOL アプリケーションのプログラミングで考慮すべきポイントが、いくつかあります。詳しくは、「第 4 章 COBOL アプリケーショ
ンの開発について」を参照してください。
2.1.4
データベースを活用したシステム構築
データベースのバックアップ機能、リカバリ機能、クラスタシステムなどを活用して、一般のファイルシステムよりも堅牢性のある業務シス
テムを構築できます。
また、業務に合わせ、COBOL 以外の言語で作成したアプリケーションとデータベースを共有することができます。
2.2
機能
本節では、PowerRDBconnector の機能について説明します。
2.2.1
ファイルアクセス機能
COBOL アプリケーションからデータベースのテーブルまたはビューを、ファイル(順ファイル、索引ファイル)としてアクセスできます。
-5-
ファイルアクセス機能
2.2.1.1
以下にファイルアクセス機能を示します。
表 2.1 ファイルアクセス機能
編成
ORGANIZATION
アクセスモード
ACCESS MODE
データベースオブジェクト
SEQUENTIAL(順ファイル)
SEQUENTIAL(順呼出し)
テーブル、ビュー、シノニム
SEQUENTIAL(順呼出し)
INDEXED(索引ファイル)
RANDOM(乱呼出し)
テーブル、ビュー、インデックス、シ
ノニム
DYNAMIC(動的呼出し)
図 2.5 ファイルアクセス機能
ビューへのファイルアクセスには、テーブルへのアクセスと比較していくつかの制約があります。詳細は、「4.2.3.2 ビューの使用につい
て」を参照してください。
2.2.1.2
COBOL アプリケーションから利用できる機能範囲
PowerRDBconnector を使用してデータベースにアクセスするために使用できる COBOL の機能範囲を以下に示します。
表 2.2 COBOL アプリケーションの機能範囲
項目
ファイル
レコード
ファイル編成
レコード形式
利用可否
レコード順ファイル
○
相対ファイル
×:エラー(注 1)
索引ファイル
○
固定長レコード形式
○
可変長レコード形式
×:エラー
レコードの最大長(バイト数)
ファイル
管理記述項
SELECT 句
OPTIONAL 指定
-6-
32,760
×:無効(注 2)
項目
ASSIGN 句
利用可否
ファイル識別名指定
○
ファイル識別名定数指定
○
データ名指定
○
ファイル状態
○(注 4)
(注 3)
FILE STATUS 句
AUTOMATIC
LOCK MODE 句
EXCLUSIVE
×:無効(注 5)
MANUAL
RECORD KEY 句
ALTERNATE
RECORD KEY 句
レコード
キーの項目
文
プログラミング
トランザクション
セッション
○
指定できるキー項目の最大個数
(注 6)
英数字
○
日本語
○
符号なし外部 10 進数
○
符号付き外部 10 進数
○
符号なし内部 10 進数
○
符号付き内部 10 進数
○
符号なし 2 進数
○
符号付き 2 進数
○
キーの降順評価
×:指定不可
多重項目キー
○
OPEN 文
○
CLOSE 文
○
READ 文
○
WRITE 文
○
REWRITE 文
○
START 文
○
DELETE 文
○
シングルセッション
○
マルチセッション
○(注 7)
開始
○
確定
○
取消し
○
操作(注 8)
分離レベル
排他制御(注 9)
98
対象
ReadCommitted
テーブルロック
○
レコードロック
○
1 セッションで可能な最大オープン数
128
1 システムでの最大セッション数
512
1 システムで可能な最大多重実行可能なプロセス数
100(注 10)
○:使用可能
-7-
×:使用不可
エラー :エラー終了します。
無効
:指定した動作が行われません。
指定不可:サポートしていないため、指定する方法がありません。
注 1)相対ファイル
COBOL ファイルシステムの相対ファイルなどを使用してください。
指定した場合、OPEN 文実行時、以下の COBOL エラーが発生します。
-“JMP0001I-U ファイルのオープンに失敗しました.”
注 2)OPTIONAL 指定
ファイルが存在しない場合、ファイルなしのエラーとなります。自動生成は行いません。
注 3)ASSIGN 句
ASSIGN 句はファイル識別名で行い、「3.1.5 COBOL 初期化ファイル」に指定することを推奨します。なお、PowerRDBconnector
ではファイル識別名を一意の名前で指定してください。
注 4)FILE STATUS 句
入出力状態の詳細情報(FILE STATUS 02)は返却しません。指定した場合でも常に初期値が通知されます。
注 5)LOCK MODE 句
エラーとなりませんが、LOCK MODE 句で指定したロック機構は動作しません。
注 6)ALTERNATE RECORD KEY 句
指定できるキー項目の最大個数は、RECORD KEY 句と合わせて 99 個です。
注 7)マルチセッション
マルチセッションは、以下の環境で使用できます。
- 「NetCOBOL for .NET V3.0/V3.1」を用いてコンパイルし、かつセッションを制御するユーザーアプリケーションを作成した場
合。
ASP.NET や Interstage などと連携するときは、マルチセッションのプログラミングが必要です。MeFt/Web のマルチスレッドモデ
ルには対応していません。
注 8)トランザクション操作
トランザクション操作をするには、PowerRDBconnector が提供するトランザクションサブルーチンを CALL 文で呼び出します。トラン
ザクションは、セッション単位に開始、確定および取消しができます。
注 9)排他制御
テーブルロックまたはレコードロックを指定します。
レコードロックは、PowerRDBconnector 動作環境ファイルの指定により行います。
テーブルロックは、COBOL 初期化ファイルの指定と、PowerRDBconnector 動作環境ファイルの指定により行います。テーブルロッ
クの指定方法は、「3.1.4 PowerRDBconnector 動作環境ファイル」、「3.1.5 COBOL 初期化ファイル」を参照してください。
-8-
注 10)1 システムで可能な最大多重実行数
同時実行できる最大多重実行数は、アプリケーションの処理内容(入出力文回数)、データベースおよび使用するハードウェア
(CPU、ハードディスク能力、データベースに割り当てる実メモリ)の要件に依存します。例えば、バッチプログラムの大量データ処
理は、高負荷となるため、多重実行に耐えられません。
2.2.1.3
参考:データベースの機能範囲
ここでは、データベースの機能範囲を入出力文で記述した COBOL の機能範囲に置き換えて説明します。詳細は、Oracle のマニュア
ルを参照してください。
表 2.3 参考:データベースの機能範囲
項目
Oracle の機能範囲
SQL*Plus
ファイル定義ツール
ファイルの最大サイズ(バイト)
無制限
ファイルの最大数
無制限
別名
シノニム
他データベースへのリンク
データベース・リンク(注 1)
レコードの最大長(バイト)
2,000,000 (注 2)
レコード内の最大項目数(列数)
1,000
レコードの最大数(行数)
無制限
ファイル
レコード
RECORD
KEY 句
ファイル
管理記述
項
ユーティリティなど
ALTERNATE
RECORD
KEY 句
指定できる項目の最大個数
32
指定できる項目総長の最大(バイト)
設定依存(注 3)
指定できるキーの最大個数
無制限
指定できる項目の最大個数
32
指定できる項目総長の最大(バイト)
設定依存
多重項目キーに定義できる最大列数
32
トランザクション
○
リカバリ
○
バックアップ
○
1 テーブルに定義できるインデックス数
無制限
1 セッションで可能な最大オープン数
設定依存(注 4)
1 システムで可能な最大オープン数
特に記載なし
Oracle での機能範囲について
Oracle のマニュアルをもとに記載しています。詳しくは、Oracle が提供している情報を参照してください。
注 1)データベース・リンク
データベース・リンクおよびデータベース・リンクに定義したビューについて、Oracle では定義できますが、PowerRDBconnector は
サポートしていません。
注 2)レコードの最大長(バイト)
Oracle のサポートする行長は 32,760 バイトより大きいですが、PowerRDBconnector のサポートする最大レコード長(32,760 バイト)
に制限されます。
-9-
注 3)キー指定できる項目総長の最大(バイト)
Oracle のデータ・ブロックのサイズ(初期化パラメーター DB_BLOCK_SIZE によって指定される)に依存します。
注 4)1 セッションで可能な最大オープン数
1 セッション当たりの制限は、Oracle の初期化パラメーター OPEN_CURSORS に依存します。OPEN_CURSORS の見積もりにつ
いては、「3.1.3.6 OPEN_CURSORS の設定」を参照してください。
2.2.2
プログラミングスタイル
ここでは、次の 2 種類のプログラミングスタイルについて説明します。
・ シングルセッション
・ マルチセッション
2.2.2.1
プロセスとスレッド
Windows は、実行するプログラムごとにプロセスを割り当て、各プロセスに、メモリ上のプログラムのコード、データ、オープンされてい
るファイル、動的に割り当てられたメモリ資源など、OS の資源を割り当てます。
Windows は、CPU の実行時間をプロセス内に生成されたスレッド単位に割り当てます。
スレッドとは、CPU に実行時間を割り当てる最小単位です。つまり、1 プロセスの内部に多数のスレッドを生成することで、複数のコード
(プログラム)を同時に実行することができます。
1つのプロセス内のスレッドは、プロセスの仮想メモリ空間やグローバル変数などを共有します。このため、スレッド間のデータ交換など
にかかる CPU 負荷が、プロセス間のデータ交換に比べて非常に小さくなります。
Windows は、プロセス内で複数スレッドを実行しない場合でも、CPU 時間の割り当てはスレッド単位になるので、プロセスが起動され
ると、少なくとも 1 つのスレッドを起動するようになっています。
2.2.2.2
シングルスレッド(プロセス)プログラムとマルチスレッドプログラム
シングルスレッド(プロセス)プログラムとは、1つのプロセス内で、1 つのスレッドを実行するプログラムのことです。
それに対し、マルチスレッドプログラムとは、1つのプロセス内で、複数のスレッド(マルチスレッド)でプログラムを実行できるプログラム
のことです。
2.2.2.3
プログラミングスタイルとは
PowerRDBconnector を使用する場合、「表 2.4 プログラミングスタイルごとの利点について」で示される 2 つのプログラミングスタイルが
選択できます。
表 2.4 プログラミングスタイルごとの利点について
プログラミングス
タイル
シングルセッ
ションプログラミ
ング
シングルスレッ
マルチスレッドでの
ド(プロセス)で
動作
の動作
利点
・ 1 プロセス上の全てのアクセスをデータベースと1つの
セッションで実行します。
・ データベースとのセッションを意識せず、アプリケーショ
ンを作成できます。
- 10 -
○
×
プログラミングス
タイル
シングルスレッ
マルチスレッドでの
ド(プロセス)で
動作
の動作
利点
・ 既存 COBOL 資産のプログラミングスタイルを変更せ
ずに開発できます。
・ マルチスレッドで動作可能なアプリケーションを作成で
マルチセッショ
ンプログラミング
きます。
○
(注)
・ スレッド単位にセッションを保持できます。
○
・ ASP.NET モデルで動作できるアプリケーションが開発
できます。
○:使用可能
×:使用不可
注)
マルチセッションプログラミングで作成されたプログラムは、シングルスレッド(プロセス)でも動作可能です。
シングルスレッド(プロセス)プログラムを、マルチセッションで作成する必要はありません。
“マルチスレッド”と“マルチセッション”という表現は似ていますが、本書では以下のように使い分けています。
- プログラムや OS 資源について関係がある場合には、プロセスやスレッド(マルチスレッド)という用語を使います。
- PowerRDBconnector を使ったプログラミングのスタイルについては、セッションという用語を使います。
シングルセッション
2.2.2.4
1 プロセス上の全てのアクセスをデータベースと1つのセッションで実行する方式です。
シングルセッションのプログラミングスタイルを使用する場合、以下の章を参照してください。
表 2.5 シングルセッション使用時の各機能の説明
機能
説明部分
セッションの使用方法
セッションを意識する必要はありません。
コンパイル方法
「3.1.6 コンパイル方法」
データベース認証の使用方法
「3.3.2 データベース認証の使用方法(シングルセッション)」
トランザクションの使用方法
「3.4.2 トランザクションの使用方法(シングルセッション)」
マルチセッション
2.2.2.5
アプリケーションがセッションを複数開設して、セッションごとにデータベースへアクセスする方式です。
マルチセッションのプログラミングスタイルを使用する場合、以下の章を参照してください。
表 2.6 マルチセッション使用時の各機能の参照箇所
機能
説明部分
セッションの使用方法
「3.2 セッションの制御方法」
コンパイル方法
「3.1.6 コンパイル方法」
データベース認証の使用方法
「3.3.3 データベース認証の使用方法(マルチセッション)」
- 11 -
機能
トランザクションの使用方法
2.2.3
説明部分
「3.4.3 トランザクションの使用方法(マルチセッション)」
認証機能
Oracle では、OS 認証か、データベース認証かのいずれかで認証し、データベースにアクセスすることができます。
PowerRDBconnector は、どちらの認証方法も使用可能です。
・ OS 認証の場合
COBOL アプリケーションが動作するプロセスのユーザー ID でデータベースにアクセスできるよう、Oracle を適切に設定してくださ
い。
・ データベース認証の場合
COBOL アプリケーションの中から、認証情報登録サブルーチンを呼び出して、データベースが備えているデータベース認証(パ
スワード認証)を使用できます。
詳しくは「3.1.3.3 データベースにアクセスするための権限設定」と、「3.3 認証」を参照してください。
2.2.4
トランザクション機能
複数のファイルまたは、複数のレコード間のデータ整合性をセッション単位で保証するために、COBOL アプリケーションからトランザク
ション操作(開始、確定、取消し)を行うことができます。詳しくは、「3.4 トランザクション」を参照してください。
図 2.6 トランザクション機能
2.2.5
排他制御
アプリケーションが多重動作するシステムにおいて、データの内容を保証するため、テーブルやレコードに対してセッション単位でロック
(排他制御)を行います。
PowerRDBconnector では、Oracle の排他制御を利用して、レコードロックと、テーブルロックのいずれかを選択できるようになっていま
す。Oracle の排他制御は、トランザクション機能と密接に関係しており、同時に複数のファイルを更新する際は、特に注意が必要です。
- 12 -
詳しくは、「3.5 排他制御」を参照してください。
2.3
システム構成
本節では、システムを構成するソフトウェアと運用環境について説明します。
2.3.1
必要なソフトウェア
PowerRDBconnector を使用するには、以下の製品が必要です。
2.3.1.1
開発時のシステム構成
(1) OS
以下のいずれかの製品が必要です。
・ Windows 2000 Server Service Pack 4
・ Windows 2000 Advanced Server Service Pack 4
・ Windows Server 2003, Standard Edition Service Pack 2
・ Windows Server 2003, Enterprise Edition Service Pack 2
・ Windows Server 2003, Standard Edition Release 2 Service Pack 2
・ Windows Server 2003, Enterprise Edition Release 2 Service Pack 2
・ Windows Server 2003, Standard x64 Edition Service Pack 2 (注 1)
・ Windows Server 2003, Enterprise x64 Edition Service Pack 2 (注 1)
・ Windows 2000 Professional Service Pack 4
・ Windows XP Professional Edition Service Pack 2/3
・ Windows Vista Business Service Pack 1 (注 2)
・ Windows Vista Enterprise Service Pack 1 (注 2)
・ Windows Vista Ultimate Service Pack 1 (注 2)
注 1) 64 ビット環境で使用する場合の注意事項
- WOW64(Windows 32-bit On Windows 64-bit)サブシステム上での 32 ビット動作のみサポートしています。
- 64 ビット OS を使用するときは、64 ビットの Oracle と、32 ビットの Oracle クライアントを同時に使用してください。
- 64 ビットの COBOL アプリケーションからは使用できません。
注 2)
Windows Vista で、Oracle10g Release2 を使用するときは、Oracle10g にパッチ(PSR10.2.0.3.0 以降)を適用してください。
(2) COBOL
以下のいずれかの製品が必要です。(注 1)
・ NetCOBOL Base Edition for Windows V7.0
・ NetCOBOL Standard Edition for Windows V7.0
・ NetCOBOL Professional Edition for Windows V7.0
・ NetCOBOL Base Edition 開発パッケージ for Windows V7.2/V8.0
- 13 -
・ NetCOBOL Standard Edition 開発パッケージ for Windows V7.2/V8.0
・ NetCOBOL Professional Edition 開発パッケージ for Windows V7.2/V8.0
・ NetCOBOL Base Edition 開発パッケージ V9.0/V10.0.0
・ NetCOBOL Standard Edition 開発パッケージ V9.0/V10.0.0
・ NetCOBOL Professional Edition 開発パッケージ V9.0/V10.0.0
・ NetCOBOL Base Edition for .NET V2.0
・ NetCOBOL Standard Edition for .NET V2.0
・ NetCOBOL Base Edition 開発パッケージ for .NET V2.1/V3.0/V3.1
・ NetCOBOL Standard Edition 開発パッケージ for .NET V2.1/V3.0/V3.1
・ NetCOBOL Enterprise Edition 開発パッケージ for .NET V3.0/V3.1
注 1)
NetCOBOL に含まれている PowerCOBOL はサポートしていません。
(3) データベース
PowerRDBconnector をインストールするコンピュータ内か、ネットワーク接続された Windows のサーバコンピュータ内に、以下のいず
れかの製品が必要です。
・ Oracle9i Client (クライアントコンピュータのみ)
・ Oracle Database Client (クライアントコンピュータのみ)
・ Oracle9i Database Enterprise Edition Release 2 (注 1)
・ Oracle9i Database Standard Edition Release 2(注 1)
・ Oracle9i Database Standard Edition One Release 2(注 1)
・ Oracle9i Database Personal Edition Release 2(注 1)
・ Oracle Database 10g Enterprise Edition Release 1 (注 2)/ Release 2
・ Oracle Database 10g Standard Edition Release 1 (注 2)/ Release 2
・ Oracle Database 10g Standard Edition One Release 1 (注 2)/ Release 2
・ Oracle Database 10g Personal Edition Release 1 (注 2)/ Release 2
・ Oracle Database 10g Enterprise Edition Release 2 for Microsoft Windows (x64)
・ Oracle Database 10g Standard Edition Release 2 for Microsoft Windows (x64)
・ Oracle Database 11g Enterprise Edition
・ Oracle Database 11g Standard Edition
・ Oracle Database 11g Standard Edition One
・ Oracle Database 11g Personal Edition
・ Oracle Database 11g Enterprise Edition for Microsoft Windows (x64)
・ Oracle Database 11g Standard Edition for Microsoft Windows (x64)
注 1)
最新パッチ(PSR9.2.0.5)以降を実施してください。
注 2)
最新パッチ(PSR10.1.0.5)以降を実施してください。
- 14 -
2.3.1.2
運用時のシステム構成
(1) OS
PowerRDBconnector をインストールするサーバコンピュータに、以下のいずれかの製品が必要です。
・ Windows 2000 Server Service Pack 4
・ Windows 2000 Advanced Server Service Pack 4
・ Windows Server 2003, Standard Edition Service Pack 2
・ Windows Server 2003, Enterprise Edition Service Pack 2
・ Windows Server 2003, Standard Edition Release2 Service Pack 2
・ Windows Server 2003, Enterprise Edition Release2 Service Pack 2
・ Windows Server 2003, Standard x64 Edition Service Pack 2 (注 1)
・ Windows Server 2003, Enterprise x64 Edition Service Pack 2 (注 1)
注 1) 64 ビット環境で使用する場合の注意事項
- WOW64(Windows 32-bit On Windows 64-bit)サブシステム上での 32 ビット動作のみサポートしています。
- 64 ビット OS を使用するときは、64 ビットの Oracle と、32 ビットの Oracle クライアントを同時に使用してください。
- 64 ビットの COBOL アプリケーションからは使用できません。
(2) COBOL
PowerRDBconnector をインストールするサーバコンピュータに、以下のいずれかの製品が必要です。(注 1)
・ NetCOBOL Base Edition サーバ運用パッケージ for Windows V7.0/V7.2/V8.0
・ NetCOBOL Standard Edition サーバ運用パッケージ for Windows V7.0/V7.2/V8.0
・ NetCOBOL Base Edition サーバ運用パッケージ V9.0/V10.0.0
・ NetCOBOL Standard Edition サーバ運用パッケージ V9.0/V10.0.0
・ NetCOBOL Base Edition サーバ運用パッケージ for .NET V2.0/V2.1/V3.0/V3.1
・ NetCOBOL Standard Edition サーバ運用パッケージ for .NET V2.0/V2.1/V3.0/V3.1
・ NetCOBOL Enterprise Edition サーバ運用パッケージ for .NET V3.0/V3.1
なお、ターミナルサービスや Citrix Presentation Server(MetaFrame)を使用した運用形態の場合のみ、以下のクライアント運用系製品
も使用できます。
・ NetCOBOL Base Edition クライアント運用パッケージ for Windows V7.0/V7.2/V8.0
・ NetCOBOL Standard Edition クライアント運用パッケージ for Windows V7.0/V7.2/V8.0
・ NetCOBOL Base Edition クライアント運用パッケージ V9.0/V10.0.0
・ NetCOBOL Standard Edition クライアント運用パッケージ V9.0/V10.0.0
・ NetCOBOL Base Edition クライアント運用パッケージ for.NET V2.0/V2.1/V3.0/V3.1
・ NetCOBOL Standard Edition クライアント運用パッケージ for.NET V2.0/V2.1/V3.0/V3.1
注 1)
NetCOBOL に含まれている PowerCOBOL はサポートしていません。
- 15 -
(3) データベース
PowerRDBconnector をインストールするコンピュータ内か、ネットワーク接続された Windows のサーバコンピュータ内に、以下のいず
れかの製品が必要です。
・ Oracle9i Client (クライアントコンピュータのみ)
・ Oracle Database Client (クライアントコンピュータのみ)
・ Oracle9i Database Enterprise Edition Release 2 (注 1)
・ Oracle9i Database Standard Edition Release 2 (注 1)
・ Oracle9i Database Standard Edition One Release 2(注 1)
・ Oracle Database 10g Enterprise Edition Release 1 (注 2)/ Release 2
・ Oracle Database 10g Standard Edition Release 1 (注 2)/ Release 2
・ Oracle Database 10g Standard Edition One Release 1 (注 2)/ Release 2
・ Oracle Database 10g Enterprise Edition Release 2 for Microsoft Windows (x64)
・ Oracle Database 10g Standard Edition Release 2 for Microsoft Windows (x64)
・ Oracle Database 11g Enterprise Edition
・ Oracle Database 11g Standard Edition
・ Oracle Database 11g Standard Edition One
・ Oracle Database 11g Enterprise Edition for Microsoft Windows (x64)
・ Oracle Database 11g Standard Edition for Microsoft Windows (x64)
注 1)
最新パッチ(PSR9.2.0.5)以降を実施してください。
注 2)
最新パッチ(PSR10.1.0.5)以降を実施してください。
2.3.2
運用形態
本製品は、NetCOBOL が動作するコンピュータにインストールし、データベースがインストールされているコンピュータにアクセスしま
す。
PowerRDBconnector サーバパッケージは、サーバコンピュータ内で運用する場合に使用します。
2.3.2.1
開発時の形態
コンピュータは、サーバコンピュータおよびクライアントコンピュータが使用できます。
NetCOBOL の開発系製品と同時に使用してください。
データベースは、PowerRDBconnector をインストールしたコンピュータと同じコンピュータ内か、異なる Windows のデータベースサー
バ内に配置することができます。
・ 64 ビット環境で使用する場合の注意事項
64 ビット OS を使用するときは、64 ビットの Oracle と、32 ビットの Oracle クライアントを同時に使用してください。
ASP.NET で使用するときは、IIS の 32 ビット互換モードを使用してください。
- 16 -
2.3.2.2
運用時の形態
コンピュータは、サーバコンピュータが使用できます。
NetCOBOL のサーバ運用系製品と同時に使用してください。
データベースは、PowerRDBconnector をインストールしたコンピュータと同じコンピュータ内か、異なる Windows のデータベースサー
バ内に配置することができます。
ターミナルサービスや MetaFrame を使用したリモート端末や、WWW ブラウザ経由および、サーバコンピュータ内のバッチ型のアプリ
ケーションからアクセスできます。
図 2.7 PowerRDBconnector サーバパッケージ運用形態
・ 64 ビット環境で使用する場合の注意事項
64 ビット OS を使用するときは、64 ビットの Oracle と、32 ビットの Oracle クライアントを同時に使用してください。
ASP.NET で使用するときは、IIS の 32 ビット互換モードを使用してください。
2.3.2.3
サポートする OS とデータベースの組合せ
PowerRDBconnector がサポートしている OS とデータベースの組合せを、以下に示します。
PowerRDBconnector とデータベースを同じコンピュータ上にインストールする場合に、使用可能な OS とデータベースの組合せ
- 17 -
○:使用可能
×:使用不可能
注 1:ただし、JIS2004 固有文字の読書きはできません。
PowerRDBconnector とデータベースを別々のコンピュータ上にインストールする場合に、使用可能な OS とデータベースの組合せ
○:使用可能
×:使用不可能
注 1:ただし、JIS2004 固有文字の読書きはできません。
- 18 -
2.3.2.4
未サポートの運用形態
PowerRDBconnector は、以下の運用形態はサポートしていません。
・ 64 ビット OS 上で、64 ビットの COBOL アプリケーションからのアクセス
・ 仮想マシン上での動作
・ guest ユーザーでの動作
・ PowerRDBconnector をインストールした Windows コンピュータから、Windows 以外のデータベースサーバに対するアクセス
・ 1 つの COBOL アプリケーションから、2 つ以上のサーバコンピュータに対するアクセス
- 19 -
第3章
PowerRDBconnector の使用手引き
本章では、PowerRDBconnector の使用方法について説明します。
開発者およびシステム管理者が、業務アプリケーションの設計時に、PowerRDBconnector の知っておきたい機能や NetCOBOL アプ
リケーションの環境構築、およびアプリケーションの開発方法について説明します。
3.1
環境構築
本節では、PowerRDBconnector の環境設定方法について説明します。
3.1.1
PowerRDBconnector を構成する要素
PowerRDBconnector を構成する要素は以下のようになります。
図 3.1 PowerRDBconnector を構成する要素
各構成要素を以下に示します。
表 3.1 PowerRDBconnector を構成する要素
COBOL アプリケーション
入出力文で記述した COBOL アプリケーション
COBOL 初期化ファイル
COBOL アプリケーションの実行情報を記述したテキス
トファイル
PowerRDBconnector 動作環境ファイル
PowerRDBconnector の動作環境を記述したテキストファ
イル
PowerRDBconnector
本ソフトウェア
DB プロバイダー
データベースをアクセスするデータプロバイダーまたは
インターフェース
Oracle Call Interface(OCI)を使用します。
- 20 -
COBOL アプリケーション
入出力文で記述した COBOL アプリケーション
データベース
PowerRDBconnector がアクセスする Oracle
データファイルに相当するデータベースオブジェクト
テーブル
Oracle では、表と呼んでいます。
ビュー
索引ファイルに相当するデータベースオブジェクト
レコードキーに相当するデータベースオブジェクト
インデックス
3.1.2
Oracle では、索引と呼んでいます。
環境構築の手順
必要な環境構築の手順を説明します。
NetCOBOL 製品
のインストール
NetCOBOL 製品をインストールします。
詳しくは、NetCOBOL のマニュアルを参照してください。
↓
・ データベース製品をインストールします。
- Oracle Call Interface(OCI)はインストールの既定値で選択されてい
ます。非選択としないでください。
- OS 認証を行う場合、Oracle に設定が必要です。
1. オペレーティング・システムに定義された ORA_DBA または
ORA_OPER グループに追加したユーザーを使用します。
2. 外部 OS ユーザーを追加するなどの権限を設定します。詳細
は、「3.1.3.3 データベースにアクセスするための権限設定」を
参照してください。
データベース製品
のインストール
データベース認証を行う場合、Oracle に設定は必要ありません。
・ クライアント環境の構築
クライアント使用時、または Oracle10g(x64)/ Oracle11g(x64)使用時は、
以下の機能もインストールします。
- データベースのクライアント(32 ビット)製品をインストールします。
- Oracle Client(Oracle Net Services)をインストールします。
- Oracle データベースへ接続するためのネット・サービス名を登録しま
す。
詳しくは、Oracle のマニュアルを参照してください。なお、Oracle の最新パッ
チを適用してください。
↓
PowerRDBconnector
のインストール
Oracle 用の PowerRDBconnector をインストールします。
詳しくは、製品 CD に格納されている README.txt を参照してください。
↓
環境の確認
PowerRDBconnector は、NetCOBOL およびデータベースの実行環境が正
しく設定されたプロセス上で動作できます。正しく設定されているか確認して
ください。
・ NetCOBOL
- 21 -
詳しくは、NetCOBOL のマニュアルを参照してください。
・ Oracle
各種の環境変数の設定が必要です。
- 初期化パラメーター“OPEN_CURSORS”について
Oracle の初期化パラメーター“OPEN_CURSORS”の見積もりについ
ては、「3.1.3.6 OPEN_CURSORS の設定」を参照してください。詳し
くは、Oracle のマニュアルを参照してください。
- データベースのキャラクターセットの設定について
扱う文字コード系に対応したキャラクターセットを指定してください。
使用できるコード系については、「【文字コード系の設定】」を参照し
てください。詳しくは、Oracle のマニュアルを参照してください。
↓
データベースオブジェクトの
作成
COBOL アプリケーションからアクセスするテーブルおよびビュー、インデッ
クスを作成します。
↓
PowerRDBconnector 動作環境ファイルを作成します。
PowerRDBconnector
動作環境ファイルの作成
クライアント使用時には、クライアント環境の構築で設定したネット・サービス名
(TNS エントリー名)を、PowerRDBconnector 動作環境ファイル(DBIO_ENV)
内の ServerName プロパティに指定します。
↓
COBOL 初期化ファイルの作
成
COBOL アプリケーションの実行に必要な COBOL 初期化ファイルを作成し
ます。
↓
COBOL アプリケーションを作成します。
入出力文
COBOL アプリケーションの
作成
COBOL アプリケーションの作成は、NetCOBOL のマニュアルを参照してく
ださい。
入出力文によるファイルアクセスは、「第 3 章 PowerRDBconnector の使用
手引き」を参照してください。
↓
COBOL アプリケーションの動作を確認します。
COBOL アプリケーションの
テスト
COBOL アプリケーションが単体で正常に動作することを確認します。ファイ
ルアクセスでエラーが通知される場合、「5.1 エラー時の対処」を参照して対
処してください。
↓
データベースをチューニングします。
データベースのチューニング
実際の運用に近い環境で動作確認を行い、Oracle のチューニングを行いま
す。チューニングせずに運用を開始すると、最適な性能は得られず、想定外
のタイムアウトが発生する場合があります。
Oracle のチューニング方法については、Oracle のマニュアル等を参照して
ください。
↓
COBOL アプリケーションの
運用
COBOL アプリケーションの運用を開始します。
- 22 -
3.1.3
データベースオブジェクトの作成
COBOL で定義されているファイルに対応するデータベースオブジェクト(テーブルまたはテーブルとビュー)を作成します。
図 3.2 データベースオブジェクトの作成
3.1.3.1
データベースオブジェクトの作成手順
以下の手順を参考に作成します。正しく作成しないと動作できませんので、注意して作成してください。
・ データベース
テーブルおよびビューを格納するデータベースを作成します。
「3.1.3.2 データベースの作成」を参考に、データベースを作成しま
す。
データベースの作成
・ データベースのアクセス権限
テーブルやビューへアクセスするために、COBOL アプリケーション
を起動するユーザーにアクセス権限を設定します。
「3.1.3.3 データベースにアクセスするための権限設定」を参考に、
ユーザーのアクセス権限を設定します。
↓
・ テーブル名
テーブルまたはテーブルとビューで任意の名前で定義します。「表 3.3
ファイルとテーブルまたはビューの対応」を参考にテーブルやビュー
を構成します。
・ ファイル構成
SQL 定義文の作成
レコードキーを定義するファイルは、インデックスまたはプライマリキー
を定義します。「表 3.3 ファイルとテーブルまたはビューの対応」を参
考にデータベースオブジェクトを構成します。
・ レコード構成
COBOL アプリケーションのファイル記述項(FD 句)のレコード記述
項に定義する基本項目からテーブルまたはビューの列を定義しま
す。「COBOL 定義とデータベース定義の対応」を参考に列定義
- 23 -
(データ型、列名)を構成します。なお、各列には NOT NULL 制約
を定義してください。
↓
SQL 定義文の実行
3.1.3.2
作成した SQL 定義文を実行します。
Oracle の SQL*Plus ユーティリティ等で実行できます。
データベースの作成
COBOL アプリケーションからアクセスするテーブルおよびビューを格納するデータベースを作成します。なお、既存のデータベースを
使用する場合には、新たにデータベースを作成する必要はありません。
データベースの作成は、Oracle が提供する以下のユーティリティを使用します。
・ Database Configuration Assistant(DBCA)(CREATE DATABASE コマンド)
・ Enterprise Manager Console(Oracle9i / Oracle10g)
・ Enterprise Manager (Oracle10g / Oracle11g)
・ SQL*Plus
物理ディスクに対する負荷集中の防止と、ハード障害発生時のデータ保証のために、履歴ファイル(REDO ログ、UNDO 領域、アーカイブ
REDO ログ)は、データファイルとは別の物理ディスクに配置してください。
データファイルを追加する場合、ファイル名を完全に指定してください。不完全な場合、デフォルトのディレクトリに作成されてしまいま
す。
データベースのデータファイルは、領域の自動拡張および自動圧縮が可能です。しかし、自動拡張や自動圧縮が動作すると、COBOL
アプリケーションからのアクセス性能が低下する場合があります。このため、領域の自動拡張および自動圧縮は有効にしないことを推
奨します。
データファイルの最大サイズを設定、または自動拡張を無効にした場合、ファイルサイズの上限に達すると Oracle は領域不足を通知
します。このため、データファイルのサイズを十分に割り当ててください。
領域不足が発生した場合には、DBCA(ALTER DATABASE コマンド)や、Enterprise Manager Console で領域を拡張できます。
データベースの作成方法について、詳しくは Oracle のマニュアルを参照してください。
【文字コード系の設定】
COBOL アプリケーションで使用する文字コード系に対して Oracle のデータベース作成時に設定するキャラクターセットは、以下の通
りとしてください。
表 3.2 ファイルとテーブルまたはビューの対応
Oracle の文字コード系
COBOL アプリケーションで使用する
データの文字コード系
CHAR
NCHAR
シフト JIS
JA16SJIS
AL16UTF16
AL32UTF8
UTF8
AL32UTF8
AL16UTF16(注)
unicode(UCS2/UTF-16)
注) Oracle9i 環境では使用できません。使用した場合、対象表のオープン時にエラーとなります。
文字コード系の詳細については、「4.1.2.7 文字コードについて」を参照してください。
- 24 -
Oracle の文字コード系と PowerRDBconnector の文字コード変換の詳細については、「4.2.3.4 文字コード変換について」を参照してく
ださい。
データベースにアクセスするための権限設定
3.1.3.3
COBOL アプリケーションからテーブルおよびビューへアクセスするための権限を、以下の手順で設定してください。
(1) ログインユーザーの追加
次のユーザーを Oracle のログインユーザーに追加してください。
- OS 認証使用時
1. Windows 上で、COBOL アプリケーションを起動するドメインまたはコンピュータのユーザーをサーバに定義し、ORA_DBA
または ORA_OPER グループに属するように変更してください。
2. Oracle 上で、COBOL アプリケーションを起動するドメインまたはコンピュータのユーザーを"Oracle Administration Assistant
"を使用して外部 OS ユーザーを追加し、必要な権限(DBA 権限など)をロールとして付与してください。
- データベース認証使用時
COBOL アプリケーションの認証情報登録サブルーチンに指定するユーザーを追加してください。
(2) テーブルおよびビューのアクセスに必要なシステム権限の設定
(1)のユーザーに、Oracle 上のテーブルおよびビューのアクセスに必要なシステム権限を、“Enterprise Manager"や、”GRANT 文”
などで設定してください。
- SQL 文レベルで権限を設定する場合、ユーザーにシステム権限を追加してください。
- READ する場合には、“SELECT ANY TABLE”システム権限を追加してください。
- REWRITE する場合には、“UPDATE ANY TABLE”システム権限を追加してください。
- DELETE する場合には、“DELETE ANY TABLE”システム権限を追加してください。
- WRITE する場合には、“INSERT ANY TABLE”システム権限を追加してください。
- テーブル個々に権限を設定する場合には、オブジェクト権限を設定してください。
(3) "DROP ANY TABLE"システム権限の設定
COBOL 初期化ファイルの Truncate パラメーターを指定し、OUTPUT モードで OPEN 文を実行する場合は、COBOL アプリケー
ションを起動するユーザーに対して"DROP ANY TABLE"システム権限を設定してください。
ログインユーザーの追加方法および権限の設定方法については、Oracle のマニュアルを参照してください。
COBOL アプリケーション中で認証情報登録サブルーチンを使用して、データベース認証機能を使用して認証する場合は、「3.3.2
データベース認証の使用方法(シングルセッション)」「3.3.3 データベース認証の使用方法(マルチセッション)」を参照してください。
3.1.3.4
ファイルとテーブルまたはビューの対応
COBOL アプリケーションで扱うファイルと、データベースで扱うテーブルまたはビューの対応を以下に示します。
表 3.3 ファイルとテーブルまたはビューの対応
ファイル編成
データベースオブジェクト
以下のいずれかを作成
順ファイル
・ テーブルを作成
補足
テーブルのみを作成する場合はテーブルの列名、テー
ブルとビューを作成する場合はビューの列名を「COBOL
- 25 -
ファイル編成
データベースオブジェクト
補足
・ テーブルとビューを作成
定義とデータベース定義の対応」に説明した列名にし
てください。
テーブルとビューを作成する場合は、テーブルの列名
は任意の名前で作成できます。
以下のいずれかを作成
テーブルのみを作成する場合はテーブルの列名、テー
ブルとビューを作成する場合はビューの列名を「COBOL
定義とデータベース定義の対応」に説明した列名にし
てください。
・ インデックス付きテーブルを作成
・ 上記のテーブルを導出元にした
ビューを作成
テーブルとビューを作成する場合は、テーブルの列名
は任意の名前で作成できます。
索引ファイル
RECORD KEY 句にあたる列にインデックスを設定しま
す。
UNIQUE 制約は、RECORD KEY 句の WITH
DUPLICATE がない場合に指定してください。
インデックス付きテーブルを導出元にしたビューも索引
ファイルとしてアクセスできます。
ビューに対するアクセス機能については、「4.2.3.2 ビューの使用について」を参照してください。
ビューの構成については、「【ファイル記述項からテーブルまたはビューの作成例】」を参照してください。
3.1.3.5
列定義の対応
COBOL のレコード記述項とデータベースの列定義の対応を以下に示します。
COBOL 定義とデータベース定義の対応
表 3.4 COBOL 定義と Oracle 列定義の対応
データベース定義
COBOL 定義
項目の
種類
USAGE 句
PICTURE 句
データ型
列名
符号
精度(p)
位取り(s)
なし
1 ~ 18
0 ~ 18
NUMBER(p,s)
<文字列>_UNSIGN_NUMERIC
または
<文字列>_UNUM
あり
1 ~ 18
0 ~ 18
NUMBER(p,s)
<文字列>_NUMERIC
または
<文字列>_NUM
なし
1 ~ 18
0 ~ 18
NUMBER(p,s)
<文字列>_UNSIGN_DECIMAL
または
<文字列>_UDEC
あり
1 ~ 18
0 ~ 18
NUMBER(p,s)
<文字列>_DECIMAL
または
<文字列>_DEC
DISPLAY
(外部 10 進)
数字
項目
PACKED-DECIMAL
(内部 10 進)
- 26 -
データベース定義
COBOL 定義
項目の
種類
USAGE 句
PICTURE 句
符号
なし
整数
項目
COMP、
COMPUTATIONAL
、BINARY
(2 進)
あり
英数
字
項目
日本
語
項目
バイ
ナリ項
目
X(英数字)
N(日本語)
X(バイナリ)
データ型
位取り(s)
1~4
---
NUMBER(p,0)
<文字列>_UNSIGN_SMALLINT
または
<文字列>_USINT
5~9
---
NUMBER(p,0)
<文字列>_UNSIGN_INTEGER
または
<文字列>_UINT
10 ~ 18
---
NUMBER(p,0)
<文字列>_UNSIGN_BIGINT
または
<文字列>_UBINT
1~4
---
NUMBER(p,0)
<文字列>_SMALLINT
または
<文字列>_SINT
5~9
---
NUMBER(p,0)
<文字列>_INTEGER
または
<文字列>_INT
10 ~ 18
---
NUMBER(p,0)
<文字列>_BIGINT
または
<文字列>_BINT
p
---
CHAR(p)
p
---
NCHAR(p)
<文字列>_CHAR
または
<文字列>_CHR
p
---
シフト JIS の場合:
CHAR(p×2)
unicode の場合:
CHAR(p×3)
<文字列>_NCHAR
または
<文字列>_NCHR
p
---
NCHAR(p)
p
---
RAW(p)
---
---
---
列名
精度(p)
<文字列>_BINARY
または
<文字列>_BIN
精度(p) :精度は、全体桁数および項目の長さ(文字数)です。
位取り(s):位取りは、小数部の桁数です。
文字列:任意の文字列です。
COBOL のレコード記述項と、データベースの列定義の対応には、以下の注意事項があります。
1. COBOL のレコード記述項のレコード長とテーブルの行長が一致しているか COBOL がチェックします。必ず、レコード記述項に
合わせてテーブルの列を定義してください。
2. 必ず、RECORD KEY 句に定義したキーに対応するインデックスを定義してください。
3. COBOL のレコード記述項に定義した OCCURS 句は、繰り返された基本項目が列になります。
4. COBOL のレコード記述項に定義した REDEFINES 句は、再定義された最下位レベル番号の基本項目が列になります。
5. BINARY データ型に対応させた X 項目は、レコードキーにできません。
BINARY データ型に対応させた X 項目は、1 つの項目に、英数字項目と数字項目が混在して使用されているような場合に使
用します。BINARY データ型に対応させた X 項目は、PowerRDBconnector およびデータベースでは変換/補正を行いません。
このため COBOL アプリケーションで項目に応じてデータ内容を自由に定義できます。
- 27 -
6. CHAR、NCHAR のデータ型は、COBOL とデータベースの設定により格納される文字コードによっては、エラーとなることがあり
ます。
COBOL とデータベースの文字コードについては、「4.1.2.7 文字コードについて」を参照してください。
文字コード変換について、詳しくは「4.2.3.4 文字コード変換について」を参照してください。
7. 作成できるテーブルおよびビューの制限値(最大テーブル数、最大テーブルサイズ、最大行長、最大列数、最大列長、最大列
名長など)は、Oracle のマニュアルを参照してください。
8. USAGE 句が COMP-5 の場合は、エラーとはなりませんが、データが正しく評価されません。
9. 文字列の後方空白の扱いについては、「3.7.1 後方空白補正」を参照してください。
10. データベースの仕様で、英数字項目および日本語項目で定義するデータベースの精度(p)には、以下の制限があります。
表 3.5 データベースの文字列データの精度
項目の種類
データ型
サイズ
英数字項目
CHAR
2,000 バイト
日本語項目
NCHAR
2,000 バイト
なお、unicode を UTF-8 で扱う場合、1 文字が最大 3 バイトで表現されます。UTF-16 で扱う場合、1 文字が最大 4 バイトで表現
されます。このため、unicode で使用する場合、全てが最大バイト数の文字の場合、最大以下の文字数まで格納できます。
UTF-8 で扱われるため全てが 3 バイト文字の場合は最大で 666 文字まで格納できます。
表 3.6 unicode での格納可能な文字数
unicode 種別
1 文字の最大バイト数
最大格納文字数
UTF-8
3 バイト
666 文字
UTF-16
4 バイト
500 文字
11. 列名は、ASCII コードまたはシフト JIS コード(JIS X 0208-1990)の文字セットで記述してください。JIS X 0213:2004 に対応した
文字セット(JIS2004)では、4 バイトの文字や、シフト JIS コード(JIS X 0208-1990)に存在しない文字はエラーとなります。このため
unicode 固有文字や、JIS2004 で追加された文字は使用しないでください。
12. JIS2004 の文字コード系を使用時は、JIS2004 の 1 文字につき、COBOL の英数字項目または日本語項目を 2 文字分用意して
ください。対応するデータベースの項目型も、2 文字分に対応したサイズを指定してください。
【ファイル記述項からテーブルまたはビューの作成例】
以下に、ファイル記述項からテーブルまたはビューを作成する例について説明します。
1. ファイル記述項(FD 句)のレコード記述項の例を以下に示します。
- 28 -
2. レコード記述項のレコード構造のレイアウトは以下のようになります。
下線部のデータ項目が最下位レベル番号の基本項目になります。
3. 「表 3.3 ファイルとテーブルまたはビューの対応」と「COBOL 定義とデータベース定義の対応」に基づいて、以下の SQL 定義文
(CREATE 文)を作成します。
以下の 2 通りで作成できます。
- テーブルのみを作成
- テーブルとビューを作成
索引ファイルで定義されているので、インデックスは必ず作成します。
- 29 -
COBOL 初期化ファイルに指定する TableName を求めます。
- テーブルのみを作成する場合
(1)テーブル名 T1 が COBOL 初期化ファイルに指定する TableName(FILE1=TableName=T1)になります。
- テーブルとビューを作成する場合
(2)ビュー名 V1 が COBOL 初期化ファイルに指定する TableName(FILE1=TableName=V1)になります。
(3)列名は、FD 句のデータ項目名を使用しています。
(4)OCCURS 句で定義している繰返し項目 C6 の列名は、"_"+添字番号にしています。
(5)全ての列に NOT NULL 制約を定義しています。
(6)レコードキーに対して、インデックスを定義しています。
4. 作成されたテーブルは以下のレコード構造になります。
- 30 -
5. SQL 定義文を実行します。
SQL*Plus ユーティリティなどを使用して実行してください。
3.1.3.6
OPEN_CURSORS の設定
COBOL アプリケーションの OPEN、START、READ、REWRITE、WRITE、DELETE といった各入出力文で、Oracle のテーブルまた
はビューにアクセスするため、必要に応じ Oracle に対して SELECT 文を実行しています。このため、Oracle の初期化パラメー
ター“OPEN_CURSORS”の設定を行ってください。
以下に、1 つのファイルの入出力文で必要な最大の“OPEN_CURSORS”の簡単な見積もり方法を示します。各プロセスで使用する最
大値を算出し、その値を、“OPEN_CURSORS”に設定してください。
・ ファイル編成が順編成ファイルの場合
1 ファイルのオープンで最大 4 個を使用します。
・ ファイル編成が索引順編成ファイルの場合
ファイルのキー項目の数により変化します。
(例)キー項目数が 32(最大)の場合
最大 140 個の OPEN_CURSORS を使用します。
3.1.3.7
データベースに対する統計情報の収集
データベースが最適に動作するようにチューニングを行ってください。
データがセットアップされた状態で、統計情報収集を利用者が行い、最適化する必要があります。必ず統計情報収集を行ってくださ
い。統計情報収集は以下のような場合に必要です。
・ 新規にファイル追加した場合。
・ データの大幅な増減があった場合。
実施時期や運用方法などのデータベースに関することは、Oracle のマニュアルを参照してください。
3.1.4
PowerRDBconnector 動作環境ファイル
PowerRDBconnector 動作環境ファイルは、ファイル名 "DBIO_ENV" で作成し、以下のプロパティを記述してください。
PowerRDBconnector の動作環境ファイルの書式
; PowerRDBconnector の動作環境
ServerName=<データベース名>
- 31 -
ProviderName=<プロバイダー名>
TableLock=<テーブルロック>または
RecordLock=<レコードロック>
CheckLock=<チェックロック>
Suppress=<後方空白補正>
DataCheck=<データチェック>
ErrorLog=<エラーログの出力先>
TraceMode=<トレースモード>
TraceSize=<トレースファイルのサイズ>
TraceLevel=<トレースのレベル>
・ PowerRDBconnector 動作環境ファイル(DBIO_ENV)の格納先は、以下 3 通りのいずれかで設定します。
1. 環境変数DBIO_ENV に PowerRDBconnector 動作環境ファイルのファイル名を含むフルパスで設定
設定例:DBIO_ENV=C:¥apl¥DBIO_ENV
動作環境の設定内容は、サーバ一意の設定となります。
2. 実行プログラムと同じディレクトリに格納
動作環境の設定内容は、実行プログラム(EXE ファイル)を格納するディレクトリで一意の設定となります。
パス名には、JIS2004 で追加された文字などのシフト JIS 範囲外の文字を含めないでください。
3. アプリケーション起動時のカレントパスに格納
動作環境の設定内容は、実行プログラムを呼び出す業務アプリケーションや利用者の実行環境毎に任意の設定となりま
す。
PowerRDBconnector は、ファイルのオープン時に、PowerRDBconnector 動作環境ファイル(DBIO_ENV)を、上記の順序で検索
します。
・ ASCII コード、シフト JIS コード(JIS X 0208-1990)または UTF-8 コードのテキストファイルで記述します。
ただし、UTF-8 の文字コードで作成する場合は、以下の点に注意してください。
- BOM 付きの UTF-8 の文字コード系のテキストファイルとして作成してください。
- PowerRDBconnector 動作環境ファイルの内容はシフト JIS 範囲内の文字で記述してください。
・ プロパティ名は行の先頭から始めてください。
・ プロパティ名と値は = (等号)でつなぎます。 = の前後に空白、タブなどは記述できません。プロパティ名のみまたはプロパティ名と
=だけで、値の指定のない記述はエラーとなります。
・ 大文字と小文字を区別します。
・ 行先頭に ; (セミコロン)文字がある行はコメント行とします。行途中の ; 文字はコメントとなりません。
・ アプリケーションを実行するユーザーからの読取り権限が必要です。
- 32 -
・ ASP.NET で使用する場合、以下のいずれかの格納先を設定してください。
1. 環境変数DBIO_ENV に PowerRDBconnector 動作環境ファイルのファイル名を含むフルパスで設定
環境変数を変更した場合、Windows の再起動が必要です。
2. Internet Information Service(IIS)のカレントパスに格納
初期値は「x:¥Windows¥system32¥Inetsvr」または「x:¥Windows¥system32」です。カレントパスを変更する場合、アプリケー
ションで以下のように記述してください。なお、カレントパスは、セッション開設前に設定してください。
(記述例)
CLASS CLASS-ENVIRONMENT AS "System.Environment"
PROPERTY PROP-CURRENTDIRECTORY AS "CurrentDirectory"
SET PROP-CURRENTDIRECTORY OF CLASS-ENVIRONMENT TO "変更先パス名".
カレントパスはスレッドではなく、プロセスで1つです。COBOL プログラム内でカレントパスを変更すると、PowerRDBconnector
動作環境ファイルを正しく読み込めないことがあるため、以下のいずれかの対処を行ってください。
- IIS の1プロセス内でカレントパスを変更しない場合。
PowerRDBconnector 動作環境ファイルごとに IIS のプロセスを分離してください。
1つの IIS のプロセス内で動作するスレッドでは、同じカレントパスを使用してください。詳細は、IIS のマニュアルやヘル
プを参照してください。
- IIS の 1 プロセス内でカレントパスを変更する場合。
カレントパスの変更により、異なる PowerRDBconnector 動作環境ファイルを参照する場合は、カレントパスの変更からス
レッド初回の OPEN 文まで、スレッドのロックを行ってください。
各プロパティの指定方法を以下に示します。
PowerRDBconnector 動作環境ファイルのプロパティ
表 3.7 PowerRDBconnector 動作環境ファイルのプロパティ
プロパティ名
指定
有無
値と意味
Oracle データベースへ接続するために、データベースに接続する名前(データ
ベース名)を半角 255 文字以内で指定します。記号として半角ハイフン(-)が使用
できます。
具体的には、次の Oracle の TNS エントリー名を指定します。
ServerName
必須
TNS エントリー名は、以下の名前になります。
Oracle インストール時のリスナー環境構成時に指定したリスナー名になります。
TNS エントリー名がわからない場合は、Oracle をインストールしたデータベース管
理者に確認するか、tnsnames.ora に記述した名前を確認してください。
詳しくは、Oracle のマニュアルを参照してください。
データベースアクセスに使用するプロバイダー名またはインターフェース名を指定
します。
ProviderName
必須
・ “OCI”
Oracle にアクセスするためのインターフェース名です。
TableLock プロパティまたは RecordLock プロパティを指定します。
TableLock
選択
(注意が必
要)
テーブルロックをする場合は、TableLock プロパティに ON を指定します。
・ “ON”
テーブルロックを使用する場合に指定します。
なお、COBOL 初期化ファイルの TableLock プロパティにも ON を指定します。
- 33 -
プロパティ名
指定
有無
値と意味
詳しくは、「3.5 排他制御」を参照してください。
レコードロックをする場合は、RecordLock プロパティに待機時間(既定値 30 秒)を
秒数で指定します。以下に指定値(秒)と意味を示します。
・ 0
レコードロック獲得待ちを行わず、エラー復帰します。
・ 1 ~ 2147483647
RecordLock
レコードロックの獲得待ちを、指定時間だけ待合わせます。指定時間経過後、
獲得できない場合、エラー復帰します。
省略した場合は、30 秒が指定されたものとみなします。
詳しくは、「3.5 排他制御」を参照してください。
データベースの処理完了の待合わせについては、「3.6 タイムアウト機能」を参照
してください。
CheckLock
選択
(注意が必
要)
全く排他しない場合に指定します。CheckLock プロパティを使用する場合は、「4.2.2
排他制御に関する注意事項」を参照して十分注意事項を理解した上のアプリケー
ションを作成した場合のみ使用してください。
・ “OFF”
PowerRDBconnector の排他制御を使用しません。全く排他しない場合に指
定します。
詳しくは、「3.5.4 チェックロック機能」を参照してください。
後方空白補正の有無を指定します。以下に指定値と意味を示します。
・ “ON”
後方空白補正を行います。
Suppress
選択
(注意が必
要)
・ “OFF”
後方空白補正を行いません。
省略した場合は、ON が指定されたものとみなします。
COBOL 初期化ファイルで Suppress プロパティが指定された場合は、COBOL 初
期化ファイルの値が有効となります。
詳細は、「3.7.1 後方空白補正」を参照してください。
データのチェックを行うか否かを指定します。以下に指定値と意味を示します。
・ “NONE”
データチェックを行わず、データの補正を行います。
・ “C”
英数字項目と日本語項目のデータチェックを行います。
DataCheck
選択
(注意が必
要)
・ “U”
外部十進項目のデータチェックを行います。
・ “P”
内部十進項目のデータチェックを行います。
複数指定する場合は、“/”で区切って指定してください。
例:文字チェックと内部十進数チェックを行う場合。
DataCheck=C/P
- 34 -
プロパティ名
指定
有無
値と意味
省略した場合は、C/U/P が指定されたものとみなします。
データ内容のチェックを行わない場合、項目属性に違反するデータは補正されま
す。詳細は、「3.7.2 項目属性に違反するデータのチェックと補正」を参照してくだ
さい。
トラブルが発生したとき、PowerRDBconnector 内部調査用の情報を取得する場合に、以下のプロパティを指定してください。これらの
プロパティを設定すると、性能が著しく低下する場合があります。通常の運用では設定しないでください。
表 3.8 トラブル発生時に必要な PowerRDBconnector 動作環境ファイルのプロパティ
プロパティ名
指定
値と意味
有無
エラーログおよびトレース情報の格納ディレクトリを指定します。
ErrorLog プロパティが指定されると、指定したディレクトリにログファイル
(FJSVdbio.log)を作成し、エラーログを採取します。既に存在している場合は追記し
ます。
エラーログの最大サイズは 256K バイトで 2 世代分のエラーログを保持します。な
お、COBOL アプリケーションが異常終了するような場合にのみエラーログを採取す
るため、極端に大きくなることはありません。
エラーログは、PowerRDBconnector の内部情報であり、内容は可変です。当社技術
員からの依頼により採取してください。
格納ディレクトリを指定するときの注意事項を以下に示します。
・ ドライブ直下は指定できません。
・ 半角英数字、半角記号(¥ | : * ? " < > /)の文字を使って、200 バイト以内の値で
指定してください。
・ 全角文字を含むディレクトリは指定しないでください。指定すると格納先を保証
ErrorLog
選択
できません。
・ 実行プログラム(EXE ファイル)を格納するディレクトリからの相対パスも指定可
能です。相対指定は、”.¥”で開始します。
例)ErrorLog=.¥
ただし、絶対パスに変換した場合に、200 バイト以内になるように指定してくださ
い。
・ 環境変数は指定できません。
・ 存在するディレクトリで、書込み権限のあるディレクトリを指定してください。
・ 存在しないディレクトリを指定した場合、エラーは通知されず、イベントログに警
告のメッセージが通知されます。このとき、エラーログおよびトレース情報は採取
されません。
・ 書込み権限のないディレクトリを指定した場合、Windows Vista では、ファイルの
仮想化(リダイレクション)が生じることがあります。リダイレクションが生じた場合
は、以下のイベントログに出力されます。
アプリケーションとサービス
→ Microsoft → Windows → UAC-FileVirtualization
トレース情報の採取有無を指定します。以下に指定値と意味を示します。
TraceMode
選択
・ “ON”
- 35 -
プロパティ名
指定
値と意味
有無
トレース情報を採取します。
・ “OFF”
トレース情報を採取しません。
トレースを採取する場合、本プロパティと ErrorLog プロパティの 2 つを指定してくだ
さい。
トレースは、ErrorLog プロパティで指定したログ格納ディレクトリにトレースファイル
(FJSVdbio_trc.log)を作成し、トレース情報を採取します。ErrorLog プロパティまたは
TraceMode プロパティの設定を省略した場合、トレース情報は採取されません。
TraceMode プロパティの指定に誤りがあった場合、エラーは通知されず、トレース情
報は採取されません。このため、1 度 COBOL アプリケーションを実行し、トレース情
報が採取されていることを確認してください。
トレース情報の最大サイズを K バイト単位で指定します。
1 から 204800 の値を指定します。
省略された場合、4,096(K バイト)が指定されたものとして動作します。
なお、ErrorLog プロパティで指定されたディレクトリに 2 世代分のトレース情報を格
納するため、TraceSize で指定したサイズの 2 倍のディスク空き容量が必要となりま
す。
TraceSize
選択
TraceMode プロパティを省略または値に OFF を設定した場合、TraceSize プロパティ
の設定は無効です。
TraceSize プロパティの指定に誤りがあった場合、エラーは通知されません。204,800
(K バイト)が指定されたものとして動作します。ただし、数値以外の文字が指定され
た場合、エラーは通知されず、トレース情報は採取されません。
注意
トレース情報は、COBOL アプリケーションを単体実行して採取してください。な
お、COBOL アプリケーションが多重動作する環境では、最大で TraceSize×2 ま
でトレース情報を格納します。
トレースを採取する場合に、トレースの出力レベルを指定します。
以下に指定値と意味を示します。
・ 0
アクセス情報のみ出力します。
・ 1
TraceLevel
選択
(注意が
必要)
0 に加え、列情報およびイベントログ内容を出力します。
・ 2
1 に加え、エラー発生時のデータ内容を出力します。
・ 3
2 に加え、アクセス時のキー値の内容および入出力データの内容を出力します。
省略した場合は、0 が指定されたものとみなします。
トレース内容の詳細は、「5.2 トレース出力機能」を参照してください。
PowerRDBconnector 動作環境ファイル(DBIO_ENV)の記述例
Oracle を構築するサーバの TNS エントリー名が snake で、テーブルロックを有効にする(※1)ための記述です。
- 36 -
※1:テーブルロックを有効にするためには、PowerRDBconnector 動作環境ファイルの指定の他に、COBOL 初期化ファイルにも設
定が必要です。
PowerRDBconnector 動作環境ファイル(DBIO_ENV) の記述例
; PowerRDBconnector 動作環境ファイル
ServerName=snake
ProviderName=OCI
TableLock=ON
3.1.5
COBOL 初期化ファイル
COBOL 初期化ファイルには、ASSIGN 句のファイル識別名とデータベースのテーブル、ビューとの関連付けを行います。
関連付けの指定方法として、次の方法があります。
・ COBOL 初期化ファイルに指定する方法
・ 環境変数に指定する方法
・ web の場合には実行環境ユーティリティでファイル(web.config)に指定する方法
本マニュアルは COBOL 初期化ファイルに定義する場合を例に記載します。詳しくは、NetCOBOL のマニュアルを参照してください。
COBOL 初期化ファイルの書式
ファイル識別名=TableName=<テーブル名またはビュー名>&SchemaName=<スキーマ名>&AccessMode=<アクセ
スモード>&TableLock=<テーブルロック>,ファイル識別名定数
・ テーブルおよびビュー毎にファイル識別名を記述します。
・ ASCII コード、シフト JIS コード(JIS X 0208-1990)または UTF-8 コードのテキストファイルで記述します。
ただし、UTF-8 の文字コードで作成する場合は、以下の点に注意してください。
- BOM 付きの UTF-8 の文字コード系のテキストファイルとして作成してください。
- COBOL 初期化ファイルの内容はシフト JIS 範囲内の文字で記述してください。
- スキーマ名、表名に、JIS X 0213:2004 に対応した文字セット(JIS2004)で追加された文字などのシフト JIS 範囲外の文字は、
エラーとなることがあるため、使用しないでください。
- UTF-8 コードの COBOL 初期化ファイルは、NetCOBOL V10.0.0 から使用できます。
・ プロパティ名と値は = でつなぎます。 = の前後に空白、タブなどは記述できません。
・ プロパティ名=値 は & でつなぎます。 & の前後に空白、タブなどは記述できません。
・ 大文字・小文字を区別します。
・ ファイル識別名定数の前は、 , (カンマ)で区切ります。
各変数の指定方法を以下に示します。
- 37 -
COBOL 初期化ファイル
表 3.9 COBOL 初期化ファイルのプロパティ
プロパティ名
ファイル識別名
指定
有無
必須
値と意味
SELECT 句(ファイル記述項)の ASSIGN 句に指定したファイル識別名
を指定します。
COBOL のファイル名をデータベースのテーブルまたはビューに割り付
けます。
ファイル識別名に対するテーブル名またはビュー名を指定します。
TableName
必須
半角英数字、記号で 30 文字以内の値を指定します。全角で 15 文字以
内の値を指定します。記号はアンダーバー(_)のみ指定できます。先頭
に数字は指定できません。
テーブル名、ビュー名以外に、シノニムは指定可能ですが、データベー
ス・リンクは指定できません。
ファイル識別名に対するテーブルの所有者名を指定します。
SchemaName
必須
半角英数字、記号で 30 文字以内の値を指定します。指定できる記号は
Oracle の仕様に準じます。
先頭に数字は指定できません。
ファイル識別名に対するアクセスモードを指定します。
以下に指定値と意味を示します。
・ "SEQUENTIAL"
順呼出し
・ "RANDOM"
AccessMode
必須
乱呼出し
・ "DYNAMIC"
動的呼出し
本モードは COBOL アプリケーションの ACCESS MODE 句に指定する
値と同意です。入出力文 COBOL アプリケーションの ACCESS MODE
句の指定と異なる場合は、動作保証できません。
OUTPUT モードでのオープン処理を高速に行う場合、テーブル名を指
定します。
Truncate
選択
(注意が
必要)
なお、ファイル識別名にビューを指定している場合は、導出元テーブル
名を指定します。
Truncate を使用する場合の注意事項については、「4.1.4.6 OUTPUT
モードの OPEN 文での Truncate プロパティ」や、「4.2.3.5 OUTPUT モー
ドのオープンの使用について」を参照してください。
テーブルロックの使用有無を指定します。以下に指定値と意味を示しま
す。
・ "ON"
TableLock
選択
テーブルロックを行います。
・ "OFF"
テーブルロックは行わず、レコードロックとなります。
省略した場合、OFF を指定したものとして動作します。
- 38 -
プロパティ名
指定
有無
値と意味
テーブルロックについて、詳しくは「3.5.3 テーブルロック機能」を参照し
てください。
後方空白補正の有無を指定します。以下に指定値と意味を示します。
・ "ON"
後方空白補正を行います。
Suppress
選択
・ "OFF"
後方空白補正を行いません。
省略した場合は、PowerRDBconnector 動作環境ファイルで指定された
Suppress プロパティが有効となります。
詳細は、「3.7.1 後方空白補正」を参照してください。
ファイル識別名定数
必須
識別値 "RDM" を指定します。
シングルセッションプログラミングの場合、動的プログラム構造で、トラン
ザクションサブルーチンまたは認証情報登録サブルーチンを使用する場
合は、エントリ情報を記述してください。エントリ情報は COBOL 初期化
ファイル(COBOL85.CBR)に記述します。
@CBR_ENTRYFILE=エントリ情報ファイル名
エントリ情報ファイルの内容は、以下の形式で記述します。
エントリ情報
選択
[ENTRY]
;トランザクションサブルーチン
XMROTSTR=F3BWS1CB.DLL
XMROTEND=F3BWS1CB.DLL
XMROTCNL=F3BWS1CB.DLL
XMROTRBK=F3BWS1CB.DLL
; 認証情報登録サブルーチン
XMROAUTH=F3BWS1SB.DLL
詳しくは、NetCOBOL のマニュアルを参照してください
マルチセッションプログラミングの場合は、エントリ情報は必要ありませ
ん。
COBOL 初期化ファイル(COBOL85.CBR)の記述例
COBOL の索引ファイルのファイル識別名 EMPLOYEE をテーブル名 employee で所有者(スキーマ名) SCOTT に、COBOL の索引
ファイルのファイル識別名 CUSTOMER をテーブル名 customer で所有者(スキーマ名) SCOTT に対応付け、エントリ情報ファイルに
ENTRY.ENT を使用するための記述です。
(1)COBOL 初期化ファイル(COBOL85.CBR)の記述例
EMPLOYEE=TableName=employee&SchemaName=SCOTT&AccessMode=RANDOM&Suppress=OFF,RDM
CUSTOMER=TableName=customer&SchemaName=SCOTT&AccessMode=RANDOM&Suppress=OFF,RDM
@CBR_ENTRYFILE=ENTRY.ENT
(2)エントリ情報ファイル(ENTRY.ENT)の記述例
[ENTRY]
;トランザクションサブルーチン
XMROTSTR=F3BWS1CB.DLL
XMROTEND=F3BWS1CB.DLL
XMROTCNL=F3BWS1CB.DLL
- 39 -
XMROTRBK=F3BWS1CB.DLL
; 認証情報登録サブルーチン
XMROAUTH=F3BWS1SB.DLL
注意
エントリ情報ファイルは、NetCOBOL for Windows の場合のみ必要です。
コンパイル方法
3.1.6
ここでは、翻訳オプションおよび、リンクの方法を説明します。
PowerRDBconnector を使用する COBOL アプリケーションをコンパイルする場合、必要に応じた翻訳オプションを設定し、NetCOBOL
でコンパイルしてください。その後、NetCOBOL のリンカを利用して PowerRDBconnector のサブルーチンをリンクします。
NetCOBOL for Windows でのコンパイル方法
3.1.6.1
[翻訳オプション]
PowerRDBconnector に関連する翻訳オプションを説明します。各オプションについての詳細は、「NetCOBOL のマニュアル」を参照し
てください。
表 3.10 NetCOBOL for Windows の翻訳オプション
翻訳オプション名
機能
ASCOMP5
2 進項目の解釈の指定
DLOAD
プログラム構造の指定
注意事項
NONE 以外を指定しないでください。
DLOAD:動的プログラム構造
NODLOAD:動的リンク構造
SJIS:シフト JIS
RCS
実行時コード系の指定
UCS2:unicode(注 1)
UTF16:unicode/JIS2004(注 2)
THREAD
マルチスレッドプログラム
作成の指定
SINGLE のみを指定してください。
MULTI は指定しないでください。
(注 1)
NetCOBOL V10.0.0 の場合、RCS オプションの UCS2 は UTF16 と同じ意味です。しかし本書では、NetCOBOL V10.0.0 以外のと
きと区別するため、NetCOBOL V10.0.0 の RCS オプションに unicode を指定する場合は UTF16 と記載します。
(注 2)
NetCOBOL V10.0.0 から、RCS オプションに、UTF16 が指定可能です。
例)翻訳オプションの指定例を以下に 2 つ示します。
・ COBOL ソースの先頭に、「@OPTIONS ASCOMP5(NONE),DLOAD,RCS(SJIS)」と記述します。
・ 翻訳オプションに、「/wc,”ASCOMP5(NONE),DLOAD,RCS(SJIS)”」と記述します。
[動的プログラム構造の場合]
NetCOBOL の翻訳時に以下の翻訳オプションを指定します。
- 40 -
翻訳オプション:DLOAD
リンク方法について、詳しくは NetCOBOL のマニュアルを参照してください。
さらに実行時、COBOL 初期化ファイル(COBOL85.CBR)にエントリ情報(@CBR_ENTRYFILE)を指定します。エントリ情報の指定方
法については、「3.1.5 COBOL 初期化ファイル」を参照してください。
なお、本製品が提供するサブルーチンは、PowerRDBconnector が提供するシステムライブラリです。COBOL アプリケーションに静的
リンクしないでください。
[動的リンク構造の場合]
NetCOBOL の翻訳時に以下の翻訳オプションを指定します。
翻訳オプション:NODLOAD
さらに、以下のインポートライブラリをリンクしてください。
表 3.11 シングルセッションプログラミングのインポートライブラリ
ファイル名
格納ディレクトリ
・ Oracle9i の場合
PowerRDBconnector インストールディレクトリ¥ORA9i
F3BWS1CB.LIB
・ Oracle10g の場合
PowerRDBconnector インストールディレクトリ¥ORA10g
F3BWS1SB.LIB
・ Oracle11g の場合
PowerRDBconnector インストールディレクトリ¥ORA11g
リンク方法について、詳しくは NetCOBOL のマニュアルを参照してください。
なお、本製品が提供するサブルーチンは、PowerRDBconnector が提供するシステムライブラリです。COBOL アプリケーションに静的
リンクしないでください。
[使用可能なサブルーチン]
NetCOBOL for Windows から以下のサブルーチンを呼び出すことができます。
表 3.12 NetCOBOL for Windows で使用可能なサブルーチン一覧
機能
サブルーチン名
トランザクションの開始
XMROTSTR
トランザクションの確定
XMROTEND
トランザクションの取消し
XMROTCNL
テーブルロック解除時のトランザクションの取消し
XMROTRBK
認証情報の登録
XMROAUTH
上記サブルーチンの使い方は、「3.4.2 トランザクションの使用方法(シングルセッション)」、「3.3.2 データベース認証の使用方法(シン
グルセッション)」を参照してください。
- 41 -
NetCOBOL for .NET でのコンパイル方法
3.1.6.2
[翻訳オプション]
PowerRDBconnector の動作に影響のある翻訳オプションについて以下に示します。各オプションの使用方法については、NetCOBOL
のマニュアルを参照してください。
表 3.13 NetCOBOL for .NET の翻訳オプション
翻訳オプション名
機能
ASCOMP5
2 進項目の解釈の指定
注意事項
NONE 以外を指定しないでください。
SJIS:シフト JIS
RCS
実行時コード系の指定
UTF8-UCS2:unicode
SJIS-UCS2:英数字項目がシフト JIS、日本語項目が
unicode(注 1)
SHREXT
ファイル共用の指定
SHREXT:ファイル共用
NOSHREXT:ファイル共用なし
platform
生成されるファイルが動
作するプラットフォームの
指定
通常省略できますが、Windows Server 2003 (x64)で動作
させる場合は、x86 と指定してください。
注 1)
RCS オプションの SJIS-UCS2 の指定は「NetCOBOL for .NET V2.1L20」から用意されていますが、SJIS-UCS2 は、以下の環境で
使用できます。
- 「NetCOBOL for .NET V3.0/V3.1」を用いてコンパイルし、セッションを指定し実行した場合。
注 2)
NetCOBOL for .NET には、マルチスレッドプログラムについての翻訳オプションはありません。NetCOBOL for .NET で翻訳した場
合、マルチスレッドプログラムとなります。マルチスレッドプログラムでも実行環境によって、ASP.NET のように Web で動作させる場
合にはマルチスレッドとして動作したり、コンソールアプリケーションのようにシングルスレッド(プロセス)プログラムとして動作したり
します。
例)
翻訳オプションの指定例を以下に 2 つ示します。
- COBOL ソースの先頭に、「@OPTIONS ASCOMP5(NONE),SHREXT,RCS(SJIS)」と記述します。
- 翻訳オプションに、「/wc:” ASCOMP5(NONE),SHREXT,RCS(SJIS)”」と記述します。
[リンク方法]
NetCOBOL for .NET は、全てマルチスレッドプログラムとして翻訳されます。マルチスレッドの COBOL アプリケーションから
PowerRDBconnector を呼び出す場合、セッションを制御してください(マルチセッションプログラム)。セッションを制御しないシングル
セッションプログラムと、マルチセッションプログラムとでは、サブルーチンの使用方法が異なります。それぞれ使い方を示します。
シングルセッションプログラミングの場合
シングルセッションプログラミングの場合、「表 3.14 シングルセッションプログラミングで使用可能なサブルーチン一覧」に示すサブルー
チンが使用できます。
- 42 -
なお、NetCOBOL for .NET から以下のサブルーチンを呼び出す場合は、プログラム原型を定義してください。プログラム原型につい
ては、NetCOBOL のマニュアルを参照してください。
プログラム原型のサンプルについては、「付録 C 開発用サンプル情報」を参照してください。
表 3.14 シングルセッションプログラミングで使用可能なサブルーチン一覧
機能
サブルーチン名
トランザクションの開始
XMROTSTR
トランザクションの確定
XMROTEND
トランザクションの取消し
XMROTCNL
テーブルロック解除時のトラ
ンザクションの取消し
XMROTRBK
認証情報の登録
XMROAUTH
上記サブルーチンの使い方は、「3.4.2 トランザクションの使用方法(シングルセッション)」、「3.3.2 データベース認証の使用方法(シン
グルセッション)」を参照してください。
マルチセッションプログラミングの場合
マルチセッションプログラミングの場合、「表 3.15 マルチセッションプログラミングで使用可能なサブルーチン一覧」に示すサブルーチ
ンが使用できます。
なお、NetCOBOL for .NET から以下のサブルーチンを呼び出す場合は、プログラム原型の定義は必要ありません。
表 3.15 マルチセッションプログラミングで使用可能なサブルーチン一覧
機能
サブルーチン名
トランザクションの開始
トランザクションの確定
トランザクションの取消し
COB_PRDB_TRAN
テーブルロック解除時のトラ
ンザクションの取消し
セッションの開設
COB_PRDB_START
セッションの閉設
COB_PRDB_END
認証情報の登録
COB_PRDB_AUTH
上記サブルーチンの使い方は、「3.4.3 トランザクションの使用方法(マルチセッション)」、「3.3.3 データベース認証の使用方法(マル
チセッション)」を参照してください。
マルチセッションプログラミングの場合の注意事項を以下に示します。
・ シングルセッションプログラミングで使用可能なサブルーチンとマルチセッションプログラミングで使用可能なサブルーチンは、混
在して使用できません。
・ エントリ情報は必要ありません。
- 43 -
3.2
セッションの制御方法
本節では、マルチセッションプログラミングスタイルで使用するセッションの制御方法について説明します。
3.2.1
セッションの制御方法
PowerRDBconnector をマルチセッションプログラミングで使用する場合、アクセス文やサブルーチンが、どのセッションで動作するかを
特定するために、セッションを指定します。
PowerRDBconnector のセッションは、以下のように指定します。
図 3.3 セッションサブルーチンの使用方法
COBOL アプリケーションから以下のサブルーチンを CALL 文で呼び出すことで、セッションの制御ができます。
表 3.16 セッション指定サブルーチンの一覧
機能
サブルーチン名
セッションの開設
COB_PRDB_START
セッションの閉設
COB_PRDB_END
セッション開設後の初回 OPEN 文でデータベースに接続されます。セッション閉設時にデータベースから切り離されます。使用例として
「図 3.4 セッションサブルーチンの使用例」、「3.2.3 セッションの使用例」を参照してください。
セッションサブルーチン使用時は、以下の点に注意してください。
・ セッションを開設していないプログラムは、シングルセッションプログラムとして解釈されます。
・ シングルセッションプログラミングの場合、セッションサブルーチンの呼出しは不要です。
- 44 -
・ 一度セッションを開設したプログラムは、セッションを閉設しても、シングルセッションプログラムとして、OPEN 文を呼び出すことは
できません。
・ セッションは、“セッション ID”という文字列で管理され、COBOL アプリケーションから、セッションサブルーチンのパラメーターとし
て指定します。
・ PowerRDBconnector へのセッションとデータベースへのセッションは、1 対 1 に対応しています。
・ NetCOBOL for .NET V3.0/V3.1 のみ使用できます。それ以外の NetCOBOL では使用できません。
・ セッションサブルーチンは、COBOL 初期化ファイルのエントリ情報は不要です。
・ 1つのスレッドで、セッションを開設後、閉設する前に別のセッションを開設しないでください。
セッションサブルーチンのインターフェース
3.2.2
セッションサブルーチンのインターフェースは、以下のとおりです。
セッション開設サブルーチンのインターフェース
3.2.2.1
・ 機能
PowerRDBconnector へのセッションを開設します。
・ 呼出し形式
CALL “COB_PRDB_START”
USING BY REFERENCE セッション ID RETURNING
復帰値.
・ パラメーターのデータ定義
01 セッション ID
01 復帰値
PIC X(30).
PIC S9(9) COMP-5.
※上記は全て、必ずレベル番号 01 で記載してください。
・ パラメーターの意味
- セッション ID(必須)
英数字項目 30 バイト以内で指定します。
文字の種類の制約はありません。途中に空白がある場合、空白以降の文字は切り捨てられるため、空白の入らない連続した
文字列を指定してください。
なお、本パラメーターは必ず指定してください。
・ 復帰値
復帰値は、以下のとおりです。
表 3.17 COB_PRDB_START サブルーチンの復帰値
復帰値
意味
イベントログ出力の有無
0
正常
なし
-1
エラー
あり
-2
内部矛盾
あり
- 45 -
復帰値
意味
イベントログ出力の有無
-200
PowerRDBconnector がインストールされていない、または動作でき
る環境ではありません。
なし
・ 注意事項
本サブルーチンの注意事項を以下に示します。
- 本サブルーチンが実行された以降はマルチセッションプログラミングとして解釈されます。このため、以下のシングルセッション
で使用するサブルーチンは使用できません。
XMROTSTR、XMROTEND、XMROTCNL、XMROTRBK、XMROAUTH
本サブルーチンではデータベースへの接続は行われません。データベースへの接続は初回オープン時に行われます。また、デー
タベースへの接続は COB_PRDB_END サブルーチンが呼び出されるまで保持されます。
セッション閉設サブルーチンのインターフェース
3.2.2.2
・ 機能
PowerRDBconnector へのセッションを閉設します。
・ 呼出し形式
CALL “COB_PRDB_END”
USING BY REFERENCE セッション ID RETURNING 復帰値.
・ パラメーターのデータ定義
01 セッション ID
01 復帰値
PIC X(30).
PIC S9(9) COMP-5.
※上記は全て、必ずレベル番号 01 で記載してください。
・ パラメーターの意味
- セッション ID(必須)
英数字項目 30 バイト以内で指定します。
文字の種類の制約はありません。途中に空白がある場合、空白以降の文字は切り捨てられるため、空白の入らない連続した
文字列を指定してください。
なお、本パラメーターは必ず指定してください。
・ 復帰値
復帰値は、以下のとおりです。
表 3.18 COB_PRDB_END サブルーチンの復帰値
復帰値
意味
イベントログ出力の有無
0
正常
なし
-1
エラー
あり
-2
内部矛盾
あり
セッション ID の指定が正しくありません。
なし
-201
- 46 -
・ 注意事項
本サブルーチンの注意事項を以下に示します。
- 本サブルーチンが実行されても、プロセスが終了するまではマルチセッションプログラミングとして解釈されます。このため、以
下のシングルセッションで使用するサブルーチンは使用できません。
XMROTSTR、XMROTEND、XMROTCNL、XMROTRBK、XMROAUTH
- 本サブルーチンは、同一セッションでオープンした全てのファイルをクローズした後、呼び出してください。未クローズのファイ
ルがある場合、本サブルーチンは、エラーとなります。
- 同一セッションで本サブルーチンを複数回呼び出した場合、2 回目以降の呼出しは無効となり正常終了します。
- 指定されたセッション ID が一度も開設されていない場合、本サブルーチンはエラー終了します。
セッションサブルーチンでエラーが発生した場合は、エラー情報が Windows のイベントログ(アプリケーションログ)へ出力されます。
エラー情報は、「5.1.4 セッションサブルーチンのエラー情報」を参照してください。
図 3.4 セッションサブルーチンの使用例
3.2.3
セッションの使用例
セッションが必要な使用例のモデルを以下に示します。
(1) Internet Explorer の画面経由の使用例
Internet Explorer の画面に対応した、ASP.NET のプログラムを呼び出す場合。
- 47 -
図 3.5 セッション使用例 1
この場合、PowerRDBconnector のセッションと、IIS のセッションとが 1 対 1 に対応するようにして、データベースにアクセスする COBOL
プログラムを開発します。
ASP.NET の場合、端末と IIS のスレッドが固定化されないため、1 回のアクセスのたびに、セッションの開設からセッションの閉設まで
を行ってください。
3.3
認証
本節では、PowerRDBconnector の認証機能について説明します。
PowerRDBconnector は、Oracle が備えている 2 つの認証機能のどちらの方法でも使用可能です。
以下に認証方法毎の長所と短所を示します。
表 3.19 認証方法毎の長所と短所
認証方法
OS 認証
データベース認
証
長所
サブルーチンを使用しなくても、PowerRDBconnector を使用でき
るため、データベース認証を使用するよりも COBOL プログラムの
開発が簡単になります。
COBOL プログラム内で認証情報を扱わないため、プログラム誤
りによるセキュリティホールを作りこむリスクが少なくなります。
短所
Oracle の設定が複雑です。
長所
Oracle の設定が簡単です。
- 48 -
認証方法
短所
サブルーチンを使用する必要があるため、OS 認証を使用するよりも
COOBOL プログラムの開発が複雑になります。
COBOL プログラム内で認証情報を扱うため、セキュリティを意識
して開発する必要があります。
OS 認証の使用方法
3.3.1
以下の方法により、OS 認証が使用できます。
1. Windows 上で、COBOL アプリケーションを起動するドメインまたはコンピュータのユーザーをサーバに定義し、ORA_DBA または
ORA_OPER グループに属するように変更します。
2. Oracle 上で、COBOL アプリケーションを起動するドメインまたはコンピュータのユーザーを"Oracle Administration Assistant "を
使用して外部 OS ユーザーを追加し、必要な権限(DBA 権限など)をロールとして付与します。
なお OS 認証は、シングルセッションプログラムとマルチセッションプログラムの両方で使用できます。
OS 認証を使用する場合、COBOL アプリケーションおよび PowerRDBconnector への設定は必要ありません。OS 認証の詳細につい
ては、Oracle のマニュアルを参照してください。
3.3.2
データベース認証の使用方法(シングルセッション)
シングルセッションプログラミングでの、データベース認証の使用方法について説明します。
データベース認証を行う場合、特に Oracle に設定は必要ありません。
CALL 文で認証情報登録サブルーチン(XMROAUTH)を呼び出すことで、データベース認証を行います。
3.3.2.1
データベース認証の動作概要(シングルセッション)
データベース認証は、以下のように動作します。
・ 認証情報登録サブルーチンは、指定された認証情報を内部的に記憶します。
・ 実際のデータベースへの認証や接続は、プロセス初回または、全ファイルクローズ後の次の OPEN 文実行時となります。認証に
失敗すると、OPEN 文でエラーとなります。
・ データベースに接続するまでに、2 回以上呼び出すと、後から指定された認証情報が有効となります。
図 3.6 認証情報登録サブルーチンの使用方法
認証情報登録サブルーチンを使用する場合は、以下の点に注意してください。
・ 認証情報登録サブルーチンを動的プログラム構造で使用する場合は、COBOL 初期化ファイルにエントリ情報の記述が必要で
す。詳しくは、NetCOBOL のマニュアルを参照してください。
例)エントリ情報ファイル(ENTRY.ENT)を指定する場合
- 49 -
COBOL 初期化ファイル(COBOL85.CBR)
@CBR_ENTRYFILE=ENTRY.ENT
エントリ情報ファイル(ENTRY.ENT)
[ENTRY]
; 認証情報登録サブルーチン
XMROAUTH=F3BWS1SB.DLL
認証情報登録サブルーチンは、PowerRDBconnector が提供するシステムライブラリです。COBOL アプリケーションに静的リンクし
ないでください。詳しくは、「3.1.6 コンパイル方法」および「NetCOBOL 使用手引書」を参照してください。
・ 認証情報登録サブルーチンは、初回の OPEN 文より前に実行してください。既に OPEN 文実行後に、認証情報登録サブルーチ
ンを呼び出してもシーケンスエラーとなりません。
次のプロセス初回の OPEN 文実行時に、登録した認証情報を使用してデータベースに接続されます。
・ 指定された認証情報は、そのままデータベースに渡されます。このため、認証情報の制約(文字数、使用可能文字など)はデータ
ベースの仕様に準じます。
・ 認証種別にデータベース認証を指定し、認証情報登録サブルーチンを実行した場合、以下の処理を行うまで、データベース認証
が適用されます。
- プロセスの終了。
- 認証種別に OS 認証を指定した認証情報登録サブルーチンの再呼出し。
・ データベース認証は、データベースのユーザー名とパスワードをプログラムで扱うため、セキュリティに注意してください。詳しくは、
「4.2.5.2 セキュリティについて」を参照してください。
3.3.2.2
認証情報登録サブルーチンのインターフェース(シングルセッション)
認証情報登録サブルーチンのインターフェースは、以下のとおりです。
認証情報の登録
・ 機能
データベースに対する認証情報を登録します。
・ 呼出し形式
CALL “XMROAUTH”USING
認証用登録情報 エラー情報 RETURNING 復帰値.
・ パラメーターのデータ定義
01 認証用登録情報.
02 認証種別
02 ユーザー名長
02 ユーザー名
02 パスワード長
02 パスワード
01 エラー情報.
02 終了情報
02 詳細情報
PIC 9(9) COMP-5.
PIC 9(9) COMP-5.
PIC X(260).
PIC 9(9) COMP-5.
PIC X(260).
PIC S9(9) COMP-5.
PIC S9(9) COMP-5.
- 50 -
02 FILLER
01 復帰値
PIC S9(9) VALUE 0.
PIC S9(9) COMP-5 VALUE 0.
※上記は、必ずレベル番号 01 で記載してください。
※FILLER は、0 を設定してください。
・ パラメーターの意味
- 認証種別(必須)
認証の種別を指定します。
1:OS 認証
2:データベース認証
- ユーザー名長
データベース認証のユーザー名の長さを 10 進数のバイト長で指定します。1 から 256 まで指定できます。データベース認証
の場合、必要です。
- ユーザー名
データベース認証のユーザー名を指定します。最大 256 バイトまで指定できます。データベース認証の場合、必要です。
- パスワード長
データベース認証のパスワードの長さを 10 進数のバイト長で指定します。1 から 256 まで指定可能です。データベース認証
の場合、必要です。
- パスワード
データベース認証のパスワードを指定します。最大 256 バイトまで指定できます。データベース認証の場合、必要です。
- 終了情報/詳細情報
終了情報および詳細情報については、「表 5.8 認証情報登録サブルーチン終了コード」を参照してください。
・ 復帰値
復帰値は、以下のとおりです。
表 3.20 XMROAUTH サブルーチンの復帰値
復帰値
意味
イベントログ出力の有無
0
正常
なし
-1
エラー
なし
認証情報登録サブルーチンでパラメーターエラーが発生した場合は、エラー情報にエラーコードが通知され、認証情報の登録は行わ
れません。Windows のイベントログ(アプリケーションログ)へエラー情報は出力されません。エラー情報は、「5.1.3 認証情報登録サブ
ルーチンのエラー情報」を参照してください。
「図 3.7 認証情報登録サブルーチンの使用例」に使用例を示します。
- 51 -
図 3.7 認証情報登録サブルーチンの使用例
3.3.3
データベース認証の使用方法(マルチセッション)
マルチセッションプログラミングでの、データベース認証の使用方法について説明します。
データベース認証を行う場合、特に Oracle に設定は必要ありません。
CALL 文で認証情報登録サブルーチン(COB_PRDB_AUTH)を呼び出すことで、データベース認証を行います。
3.3.3.1
データベース認証の動作概要(マルチセッション)
データベース認証は、以下のように動作します。
・ 認証情報登録サブルーチンは、指定された認証情報を内部的に記憶します。
・ 実際のデータベースへの認証や接続は、セッション開始後、初回 OPEN 文実行時となります。認証に失敗すると、OPEN 文でエ
ラーとなります。
・ データベースに接続するまでに、2 回以上呼び出すと、後から指定された認証情報が有効となります。
- 52 -
図 3.8 認証情報登録サブルーチンの使用方法
認証情報登録サブルーチンを使用する場合は、以下の点に注意してください。
・ 認証情報登録サブルーチンを使用する場合には、まずセッションの開設を行ってください。
・ 認証情報登録サブルーチンは、初回の OPEN 文より前に実行してください。OPEN 文実行後に、認証情報登録サブルーチンを
呼び出してもシーケンスエラーとなりません。
セッション閉設後、再度 OPEN 文を実行した場合は、登録された認証情報を使用してデータベースに接続されます。
・ 指定された認証情報は、そのままデータベースに渡されます。このため、認証情報の制約(文字数、使用可能文字など)はデータ
ベースの仕様に準じます。
・ 認証種別にデータベース認証を指定し、認証情報登録サブルーチンを実行した場合、以下の処理を行うまで、データベース認証
が適用されます。
- セッションの閉設。
- 認証種別に OS 認証を指定した認証情報登録サブルーチンの再呼出し。
・ データベース認証は、データベースのユーザー名とパスワードをプログラムで扱うため、セキュリティに注意してください。詳しくは、
「4.2.5.2 セキュリティについて」を参照してください。
3.3.3.2
認証情報登録サブルーチンのインターフェース(マルチセッション)
認証情報登録サブルーチンのインターフェースは、以下のとおりです。
- 53 -
認証情報の登録
・ 機能
データベースに対する認証情報を登録します。
・ 呼出し形式
CALL "COB_PRDB_AUTH" USING BY REFERENCE セッション ID BY REFERENCE 認証用登録情報
BY REFERENCE エラー情報 RETURNING 復帰値.
・ パラメーターのデータ定義
01 セッション ID
01 認証用登録情報.
02 認証種別
02 ユーザー名長
02 ユーザー名
02 パスワード長
02 パスワード
01 エラー情報.
02 終了情報
02 詳細情報
02 FILLER
01 復帰値
PIC X(30).
PIC 9(9) COMP-5.
PIC 9(9) COMP-5.
PIC X(260).
PIC 9(9) COMP-5.
PIC X(260).
PIC S9(9) COMP-5.
PIC S9(9) COMP-5.
PIC S9(9) VALUE 0.
PIC S9(9) COMP-5 VALUE 0.
※上記は、必ずレベル番号 01 で記載してください。
※FILLER は、0 を設定してください。
・ パラメーターの意味
- セッション ID(必須)
英数字項目 30 バイト以内で指定します。
文字の種類の制約はありません。途中に空白がある場合、空白以降の文字は切り捨てられるため、空白の入らない連続した
文字列を指定してください。なお、本パラメーターは必ず指定してください。
- 認証種別(必須)
認証の種別を指定します。
1:OS 認証
2:データベース認証
- ユーザー名長
データベース認証のユーザー名の長さを 10 進数のバイト長で指定します。1 から 256 まで指定できます。データベース認証
の場合、必要です。
- ユーザー名
データベース認証のユーザー名を指定します。最大 256 バイトまで指定できます。データベース認証の場合、必要です。
- パスワード長
データベース認証のパスワードの長さを 10 進数のバイト長で指定します。1 から 256 まで指定可能です。データベース認証
の場合、必要です。
- パスワード
データベース認証のパスワードを指定します。最大 256 バイトまで指定できます。データベース認証の場合、必要です。
- 54 -
- 終了情報/詳細情報
終了情報および詳細情報については、「表 5.8 認証情報登録サブルーチン終了コード」を参照してください。
・ 復帰値
復帰値は、以下のとおりです。
表 3.21 COB_PRDB_AUTH サブルーチンの復帰値
復帰値
イベントログ出力の有無
0
正常
なし
-1
エラー
あり
セッション ID の指定が正しくありません。
なし
-201
3.4
意味
トランザクション
本節では、トランザクション機能の作り方について説明します。
3.4.1
トランザクション機能とは
トランザクション機能とは、アプリケーションのデータのやりとりを1単位(トランザクション単位)に分割、その単位で処理を保証し、複数
ファイルおよび複数レコード間の一貫性を保証する機能です。
トランザクション機能により、アプリケーションプログラムの実行中に何らかのエラーが発生したときに、トランザクション単位に処理を取
り消すことができます。
アプリケーションプログラムが中断した場合には、実行中であったトランザクションを取り消し、アプリケーションプログラムがファイルに
与える影響を局所化し、アプリケーションプログラムの再実行を容易に行うことができます。
3.4.2
3.4.2.1
トランザクションの使用方法(シングルセッション)
トランザクションプログラム(シングルセッション)
PowerRDBconnector は、“トランザクションの開始”、“トランザクションの確定”、および“トランザクションの取消し”の 3 種類のサブルー
チンを、COBOL アプリケーションから呼び出すことで、トランザクション機能を実現します。
以下に、トランザクションサブルーチンの使用方法を示します。
- 55 -
図 3.9 トランザクションサブルーチンの使用方法(シングルセッション)
トランザクションサブルーチンを以下に示します。
表 3.22 トランザクションサブルーチンの一覧
トランザクション
サブルーチン名
開始
XMROTSTR
確定
XMROTEND
取消し
XMROTCNL
テーブルロック解除時の取消し※
XMROTRBK
※:トランザクションを使用せず、テーブルロック区間内で更新されたレコードを、テーブルロック解除時に、更新前に戻す場合に使用
します。詳細は、「3.5.3.2 テーブルロック解除時のトランザクション取消し機能」を参照してください。
トランザクションは、以下のように動作します。
・ トランザクションを開始していない場合は、データベースのオートコミット機能で動作します。
・ トランザクション分離レベルは、ReadCommitted が使用されます。
・ トランザクションは、セッション単位に開始、確定、取消しが行われます。
3.4.2.2
トランザクション使用時の注意事項(シングルセッション)
トランザクションの使用方法には、以下の注意事項があります。
・ トランザクションサブルーチンを動的プログラム構造で使用する場合は、COBOL 初期化ファイルにエントリ情報の記述が必要で
す。詳しくは、NetCOBOL のマニュアルを参照してください。
例)エントリ情報ファイル(ENTRY.ENT)を指定する場合
COBOL 初期化ファイル(COBOL85.CBR)
@CBR_ENTRYFILE=ENTRY.ENT
エントリ情報ファイル(ENTRY.ENT)
[ENTRY]
;トランザクションサブルーチン
XMROTSTR=F3BWS1CB.DLL
XMROTEND=F3BWS1CB.DLL
- 56 -
XMROTCNL=F3BWS1CB.DLL
XMROTRBK=F3BWS1CB.DLL
トランザクションサブルーチンは、PowerRDBconnector が提供するシステムライブラリです。COBOL アプリケーションに静的リンク
しないでください。詳しくは、「3.1.6 コンパイル方法」および「NetCOBOL 使用手引書」を参照してください。
・ 初回のトランザクションの開始は、OPEN 文発行後、かつ、他の入出力文(READ、WRITE、REWRITE、DELETE、START 文)を
発行する前に、呼び出してください。
また、トランザクションの確定および取消しは、最終の CLOSE 文を発行するより前に、呼び出してください。
・ トランザクションの確定および取消し後に、トランザクションを開始する場合は、トランザクション開始用のサブルーチンを再度呼び
出してください。
・ テーブルロックを指定したファイルのオープン中は、トランザクション操作(開始、確定、取消し)が無効となります。テーブルロック
についての詳細は、「3.5.3 テーブルロック機能」、「4.1.3.2 テーブルロック機能について」、「4.2.2.4 テーブルロックの排他制御に
ついて」を参照してください。
・ トランザクションを開始し、トランザクションの確定および取消しを実行しなかった場合は、トランザクションが取り消されます。具体
例を以下に示します。
- トランザクションの確定および取消しを実行せずに CLOSE 文を実行した場合。
- タスクマネージャで COBOL アプリケーションのプロセスを停止した場合。
- COBOL アプリケーションが、アプリケーションエラーで中断した場合
- COBOL アプリケーション動作中に、データベースサービスを中断またはネットワークを中断した場合。
3.4.2.3
トランザクションサブルーチンのインターフェース(シングルセッション)
トランザクションサブルーチンのインターフェースは、以下のとおりです。
(1)トランザクション開始
・ 機能
トランザクションの開始を宣言します。
トランザクション機能を使用するにあたって必ず発行してください。
・ 呼出し形式
CALL “XMROTSTR”
(2)トランザクション確定
・ 機能
現在のトランザクションを終了し、トランザクション中に更新された内容を全て確定します。
・ 呼出し形式
- 57 -
CALL “XMROTEND”
(3)トランザクション取消し
・ 機能
現在のトランザクションを終了し、トランザクション中に更新された内容を全て取り消します。
・ 呼出し形式
CALL “XMROTCNL”
(4)テーブルロック解除時のトランザクション取消し
・ 機能
テーブルロック解除時に、テーブルロック区間中に更新された内容を全て取り消します。
・ 呼出し形式
CALL “XMROTRBK”
・ 注意事項
本サブルーチンの注意事項を以下に示します。
- テーブルロックが有効な区間内で呼び出した場合のみ有効です。この範囲外で呼び出した場合には、無効となります。
- テーブルロック対象のファイル全てをクローズした後は、本サブルーチンの指定は無効となります。
詳細は、「3.5.3.2 テーブルロック解除時のトランザクション取消し機能」を参照してください。
トランザクションサブルーチンでシーケンスエラーやデータベースのエラーが発生した場合は、イベントログ(アプリケーションログ)へエ
ラー情報を出力後、COBOL アプリケーションは終了します。エラー情報は、「5.1.2 トランザクションアクセス時のエラー情報」を参照し
てください。トランザクションサブルーチンを使用する場合の注意については、「4.2.1 トランザクションに関する注意事項」を参照してく
ださい。
3.4.3
トランザクションの使用方法(マルチセッション)
トランザクションサブルーチンのインターフェースは、以下のとおりです。
3.4.3.1
トランザクションプログラム(マルチセッション)
PowerRDBconnector は、“トランザクションの開始”、“トランザクションの確定”、および“トランザクションの取消し”の 3 種類のサブルー
チンを、COBOL アプリケーションから呼び出すことで、トランザクション機能を実現します。
以下に、トランザクションサブルーチンの使用方法を示します。
- 58 -
図 3.10 トランザクションサブルーチンの使用方法(マルチセッション)
トランザクションサブルーチンを以下に示します。
表 3.23 トランザクションサブルーチンの一覧
トランザクション
サブルーチン名
開始
1
確定
取消し
パラメーター値
2
COB_PRDB_TRAN
3
テーブルロック解除時の取消し※
4
※:トランザクションを使用せず、テーブルロック区間内で更新されたレコードを、テーブルロック解除時に、更新前に戻す場合に使用
します。詳細は、「3.5.3.2 テーブルロック解除時のトランザクション取消し機能」を参照してください。
トランザクションは、以下のように動作します。
・ トランザクションを開始していない場合は、データベースのオートコミット機能で動作します。
- 59 -
・ トランザクション分離レベルは、ReadCommitted が使用されます。
・ トランザクションは、セッション単位に開始、確定、取消しが行われます。
3.4.3.2
トランザクション使用時の注意事項(マルチセッション)
トランザクションの使用には、以下の注意事項があります。
・ トランザクションサブルーチンを使用する場合は、必ずセッションの開設を行ってください。
・ 初回のトランザクションの開始は、OPEN 文発行後、かつ、他の入出力文(READ、WRITE、REWRITE、DELETE、START 文)を
発行する前に、呼び出してください。
また、トランザクションの確定および取消しは、最終の CLOSE 文を発行するより前に、呼び出してください。
・ トランザクションの確定および取消し後に、トランザクションを開始する場合は、トランザクション開始を再度呼び出してください。
・ テーブルロックを指定したファイルのオープン中は、トランザクション操作(開始、確定、取消し)が無効となります。
・ トランザクションを開始し、トランザクションの確定および取消しを実行しなかった場合は、トランザクションが取り消されます。具体
例を以下に示します。
- トランザクションの確定および取消しを実行せずに CLOSE 文を実行した場合。
- タスクマネージャで COBOL アプリケーションのプロセスを停止した場合。
- COBOL アプリケーションが、アプリケーションエラーで中断した場合
- COBOL アプリケーション動作中に、データベースサービスを中断またはネットワークを中断した場合。
・ マルチセッションプログラムの注意事項は、「4.1.3.8 マルチセッションプログラミングについて」や、「4.2.4 マルチスレッド使用時の
注意事項」を参照してください。
3.4.3.3
トランザクションサブルーチンのインターフェース(マルチセッション)
マルチセッションプログラミングを用いる場合のトランザクションサブルーチンのインターフェースは、以下のとおりです。
トランザクションの制御
・ 機能
マルチセッションプログラミングの場合のトランザクション制御を行います。
・ 呼出し形式
CALL “COB_PRDB_TRAN”USING BY REFERENCE セッション ID BY VALUE トランザクション種別 RETURNING 復帰値.
・ パラメーターのデータ定義
- 60 -
01 セッション ID
01 トランザクション種別
01 復帰値
PIC X(30).
PIC 9(9) COMP-5.
PIC S9(9) COMP-5.
※上記は全て、必ずレベル番号 01 で記載してください。
・ パラメーターの意味
- セッション ID(必須)
英数字項目 30 バイト以内で指定します。
文字の種類の制約はありません。途中に空白がある場合、空白以降の文字は切り捨てられるため、空白の入らない連続した
文字列を指定してください。
なお、本パラメーターは必ず指定してください。
- トランザクション種別(必須)
処理するトランザクション種別を指定します。
1:トランザクション開始
2:トランザクション確定
3:トランザクション取消し
4:テーブルロック解除時のトランザクション取消し
なお、本パラメーターは必ず指定してください。
・ 復帰値
復帰値は、以下のとおりです。
表 3.24 COB_PRDB_TRAN サブルーチンの復帰値
復帰値
意味
イベントログ出力の有無
0
正常
なし
-1
エラー
あり
-2
内部矛盾
あり
-3
トランザクション種別の指定に誤りがあります。
あり
-201
セッション ID の指定が正しくありません。
なし
-202
無効なトランザクション種別が指定されました。
なし
トランザクションサブルーチンでシーケンスエラーやデータベースのエラーが発生した場合は、イベントログ(アプリケーションログ)
へエラー情報を出力後、COBOL アプリケーションは終了しません。エラー情報は、「5.1.2 トランザクションアクセス時のエラー情
報」を参照してください。
・ 注意事項
トランザクションサブルーチンを使用する場合の注意については、「4.2.1 トランザクションに関する注意事項」を参照してください。
3.5
排他制御
本節では、PowerRDBconnector の排他制御について説明します。
- 61 -
3.5.1
排他制御の種類
Oracle では、排他を維持する区間はトランザクション単位のみとなります。このため本製品では、排他制御を実現するために強制的に
トランザクションを発生させることで、テーブルまたはレコードに対してロックを行います。(以後、この強制的に行っているトランザクショ
ンを強制トランザクションと呼びます。)強制トランザクション中にアプリケーションが強制終了された場合は、強制トランザクションが取り
消され、データが更新前に戻ります。
排他制御には、以下の 2 つの機能があります。
・ レコードロック機能
レコードロック機能とは、ある業務の START 文で位置付けたレコードや READ 文で読込んだレコードに対して、排他制御を行う
機能です。複数の端末から同じファイルにアクセスするオンラインアプリケーションに適しています。詳しくは、「3.5.2 レコードロック
機能」を参照してください。
・ テーブルロック機能
テーブルロック機能とは、ある業務で使用しているファイルのオープンからクローズまでの間に、他の業務からの該当ファイルへの
オープンに対して、排他制御を行う機能です。
COBOL 初期化ファイルと PowerRDBconnector 動作環境ファイルに TableLock プロパティを指定することで使用できます。1 つの
プログラムが実行中ファイルを占有するバッチ型業務に適しています。
レコードロックを獲得しているテーブルに対して、他の業務からテーブルロックで OPEN 文を実行すると、オープンは待合わせず
に排他エラーで即時に復帰します。
テーブルロック機能を使用する場合、テーブルロック対象のファイルに対するオープンからクローズまでの間を、強制的に 1 つの
トランザクション区間とすることで、テーブルロックを実現します。このため、オープンからクローズまでの区間でアプリケーションが
終了した場合、この区間の全ての更新が取り消されることとなります。詳しくは、「3.5.3 テーブルロック機能」を参照してください。
テーブルロック機能およびレコードロック機能の使用有無にかかわらず、以下の注意事項があります。
・ OUTPUT モードでオープンしたファイルに対して、同一プロセス内で二重にオープンすることはできません。
OUTPUT モードでオープンしたファイルに関するその他の注意については、「4.2.3.5 OUTPUT モードのオープンの使用につい
て」を参照してください。
・ 処理順序によっては、デッドロックが検出されることがあります。
排他制御の注意については、「4.2.2 排他制御に関する注意事項」を参照してください。
3.5.2
レコードロック機能
I-O モードでオープンした後、START 文で位置付けたレコードや、READ 文で読み込んだレコードに対して、レコードロックが獲得さ
れ、他の業務からの位置付けや読込み操作を待ち合わせさせる機能です。
なお、INPUT モードでオープンした場合、レコードロックの待ち合わせは発生しません。
トランザクションを適用した場合、アクセスした全てのレコードに対して、レコードロックが獲得され、他の業務からの読込み、更新や削
除の操作を待ち合わせさせることができます。
- 62 -
アクセスして獲得されたレコードロックは、トランザクションの確定または取消しで解放されます。
[レコードロック機能の使用方法]
PowerRDBconnector 動作環境ファイルの RecordLock プロパティに待機時間を秒数で指定してください。
待機時間
レコードが既にロックされていた場合の待機時間を秒数で 0 から 2147483647 の範囲で指定します。なお、0 を指定した場合は待
機せずに即時エラーとなります。
待機時間を変更する際は、アプリケーションで問題がないことを確認してください。
例)レコードロックの待機時間 10 秒の指定例
PowerRDBconnector 動作環境ファイル(DBIO_ENV)
; PowerRDBconnector 動作環境ファイル
ServerName=snake
ProviderName=OCI
RecordLock=10
レコードロックの指定時は、以下の注意が必要です。
・ PowerRDBconnector 動作環境ファイルにレコードロックの指定、テーブルロックの指定がともにない場合は、RecordLock プロパ
ティに待機時間 30 秒が指定されたものとみなします。
・ RecordLock プロパティと TableLock プロパティの指定は混在できません。混在で指定していてもエラーとならず、TableLock プロ
パティが有効となります。
また、レコードロックの注意事項として、「4.1.3.3 レコードロック機能について」、「4.2.3.6 読み取り一貫性に関する注意事項」を参照し
てください。
3.5.2.1
トランザクション未適用時のレコードロック
PowerRDBconnector では、レコードロックを実現するため、I-O モードでオープン後の READ 文で強制的にトランザクションを開始し
ています。読込んだ行をロックし、次の入出力文でトランザクションを終了させることで、ロックを解放します。
レコードロックの獲得中は、トランザクション操作(開始、確定、取消し)はエラーとなります。
1 つのプログラムで、複数のファイルを更新している場合は、全てのファイルでレコードロック解放タイミングの条件を満たした時点で、
レコードロックは解放されます。
強制的に開始するトランザクションの注意については、「4.2.2.3 レコードロックの排他制御について」を参照してください。
(1)レコードロック獲得
I-O モードでオープンし、以下の操作を行ったレコードに対してレコードロックを獲得します。
・ READ 文で読み込んだレコード
(2)レコードロック解放
獲得されたレコードロックは、以下の操作で解放されます。
- 63 -
表 3.25 トランザクション未適用時のレコードロック解放タイミング
アクセスモード
レコードロックの解放タイミング
・ START 文を実行した場合
・ 次のレコードを読み込んだ(READ)場合
SEQUENTIAL
・ 更新(REWRITE)、削除(DELETE)を行った場合
・ EOF を検出した場合
・ CLOSE 文を実行した場合
・ 読込み(READ)、更新(REWRITE)、削除(DELETE)を行った場合
RANDOM
・ CLOSE 文を実行した場合
・ START 文を実行した場合
・ 次のレコードを読み込んだ(READ)場合
・ 更新(REWRITE)、削除(DELETE)を行った場合
DYNAMIC
・ EOF を検出した場合
・ CLOSE 文を実行した場合
3.5.2.2
トランザクション適用時のレコードロック
(1)レコードロック獲得
I-O モード、OUTPUT モード、または EXTEND モードでオープンし、以下の操作を行った全てのレコードに対してレコードロックを獲
得します。
・ READ 文で読み込んだレコード
・ トランザクション中に REWRITE 文で更新したレコード
・ トランザクション中に DELETE 文で削除したレコード
・ トランザクション中に WRITE 文で追加したレコード
(2)レコードロック解放
獲得されたレコードロックは、以下の操作で解放されます。
・ トランザクションの確定または取消し
3.5.2.3
レコードロックの獲得待合わせ
レコードロックを獲得しているレコードに対して、別の COBOL アプリケーションから以下の操作を行うとレコードロック獲得の待合わせ
が発生します。
・ レコードロックの獲得
・ 乱呼出しの REWRITE 文および DELETE 文
レコードロック獲得の待合わせは、PowerRDBconnector 動作環境ファイルの RecordLock プロパティで指定できます。レコードロック獲
得の待合わせについては、「3.6 タイムアウト機能」を参照してください。
- 64 -
DELETE 文で削除したレコードにレコードロックが獲得され、WRITE 文でレコードロック獲得の待合わせが発生する場合があります。
詳しくは、「4.2.2.2 削除したレコードの待合せについて」、「4.2.3.6 読み取り一貫性に関する注意事項」を参照してください。
3.5.3
テーブルロック機能
テーブルロックは、オープン中に、他の業務からのオープンを防ぐ機能です。
3.5.3.1
テーブルロック機能の使用方法
PowerRDBconnector 動作環境ファイルと COBOL 初期化ファイルの TableLock プロパティに ON を指定することにより、OPEN 文で
テーブルロックを行います。テーブルロック対象の全てのテーブルをクローズすると、テーブルロックを解除します。
テーブルロックが有効なテーブルの OPEN 文で強制的にトランザクションを開始して CLOSE 文でトランザクションを確定することでテー
ブルロックを実現します。テーブルロックを指定したファイルのオープン中は、トランザクション操作(開始、確定、取消し)が無効となり
ます。
強制的に開始するトランザクションの注意については、「4.2.2.4 テーブルロックの排他制御について」を参照してください。
INPUT モードでオープンすると、Share(共有モード)でテーブルロックを行います。INPUT モードでテーブルロック指定のオープン後、
同一テーブルに対して別の COBOL アプリケーションから、レコードロック指定のオープンを防ぐことはできません。
INPUT 以外のモードでオープンすると、Exclusive(占有モード)でテーブルロックを行います。INPUT 以外のモードでオープンした後、
同一テーブルに対して別の COBOL アプリケーションからのオープンはできません。
[テーブルロック機能の使用方法]
PowerRDBconnector 動作環境ファイルの TableLock プロパティに ON を指定し、かつ COBOL 初期化ファイルの TableLock プロパ
ティにも ON を指定してください。
例)テーブルロックのファイル EMPLOYEE に対する記述例
PowerRDBconnector 動作環境ファイル(DBIO_ENV)
; PowerRDBconnector 動作環境ファイル
ServerName=snake
ProviderName=OCI
TableLock=ON
COBOL 初期化ファイル(COBOL85.CBR)
; COBOL 初期化ファイル
EMPLOYEE=TableName=employee&SchemaName=SCOTT
&AccessMode=RANDOM&TableLock=ON,RDM
テーブルロックの指定時は、全てのファイルがテーブルロックの対象となります。
表 3.26 テーブルロックの指定
PowerRDBconnector 動作環境
ファイル内の TableLock の指定
指定あり
COBOL 初期化ファイル
TableLock の指定
ファイルのロック動作
指定あり
テーブルロック
指定なし
エラー:オープンできません。
- 65 -
PowerRDBconnector 動作環境
ファイル内の TableLock の指定
指定なし
COBOL 初期化ファイル
TableLock の指定
ファイルのロック動作
指定あり
レコードロック
指定なし
レコードロック
また、テーブルロックの注意事項として、「4.1.3.2 テーブルロック機能について」、「4.2.3.5 OUTPUT モードのオープンの使用につい
て」、「4.2.3.6 読み取り一貫性に関する注意事項」を参照してください。
[テーブルロック解除時のデータの扱いについて]
テーブルロックは、PowerRDBconnector 内部で強制的にトランザクションを制御して実現しているため、テーブルロック解除時には、
データは次のように扱われます。
表 3.27 テーブルロック解除時のデータの扱い
テーブルロック解除のタイミング
テーブルロック区間内の更新データの扱い
テーブルロック対象の全てのテーブルをクローズした
とき。
更新データが反映されます。
テーブルロック対象の全てのテーブルをクローズせずに
COBOL アプリケーションを終了させたとき。
更新データが反映されます。
タスクマネージャで COBOL アプリケーションのプロセ
スを停止した場合。
更新データは反映されません。
COBOL アプリケーションが、アプリケーションエラーで
中断した場合
更新データは反映されません。
COBOL アプリケーション動作中に、データベースサー
ビスを中断またはネットワークを中断した場合。
更新データは反映されません。
3.5.3.2
テーブルロック解除時のトランザクション取消し機能
テーブルロック機能は、テーブルロックが有効なテーブルの OPEN 文で強制的にトランザクションを開始して CLOSE 文でトランザク
ションを確定することで実現しています。
アプリケーションを強制的に中断した場合には、テーブルロック区間内で更新された内容が取り消されます。このような、強制的な中断
と同じように処理したい場合(エラーを検出した場合など)は、テーブルロック解除時に、強制的にトランザクションを取り消し、更新され
た全ての内容を取り消すことができます。
テーブルロックが有効な区間で、“XMROTRBK”または、”COB_PRDB_TRAN” (トランザクション種別:4)サブルーチンを呼び出すこ
とで、テーブルロックを解除するときに強制的にトランザクションを取り消すことができます。
[サブルーチン名]
・ シングルセッションプログラミングの場合
CALL “XMROTRBK”
・ マルチセッションプログラミングの場合
CALL “COB_PRDB_TRAN” (トランザクション種別:4)
サブルーチンの使用方法は、「3.4.2 トランザクションの使用方法(シングルセッション)」および「3.4.3 トランザクションの使用方法
(マルチセッション)」を参照してください。
- 66 -
[注意事項]
・ 本サブルーチンは、テーブルロックが有効な区間内で呼び出した場合のみ有効です。この範囲外で呼び出した場合には、無効と
なります。
・ シングルセッションプログラミングの場合とマルチセッションプログラミングの場合で更新を取り消すトランザクションの範囲が以下の
ように異なります。
- シングルセッションプログラミングの場合(XMROTRBK)
テーブルロック対象のファイルを全てクローズするまでの他のテーブルへの更新を含む全ての更新を取り消します。
- マルチセッションプログラミングの場合(COB_PRDB_TRAN/トランザクション種別:4)
セッションを閉設するサブルーチン(COB_PRDB_END)を呼び出すまでの他のテーブルへの更新を含む全ての更新を取り消
します。
テーブルロック対象のファイルを全てクローズしても更新は取り消されません 。セッションを閉設するサブルーチン
(COB_PRDB_END)が呼び出された時点で更新が取り消されます。
3.5.4
チェックロック機能
テーブルロック機能とレコードロック機能のどちらの排他制御も行わないようにする機能です。
チェックロック機能を使用した場合、I-O オープンで READ しても読み込み中のレコードはロックされません。そのため、排他制御が全
く不要なアプリケーションでのみ使用できます。他のアプリケーションとの同時動作に問題がないことを、運用およびプログラム上で十
分に確認した上で、実施してください。
[チェックロック機能の使用方法]
PowerRDBconnector 動作環境ファイルの RecordLock プロパティと、CheckLock プロパティの 2 つとも OFF を指定してください。
例)テーブルロックもレコードロックも行わない指定
PowerRDBconnector 動作環境ファイル(DBIO_ENV)
; PowerRDBconnector 動作環境ファイル
ServerName=snake
ProviderName=OCI
RecordLock=OFF
CheckLock=OFF
3.6
タイムアウト機能
本節では、PowerRDBconnector のタイムアウト機能について説明します。
入出力文によるデータベースへのアクセスで、処理完了の待合わせ時間を指定できます。指定した時間を超えて処理が完了しない
と、タイムアウトを検出してエラー(FILE STATUS:92、iserrno:107)を通知します。
タイムアウト機能には、2 つの用途があります。
- 67 -
・ レコードロック獲得の待合わせ
・ 高負荷な実行環境での Oracle の処理完了の待合わせ
3.6.1
レコードロック獲得の待合わせ
COBOL アプリケーションが多重動作する環境では、レコードロックの獲得待ちになると、レコードロックが解放されるのを待合わせま
す。
READ 文の場合に、レコードロックを獲得するまでの時間を RecordLock プロパティで指定できます。
トランザクション区間内で、レコードロック獲得の待合わせでタイムアウトが発生した場合でも、自動的にトランザクションが確定または取
り消されることはありません。COBOL アプリケーションで、トランザクションの確定または取消しを行ってください。
レコードロック獲得の待合わせについて、以下の注意事項があります。
・ Oracle は、PowerRDBconnector 動作環境ファイルの RecordLock プロパティの設定値よりも前にタイムアウトのエラーを通知する
場合があります。この場合、Oracle の動作環境を見直してください。
・ RAMDOM モードでの DELETE 文や REWRITE 文など、READ 文以外の場合、レコードロック獲得待合わせ時間は有効となら
ず、レコードロックが獲得できるまで待ち続けます。
3.6.2
処理完了待合わせ時間の設定
処理完了待合わせ時間の設定方法については、「3.1.4 PowerRDBconnector 動作環境ファイル」を参照してください。
例)レコードロック獲得待合わせ時間に 60 秒を指定するための記述例
PowerRDBconnector 動作環境ファイル(DBIO_ENV)
; PowerRDBconnector 動作環境ファイル
ServerName=snake
ProviderName=OCI
RecordLock=60
3.6.3
高負荷な実行環境での Oracle の処理完了の待合わせ
データベースへのアクセスで大量のデータを処理する場合や複数のアプリケーションが同時に動作する環境では、Oracle の負荷が高
くなり、一時的に処理の完了を待合わせる場合があります。レコードロック獲得の待合わせ以外でタイムアウトが発生する場合、Oracle
の動作環境を確認し、必要に応じて Oracle をチューニングまたは Oracle に割り当てる実メモリを追加してください。それでもなお、タ
イムアウトのエラーが検出されるようでしたら、PowerRDBconnector 動作環境ファイルの RecordLock プロパティの値を大きくしてくださ
い。Oracle のチューニング方法については、Oracle のマニュアルを参照してください。
3.7
データ補正機能
本節は、アクセス時の例外的なデータに対する扱いについて説明します。データの表現形式についての説明であるため、COBOL ア
プリケーションがデータベースにアクセスでき、アクセスするデータ内容が明確になった際に、お読みください。
特に、ファイルシステムを用いた COBOL アプリケーションからの移行や、データ表現が変わるような移行を行う場合に、お読みくださ
い。
- 68 -
後方空白補正
3.7.1
文字項目のデータで、設定したデータ長が項目長に満たない場合、COBOL ランタイムは、指定したデータの後方に空白を設定しま
す。文字項目にデータを設定する場合、COBOL アプリケーションで半角空白や全角空白を意識して設定している場合と、空白を意
識せず設定している場合とで、後方空白の扱いが異なります。
このどちらの場合でも、COBOL アプリケーションが想定したように動作できるようにするため、PowerRDBconnector では、後方空白補
正機能を用意しています。
後方空白補正機能では、以下のように後方空白を扱います。
表 3.28 文字列データの後方空白の扱い
COBOL の入出力文
列名
_CHAR
READ 文
WRITE 文 および REWRITE 文
アプリケーションへ半角空白を設定します。
シフト JIS で動作する COBOL の場合
アプリケーションへ、全角空白を設定します。文字列
が奇数バイトの場合、全角空白を設定前に、半角空
白 1 文字を設定します。
_NCHAR
unicode で動作する COBOL の場合
アプリケーションへ、半角空白を設定します。
後方の半角空白と全角空白を削除し、データ
ベースへ格納します。
その後、データベースが半角空白を設定しま
す。
格納先のデータ型が NCHAR の場合、以下
のようになります。
後方の空白の部分には、全角空白は格納さ
れません。
データベースの列長に不足する分だけ半角
空白が格納されます。
全文字が空白の場合も、データベースの列長
分だけ半角空白が格納されます。
[後方空白補正機能の使用方法]
・ COBOL アプリケーション全体に指定する場合
PowerRDBconnector 動作環境ファイルの Suppress プロパティに ON を指定してください。
例)PowerRDBconnector 動作環境ファイル(DBIO_ENV)の記述例
; PowerRDBconnector 動作環境ファイル
ServerName=snake
ProviderName=OCI
Suppress=ON
・ 特定のファイルのみに指定する場合
COBOL 初期化ファイルの Suppress プロパティに ON を指定してください。
例)ファイル EMPLOYEE に対する COBOL 初期化ファイル(COBOL85.CBR)の記述例
; COBOL 初期化ファイル
EMPLOYEE=TableName=employee&SchemaName=SCOTT
&AccessMode=RANDOM&Suppress=ON,RDM
[後方空白補正機能の注意事項]
後方空白補正について、以下の注意が必要です。
- 69 -
・ Suppress プロパティの初期値が ON であるため、Suppress プロパティを指定していない場合は、無条件に後方空白補正が行われ
ます。
・ PowerRDBconnector 動作環境ファイルの Suppress プロパティの指定値は、COBOL 初期化ファイルの Suppress プロパティの初
期値となるため、PowerRDBconnector 動作環境ファイルと COBOL 初期化ファイルにそれぞれ指定した場合、以下のように扱わ
れます。
表 3.29 Suppress プロパティの扱い
Suppress プロパティの指定
PowerRDBconnector 動作
環境ファイル
ON
OFF
指定なし(初期値 ON)
動作
COBOL 初期化ファイル
ON
後方空白補正を行います。
OFF
後方空白補正を行いません。
指定なし
後方空白補正を行います。
ON
後方空白補正を行います。
OFF
後方空白補正を行いません。
指定なし
後方空白補正を行いません。
ON
後方空白補正を行います。
OFF
後方空白補正を行いません。
指定なし
後方空白補正を行います。
・ 後方空白補正を行った場合の影響について
「表 3.28 文字列データの後方空白の扱い」の”WRITE 文および REWRITE 文“の欄にあるように、書込み時に、データベースの
列長に満たない場合、半角空白が格納されます。
このため、データ型が NCHAR で、後方空白に半角空白が設定された場合、全角空白ではなく、不足分だけ半角空白が格納さ
れます。このデータに対し、以下のように扱われます。
- 後方空白補正を指定しアクセスすると正常にデータが読み込まれます。
- 後方空白補正の指定がない場合、後方に空白が必要以上につながったように読み込まれます。
- PowerRDBconnector を使用しないアプリケーションの場合、後方に空白が必要以上つながったように読み込まれます。
・ 後方空白補正を行わなかった場合の影響について
- 項目内のデータは項目長分全てが評価されるため、キー値を指定する場合、空白以外の部分は一致しても、空白部分が全
角空白と半角空白が混在していると、指定したキー値で思ったようにはアクセスできないことがあります。
例)以下は同じデータとして扱われません。
全角空白:□、半角空白:_ と示します。
- COBOL アプリケーションで NCHAR 属性に対して後方に半角空白をつめて書き込んだ場合、PowerRDBconnector を使用し
ない別のアプリケーションで、後方の空白が必要以上につながったように読込まれます。現象を回避するには、COBOL アプ
リケーションで、後方の空白部分に全角空白文字を設定してください。
・ unicode の文字コード系を使用する場合の注意事項
- 70 -
以下の COBOL アプリケーションで、日本語項目の内容を文字比較すると、想定外の比較結果となることがあります。
- NetCOBOL for Windows で、実行コード系が unicode の COBOL アプリケーションの場合で、かつ
- 後方空白補正を行った場合
現象を回避するには、後方空白補正機能を使わない(Suppress プロパティに OFF を設定)ようにしてください。
なお、PowerRDBconnector を使用しない場合でも、日本語項目の後方空白部分が半角空白の場合、同様の現象が発生します。
詳細は、NetCOBOL のマニュアルを参照してください。
3.7.2
項目属性に違反するデータのチェックと補正
COBOL アプリケーションでは、レコード内の同じ位置のデータに対して、複数の属性を再定義したり、または複数のアプリケーション
で異なった属性で定義したりすることが可能なため、項目属性に違反するデータが生じることがあります。
項目属性で規定されたデータとは、以下のデータです。
a. 英数字項目と日本語項目
データが全て文字コードに準拠したコードから生成されています。
b. 外部十進項目
データが以下の形式で構成されています。
- ゾーン部:3
- 数字部:0 ~ 9
- 符号部:符号なしの場合は 3、符号付の場合は 4,5
c. 内部十進項目
データが以下の形式で構成されています。
- 数字部:0 ~ 9
- 符号部:符号なしの場合は 0xF、符号付の場合は 0xC、0xD
PowerRDBconnector 経由では、データベースに異常なデータが設定されないよう、項目属性に違反するデータの扱いを選択すること
ができます。この機能は、PowerRDBconnector 動作環境ファイルの DataCheck プロパティにデータチェックの有無を設定することで使
用できます。
・ DataCheck プロパティに、データチェックを行う指定があった場合(DataCheck=C/U/P など)、データのチェックを行い、項目属性に
違反する場合には、データ例外のエラーとします。詳細は、「3.7.2.1 データチェック」を参照してください。
・ DataCheck プロパティに、データチェックを行わないと指定された場合(DataCheck=NONE など)、データのチェックは行わず、補正
可能なデータ部分をデータベース定義に応じて補正します。詳細は、「3.7.2.2 データ補正」を参照してください。
[データのチェックと補正の使用方法]
・ データチェックを、全ての属性に対して行う場合、以下のいずれかを行ってください。
- PowerRDBconnector 動作環境ファイルに DataCheck プロパティを記述しないでください。
- PowerRDBconnector 動作環境ファイルに DataCheck プロパティを以下のように指定してください。
PowerRDBconnector 動作環境ファイル(DBIO_ENV)の記述例
; PowerRDBconnector 動作環境ファイル
ServerName=snake
- 71 -
ProviderName=OCI
DataCheck=C/U/P
・ データチェックを、特定の属性に対して行う場合、DataCheck プロパティを以下のように指定してください。以下の例では、データ
チェックを、英数字項目と日本語項目、および外部十進項目に対して行い、内部十進項目に対しては、データの補正を行います。
PowerRDBconnector 動作環境ファイル(DBIO_ENV) の記述例
; PowerRDBconnector 動作環境ファイル
ServerName=snake
ProviderName=OCI
DataCheck=C/U
上記機能は、“英数字項目と日本語項目”、“外部十進項目”、および“内部十進項目”のそれぞれで指定できます。DataCheck プロパ
ティの指定方法については、「3.1.4 PowerRDBconnector 動作環境ファイル」および、「表 3.30 DataCheck プロパティの扱い」を参照し
てください。
[データのチェックと補正の注意事項]
DataCheck プロパティについて、以下の注意事項があります。
・ DataCheck プロパティにデータチェックを行う指定がある場合、または DataCheck プロパティを指定しない場合、違反している項目
属性は、データ例外のエラーとなります。
・ データのチェックまたは補正は、以下の処理で動作します。
- WRITE 文または REWRITE 文実行に、データをデータベースに書き込む場合
- キー指定でアクセス時のキー値を解釈する場合
・ PowerRDBconnector 動作環境ファイルの DataCheck プロパティの指定値と、データのチェックする属性およびデータの補正する
属性を以下に示します。
表 3.30 DataCheck プロパティの扱い
指定なし
C/U/P
C/U
C/P
U/P
C
U
P
NONE
英数字項目と日本
語項目
○
○
○
○
×
○
×
×
×
外部十進項目
○
○
○
×
○
×
○
×
×
内部十進項目
○
○
×
○
○
×
×
○
×
英数字項目と日本
語項目
×
×
×
×
○
×
○
○
○
外部十進項目
×
×
×
○
×
○
×
○
○
内部十進項目
×
×
○
×
×
○
○
×
○
DataCheck プロパティ
デー
タ
チェ
ック
デー
タ補
正
○:対象
×:非対象
- 72 -
3.7.2.1
データチェック
DataCheck プロパティを指定しない、または DataCheck プロパティに項目種類(DataCheck=C/U/P)を指定した場合、指定した属性の
データチェックは以下のように行われます。
a. 英数字項目と日本語項目
DataCheck プロパティに”C”を指定した場合、以下のデータチェックが行われます。
- 項目データが全て 0x00 となっている場合は、データ例外のエラーとなります。
- データの途中に 0x00 が存在する場合、エラーとならず、そのままデータベースにデータを渡します。0x00 の位置による動
作は、「表 3.34 データ途中に 0x00 が存在する場合の動作」を参照してください。
b. 外部十進項目
DataCheck プロパティに”U”を指定した場合、以下のデータチェックが行われます。
- 項目定義の符号属性と、データの符号部が一致しているかチェックされます。
例)属性が符号なしであるが、データの符号部が 4、5 の場合
- 符号部に異常なデータがないかチェックされます。
- ゾーン部に異常なデータがないかチェックされます。
例)数値“123”のデータが、“0x313233”であるはずが“0x313203”などの場合
表 3.31 外部十進のデータチェック
列情報
データ
データ内容
_UNSIGN あり
_UNSIGN なし
_UNSIGN あり
_UNSIGN なし
結果
備考
COBOL の
データ定義
例
符号部が 0x3*
(符号なしデータ)
PIC 9(n)
正常
符号部が 0x5*
(符号ありの負の値)
PIC S9(n)
エラー
符号部が 0x4*
(符号ありの正の値)
PIC S9(n)
エラー
符号部が 0x3*
(符号なしデータ)
PIC 9(n)
エラー
符号部が 0x5*
(符号ありの負の値)
PIC S9(n)
正常
符号部が 0x4*
(符号ありの正の値)
PIC S9(n)
正常
全て空白
-
エラー
LOW-VALUE
-
エラー
HIGH-VALUE
-
エラー
0x00 または 0x20 を含みます
-
エラー
ゾーン部が異常
-
エラー
数字部が異常
-
エラー
c. 内部十進項目
DataCheck プロパティに”P”を指定した場合、以下のデータチェックが行われます。
- 73 -
*は 0 ~ 9
n は整数
- 項目定義の符号属性と、データの符号部が一致しているかチェックされます。
例)属性が符号なしであるが、データの符号部がCの場合
- 符号部に異常なデータがないかチェックされます。
表 3.32 内部十進のデータチェック
列情報
データ
データ内容
_UNSIGN あり
_UNSIGN なし
_UNSIGN あり
_UNSIGN なし
3.7.2.2
結果
備考
COBOL のデータ
定義例
符号部が 0x*F
(符号なしの値)
PIC 9(n) COMP
正常
符号部が 0x*C
(符号ありの正の値)
PIC S9(n) COMP
エラー
符号部が 0x*D
(符号ありの負の値)
PIC S9(n) COMP
エラー
符号部が 0x*F
(符号なしの値)
PIC 9(n) COMP
エラー
符号部が 0x*D
(符号ありの負の値)
PIC S9(n) COMP
正常
符号部が 0x*C
(符号ありの正の値)
PIC S9(n) COMP
正常
数字部が 0 ~ 9 以外
*は 0 ~ 9
n は整数
エラー
データ補正
以下のような場合には、データ内容と属性が矛盾することがあります。
・ あるレコード内の同じ位置のデータに対して、複数の属性で再定義した場合。
・ 複数のアプリケーションから異なった属性で定義した場合
COBOL アプリケーションの数が多い、または影響する部分がどこかわからないなど、データ内容に応じた正しい属性で定義しなおす
ことができないときがあります。
この場合、データ補正を行うことで、COBOL アプリケーションの対応を少なくすることができます。
DataCheck プロパティに項目種類を指定しない場合、指定した属性のデータチェックを行わず、COBOL アプリケーションからデータ
ベースへデータを渡すとき(REWRITE 文、WRITE 文およびキー指定時)、以下のように補正が行われます。
a. 英数字項目と日本語項目
DataCheck プロパティに”C”を指定しない場合、以下のように補正が行われます。
- 項目データが全て 0x00 となっている場合、半角空白(0x20)に置き換えて正常なデータとして扱います。
表 3.33 文字データの補正
列名
COBOL 文字コード指定
0x00 と置き換える文字コード
_CHAR
unicode
半角空白(0x20)
_CHAR
シフト JIS
半角空白(0x20)
_NCHAR
unicode
半角空白(0x20)
_NCHAR
シフト JIS
半角空白(0x20)
- 74 -
- データの途中に 0x00 が存在する場合、エラーとならず、そのままデータベースにデータを渡します。このため、コード系と 0x00
の位置によって以下のように動作します。
表 3.34 データ途中に 0x00 が存在する場合の動作
COBOL の文字コード系
列名
動作
シフト JIS
-
0x00 以降のデータが欠如します。
0x0000 以降が欠如します。
0x00nn の下位バイト以降が欠如します。
_CHAR
0xnn00 以降が欠如します。
(nn:任意の 16 進数)
unicode
0x0000 以降が欠如します。
_NCHAR
0x00nn や 0xnn00 のデータがあっても、データの欠如は発
生しません。
(nn:00 以外の任意の 16 進数)
b. 外部十進項目
DataCheck プロパティに”U”を指定しない場合、以下のように補正が行われます。
- HIGH-VALUE、LOW-VALUE、全てが半角空白の場合は数値の 0 として扱います。
- 項目定義の符号属性とデータの符号に不一致があった場合、正の値として扱います。
- 符号部に異常があった場合、正の値として扱います。
- ゾーン部に異常があった場合、ゾーン部を補正し正常なデータとして扱います。
表 3.35 外部十進のデータ補正
列情報
_UNSIGN あり
_UNSIGN なし
_UNSIGN あり
_UNSIGN なし
データ内容
COBOL
定義例
補正内容
符号部が 0x3*
(符号なしデータ)
PIC 9(n)
正常
符号部が 0x5*
(符号ありの負の値)
PIC S9(n)
符号なしの正の値に補正
します。
符号部が 0x4*
(符号ありの正の値)
PIC S9(n)
符号なしの正の値に補正
します。
符号部が 0x3*
(符号なしデータ)
PIC 9(n)
符号部が 0x5*
(符号ありの負の値)
PIC S9(n)
符号部が 0x4*
(符号ありの正の値)
PIC S9(n)
正の値に補正します。
正常
正常
全て半角空白
数値の 0 に置換します。
LOW-VALUE
数値の 0 に置換します。
HIGH-VALUE
(キー値の指定時)
数値の 0 に置換します。
- 75 -
備考
*は 0 ~ 9
n は整数
列情報
データ内容
COBOL
定義例
補正内容
HIGH-VALUE
(書込み時)
エラーとなります。
0x00 または 0x20 を含
みます。
異常部分を数値の 0 に
置換します。注 1
ゾーン部が不正
ゾーン部に 0x3*を設定し
ます。
数字部が異常
エラーとなります。
備考
*は 0 ~ 9
注 1)
最終バイトが 0x00、0x20 の場合、符号無の場合は 0x30、符号付の場合は 0x40 として置換します。
例)
- 前方に空白ありの場合 ’ 123’⇒‘00123’として扱います
- 後方に空白ありの場合 ’123 ’⇒‘12300’として扱います
- 混在した場合
’1 2 3’⇒‘10203’として扱います
a. 内部十進項目
DataCheck プロパティに”P”を指定しない場合、以下のように補正が行われます。
- 符号部に異常なデータがあった場合、正の値として扱います。
注意
数字部に異常があった場合、データ補正ができないため、データベースアクセス時にエラーとなります。
表 3.36 内部十進のデータ補正
列情報
_UNSIGN あり
_UNSIGN なし
_UNSIGN あり
_UNSIGN なし
データ内容
COBOL のデータ
定義例
補正内容
符号部が 0x*F
(符号なしデータ)
PIC 9(n) COMP
正常
符号部が 0x*D
(符号ありの負の値)
PIC S9(n) COMP
正の値に補正します。
符号部が 0x*C
(符号ありの正の値)
PIC S9(n) COMP
正の値に補正します。
符号部が 0x*F
(符号なしデータ)
PIC 9(n) COMP
正の値に補正します。
符号部が 0x*D
(符号ありの負の値)
PIC S9(n) COMP
正常
符号部が 0x*C
(符号ありの正の値)
PIC S9(n) COMP
正常
数字部が 0 ~ 9 以外
エラー
- 76 -
備考
*は 0 ~ 9
n は整数
第4章
COBOL アプリケーションの開発について
本章では、COBOL アプリケーションの開発で考慮が必要なことを説明します。
開発者およびシステム管理者が、他のシステムから COBOL アプリケーションを移行する場合に注意すべきこと、および COBOL アプ
リケーション開発時の注意事項を確認するときにお読みください。
4.1
開発のポイント
本節では、PowerRDBconnector を使用した COBOL アプリケーションの開発について説明します。
COBOL アプリケーションのファイルアクセス機能とデータベースで備える機能では、インターフェースやデータ属性など、機能の相違
点を考慮して COBOL アプリケーションを開発しなければなりません。特に、既存の COBOL アプリケーションを活用して開発する場
合には、本章を参照してください。
PowerRDBconnector で使用できる COBOL アプリケーションのファイルアクセス機能は、NetCOBOL が提供する機能と一部異なりま
すので、事前に「2.2.1.2 COBOL アプリケーションから利用できる機能範囲」を参照して確認してください。
4.1.1
環境設定のポイント
環境設定時のポイントを説明します。
4.1.1.1
ファイル識別名について
COBOL 初期化ファイルに指定するファイル識別名は、一意の名前で指定してください。
以下のような入出力文 COBOL アプリケーションでは、ASSIGN 句に指定するファイル識別名に同じ名前を使用することが多いため、
既存の COBOL アプリケーションを活用する場合には、ファイル識別名が一意になるように変更してください。
・ 複数の SELECT 句に同一ファイル名で定義し、かつ
・ 異なったアクセスモードで定義しているアプリケーション。
4.1.1.2
データベースの照合順序について
キー値およびレコードの並び順は、データベースの照合順序に依存します。照合順序の変更が必要な場合には、データベースを構
築する前に行ってください。
データベースの照合順序については、Oracle のマニュアルを参照してください。
4.1.2
データベース作成のポイント
データベースの作成時のポイントを説明します。
4.1.2.1
混在項目を使用する場合
混在項目をデータベースの 1 つの列に対応付けることはできません。混在項目をデータ型毎に分割して COBOL のレコード記述項を
変更してください。変更したレコード記述項に合わせてデータベースの列を定義してください。
- 77 -
4.1.2.2
OCCURS 句、REDEFINES 句を使用する場合
最下位レベル番号の基本項目に合わせてデータベースの列を定義してください。
4.1.2.3
ビューについて
COBOL アプリケーションからビューへアクセスする場合、テーブルのアクセスに比べていくつかの制限事項があります。必要に応じて
データベースの構成を変更して対処してください。ビューに関する注意については、「4.2.3.2 ビューの使用について」を参照してくださ
い。
4.1.2.4
列の定義について
COBOL のレコード記述項の定義とデータベースの列定義が正しく対応されていないと、COBOL アプリケーションは正しく動作しませ
ん。
NetCOBOL は、COBOL のレコード記述項のレコード長と、データベースで定義された列長が一致しているか、OPEN 文でチェックし
ます。必ず、レコード記述項に合わせて列と、列名のサフィックスを定義してください。
レコード長が一致しない場合、NetCOBOL が以下の実行時エラーを通知します。
メッセージ番号
“JMP0310I-I”
$3
“INV-LRECL”
「3.1.3.5 列定義の対応」を参照して、COBOL のレコード記述項とデータベースの定義を確認してください。
上記以外の NetCOBOL の実行時エラーについては、「5.1.1.4 COBOL アプリケーション終了時のメッセージ一覧」を参照してくださ
い。
4.1.2.5
データベースで扱えないデータ値との整合性について
データベースには、データ型で定義した値のみを格納できます。
・ 数字型へは、数値のみ格納できます。
・ 文字型へは、文字のみ格納できます。
例えば、以下のようにして、COBOL の数字項目に文字データを格納することはできません。
- 78 -
基本項目のデータ型でデータを入力してください。
なお、PowerRDBconnector では、上記の不整合なデータに対して、エラーにするか補正するかが選択できます。詳細については、「3.7
データ補正機能」を参照してください。
4.1.2.6
インデックスの作成について
RECORD KEY 句を使用してアクセスするテーブルには、必ず、RECORD KEY 句で定義したキーに対応するインデックスを CREATE
INDEX 文で定義してください。インデックスを定義しないとデータ更新できません。
インデックスには、UNIQUE 制約またはプライマリー制約を推奨します。UNIQUE 制約またはプライマリーを設定しないと、キー値が重
複することがあります。キー値が重複した場合、注意が必要です。キー値が重複した場合の注意については、「4.2.3.1 キーに重複した
値がある索引ファイルについて」を参照してください。
なお、表定義の UNIQUE 制約で作成されたインデックスの場合、アクセス時に正しく選択されない場合があります。
4.1.2.7
文字コードについて
COBOL アプリケーションとデータベースで扱う文字のコード系が一致しない場合、アプリケーションとデータベースの文字コードを同
一にしてください。
文字コードが異なっていた場合、データベースへのアクセス時にエラーが発生することがあります。
PowerRDBconnector は、以下の場合にコード系の変換を行います。
・ NetCOBOL for .NET で、コード系に SJIS-UCS2(英数字項目がシフト JIS、日本語項目が unicode)を指定した場合
この場合、Oracle のコード系は unicode(UTF-8 系、または UTF-16 系)でなければなりません。このとき、PowerRDBconnector は、
英数字項目のデータをシフト JIS と unicode(UTF-8)の間でコード変換します。このため英数字項目内に日本語が存在した場合、
コード変換エラーが生じることがあります。
・ COBOL アプリケーションの文字コード系が、unicode 系(UTF8-UCS2、UCS2 または UTF16)の場合
このとき、PowerRDBconnector は、日本語項目に対して UTF-8 コード系との間でコード変換します。
文字コード変換の注意については、「4.2.3.4 文字コード変換について」を参照してください。
Oracle で設定するキャラクターセットと、COBOL アプリケーションの文字コードの対応について以下に示します。
表 4.1 COBOL アプリケーションの実行時コード系と Oracle のキャラクターセットについて
COBOL アプリケーションの文字コード系
種別
文字コード
系
SJIS 系
NetCOBOL
for .NET
UTF8 系
混在系
NetCOBOL
for
Windows
SJIS 系
USAGE 句
Oracle のキャラクターセット
シフト JIS 系
UTF-8 系
JA16SJIS AL16UTF16 AL32UTF8
UTF-16 系
UTF8
AL32UTF8
AL16UTF16
(CHAR)
(NCHAR)
(CHAR)
(NCHAR)
(CHAR)
(NCHAR)
X(英数字)
○
○
△(注 3)
△(注 3)
△(注 3)
△(注 3)
N(日本語)
○
○
△(注 3)
△(注 3)
△(注 3)
△(注 3)
X(英数字)
×(注 1)
○
○
○
○
○
N(日本語)
×(注 1)
○(注 2)
○
○
○
○(注 2)
X(英数字)
×(注 1)
○
○
○
○
○
N(日本語)
×(注 1)
○(注 2)
○
○
○
○(注 2)
X(英数字)
○
○
△(注 3)
△(注 3)
△(注 3)
△(注 3)
N(日本語)
○
○
△(注 3)
△(注 3)
△(注 3)
△(注 3)
- 79 -
COBOL アプリケーションの文字コード系
種別
文字コード
系
UTF16
系
USAGE 句
Oracle のキャラクターセット
シフト JIS 系
UTF-8 系
JA16SJIS AL16UTF16 AL32UTF8
UTF-16 系
UTF8
AL32UTF8
AL16UTF16
(CHAR)
(NCHAR)
(CHAR)
(NCHAR)
(CHAR)
(NCHAR)
X(英数字)
×(注 1)
○
○
○
○
○
N(日本語)
×(注 1)
○(注 2)
○
○
○
○(注 2)
○:使用できます。
△:後方空白や文字列の表現サイズの違いから、検索の項目として使用できない場合があります。
×:使用できません。
文字コード系の表記は、NetCOBOL for .NET または NetCOBOL for Windows をコンパイル時に以下のオプションを選択した場合
です。
SJIS 系:RCS オプションに SJIS を指定した COBOL アプリケーション
UTF8 系:RCS オプションに UTF8-UCS2 を指定した COBOL アプリケーション
混在系:RCS オプションに SJIS-UCS2 を指定した COBOL アプリケーション
UTF16 系:RCS オプションに UCS2 または UTF16 を指定した COBOL アプリケーション
(注 1)WRITE 文は正常動作しますが、READ 文で以下のエラーが発生します。
ファイルステータス=90
iserrno = 255 isstat1=’0’ isstat2=0x0 isstat3=’6’ isstat4=0x0
ORA-01406:フェッチされた列の値は切り捨てられました。
(注 2) Oracle9i の場合、OPEN 文で以下のエラーが発生します。
ファイルステータス=90
iserrno = 22 isstat1=’9’ isstat2=0x34 isstat3=’9’ isstat4=0x34
(注 3) シフト JIS の COBOL アプリケーションから UTF-8 系、UTF-16 系のデータベースにアクセスする場合
日本語の文字は NCHAR の列データ内でしか扱えません。CHAR の列データに格納した場合、後方空白の文字サイズの違いに
より、正しくキー検索できなかったり、ファイルステータスが 23 や 90 のエラーが発生したりすることがあります。
上の表は、シフト JIS の COBOL アプリケーションから、unicode のデータベースにアクセスできるということを示しています。しかし、以
下の違いがありますので、シフト JIS のときと全く同じ COBOL アプリケーションが動作できるとは限りません。
・ UTF-8 系や UTF-16 系のデータベースとシフト JIS 系のデータベースの違い。
- 「COBOL 定義とデータベース定義の対応」にある格納文字数の制限
- Oracle の制限で、表名や列名などは最大 30 バイトまでです。このためキャラクターセットにより以下の違いが生じます。
- データベースを AL32UTF8 で作成した場合、全角文字は 1 文字 3 バイトのため、表名などは全角で 10 文字まで設定で
きます。
- データベースをシフト JIS で作成した場合、全角文字は 1 文字 2 バイトのため、表名などは全角で 15 文字まで設定でき
ます。
上記のようにコード系が異なるデータベースにアクセスすると、エラーが発生する場合がありますので、シフト JIS の COBOL アプ
リケーションからは、シフト JIS 系のデータベースにアクセスしてください。
・ COBOL ランタイムが補正する空白文字種別の違い。
詳細は、「[後方空白補正機能の注意事項]」を参照してください。
- 80 -
【JIS2004 の文字コードについて】
JIS X 0213:2004 に対応した Windows の文字セット(JIS2004)でサポートされた 1 文字が 4 バイトの文字(JIS2004 固有文字)を扱う場
合について以下に示します。
・ JIS2004 固有文字が使える環境
以下の環境で JIS2004 固有文字は使用できます。
- PowerRDBconnector がインストールされている OS が、Windows XP、Windows Server 2003、または Windows Vista の場合
- Oracle10g、Oracle11g の場合
- UTF-8 系または UTF-16 系のキャラクターセットの場合。
キャラクターセットについては「表 4.1 COBOL アプリケーションの実行時コード系と Oracle のキャラクターセットについて」を参
照してください。
- COBOL の USAGE 句とデータベースのデータ型が以下の対応関係にある場合
- X(英数字)項目と CHAR 型
- N(日本語)項目と NCHAR 型
上記以外の場合、次のようなエラーが発生することがあります。
表 4.2 COBOL 定義と列定義による JIS2004 固有文字の動作について
動作
COBOL 定義
書込み
読み込み
キー検索
(WRITE,REWRITE)
(READ)
(乱 READ、START)
列定義
X(英数字)
CHAR
○
○
○
X(英数字)
NCHAR
○
○
エラー(注 1)
N(日本語)
CHAR
○
エラー(注 2)
○
N(日本語)
NCHAR
○
○
○
(注 1)ファイルステータスが 23 のエラーが発生します。
(注 2) Suppress プロパティが OFF の場合、以下のエラーが発生します。
ファイルステータス=90
iserrno = 22 isstat1=’9’ isstat2=0x35 isstat3=’9’ isstat4=0x35
- NetCOBOL V10.0.0 を使用する場合
上記の場合、COBOL の USAGE 句には、1 文字に、JIS2004 以外の 1 文字を使用する 2 倍の定義を行ってください。なおデー
タベースの定義も、2 倍の定義に対応した長さを指定してください。
・ JIS2004 固有文字が使えない環境
以下の環境では JIS2004 固有文字は使用できません。
- Windows 2000 の場合
- Oracle9i の場合
- NetCOBOL V10.0.0 以外の NetCOBOL を使用する場合
上記の場合、JIS2004 で追加された文字(JIS2004 の文字セットでは、4 バイトの文字や、シフト JIS コード(JIS X 0208-1990)に存
在しない文字)をレコード内のデータに使用すると、エラーや、文字化けが生じることがあります。
また、パス名、スキーマ名、表名、列名に使用すると、エラーとなります。このため、JIS2004 で追加された文字は、使わないでくだ
さい。
- 81 -
なお、Windows Vista では、JIS X 0213:2004 に対応した文字セット(JIS2004)が使用できます。
ユーティリティを使用する場合
4.1.2.8
COBOL アプリケーション以外のアプリケーションやユーティリティとテーブルを共用する際は、COBOL で扱えるデータが格納されるよ
うにしてください。
・ 符号なし数字項目および符号なし整数項目にマイナス値が格納されてしまうことがあります。
符号なし数字項目および符号なし整数項目でマイナス値は扱えません。
マイナス値の格納を制限したい場合は、データベースの機能(CHECK 制約)で可能です。
・ 整数項目の精度(p)より大きい整数値が格納されてしまうことがあります。
整数値の範囲を制限したい場合は、データベースの機能(CHECK 制約)で可能です。
・ NULL 値が格納されてしまうことがあります。
NULL 値は扱えません。NULL 値が格納されないように制限したい場合は、データベースの機能(NOT NULL 制約)で NULL 値
の書込みを制限できます。
・ 2 進項目の精度(p)より大きい整数値が格納されてしまうことがあります。
・ データ溢れが発生することがあります。
文字データをデータベースに格納する場合、データ溢れが発生することがありますので、以下の注意が必要です。データ溢れが
発生すると、COBOL の FILE STATUS に 90 を通知します。
- X 項目と CHAR または NCHAR を対応させている場合
CHAR または NCHAR に全角文字が格納されていると、データ漏れが発生します。
例えば、以下の場合に発生します。
- X(2) の X 項目に対して、CHAR(2) の全角文字'A'を READ すると X 項目を unicode(UTF-8)で扱う NetCOBOL for .NET
で 3 バイトが必要となり、データ溢れが発生します。
- X(4) の X 項目に対して、NCHAR(4) の全角文字'ABCD'を READ すると 8 バイトが必要となり、データ溢れが発生しま
す。
- N 項目と CHAR を対応させている場合
N 項目を unicode(UCS2)で扱う NetCOBOL for .NET でデータ溢れが発生します。
例えば、N(2) の N 項目に対して、CHAR(4) の半角文字'ABCD'を UCS2 で READ すると 8 バイトが必要となり、データ溢れ
が発生します。
CHAR(p) は、半角文字だけであれば、p 文字格納できますが、全角文字を含むと、p 文字は格納できません。
NCHAR(p) は、全角文字だけで p 文字格納できます。
4.1.3
COBOL アプリケーション作成のポイント
COBOL アプリケーション作成時のポイントを説明します。
- 82 -
4.1.3.1
トランザクションについて
トランザクション区間内で OPEN 文は実行できません。また、START 文または READ 文、REWRITE 文、DELETE 文、WRITE 文の
直後にトランザクションは開始できません。トランザクションで操作するファイルは、オープンしてから入出力文を実行するまでの間に同
じセッション内でトランザクションを開始してください。
トランザクションを繰り返し実行する COBOL アプリケーションでは、トランザクションの開始、終了前後でオープン、クローズすることを
避け、全てのファイルをオープンしてからトランザクションを開始することを推奨します。
4.1.3.2
テーブルロック機能について
テーブルロックを指定したファイルをオープンすると、強制的にトランザクションを開始するため、COBOL アプリケーションのトランザク
ション制御で不具合が生じないか、以下の動作について確認してください。
・ レコードの更新や削除、追加処理で、データベースからトランザクション確定ができないエラー(データベースのサービス停止な
ど)が通知されると、オープン直後の状態に戻ります。
・ テーブルロックを指定したファイルのオープン中は、トランザクションの操作(開始、確定、取消し)が無効となります。トランザクショ
ンサブルーチンの CALL 文は何もせず、正常に復帰します。テーブルロックが有効なファイルが全てクローズされた時点でデータ
を確定します。
・ テーブルロック区間で、“XMROTRBK”または、”COB_PRDB_TRAN” (トランザクション種別:4)サブルーチンを呼び出している
と、テーブルロック区間内で更新されたデータは取り消されます。詳しくは、「3.5.3.2 テーブルロック解除時のトランザクション取消
し機能」を参照してください。
4.1.3.3
レコードロック機能について
多重動作する COBOL アプリケーションで、I-O モードでオープンし、START 文や READ 文でレコードを操作する場合、以下のように
COBOL アプリケーションで対処してください。
・ トランザクションを適用しない DYNAMIC アクセスモードの場合、START 文で位置付けされた先頭のレコードに対するレコードロッ
クは獲得されません。READ 文でレコードを読み込んでレコードロックを獲得してください。
4.1.3.4
OUTPUT モードのオープンについて
OUTPUT モードでオープンしているファイルは、同じ COBOL アプリケーション内または別の COBOL アプリケーションでオープンす
ることができません。OUTPUT モードでオープンするファイルは、他の COBOL アプリケーションと共用しないようにしてください。OUTPUT
モードでオープンするファイルは、テーブルロックを行ってください。また、レコード数が多いファイルに対して OUTPUT モードでオー
プンする場合は Truncate プロパティを使用してください。
OUTPUT モードでオープンする場合の注意について、詳しくは「4.2.3.5 OUTPUT モードのオープンの使用について」を参照してくだ
さい。
4.1.3.5
レコードの削除方法について
レコードを削除するには、必ず DELETE 文を使用してください。レコードの先頭にバイナリデータの‘FF’を書き込んでレコード削除す
ることはできません。
- 83 -
4.1.3.6
LOW-VALUE、HIGH-VALUE について
表意定数の LOW-VALUE、HIGH-VALUE を使用した全ての入出力文操作はできません。
・ LOW-VALUE、HIGH-VALUE の値を使用した WRITE 文および REWRITE 文など。
・ LOW-VALUE、HIGH-VALUE の値をキー値とした START 文および READ 文など。
論理的にレコードを位置付けるには、以下の代替方法があります。
・ LOW-VALUE :START ファイル名 FIRST RECORD KEY IS [データ名-1]…]
・ HIGH-VALUE:START ファイル名 FIRST
・ RECORD KEY IS [データ名-1]…] WITH REVERSED ORDER
データ補正の使用有無によって、LOW-VALUE、HIGH-VALUE を指定した場合に、エラーまたは、数値の 0 に補正されます。詳細
は、「3.7.2 項目属性に違反するデータのチェックと補正」、「表 3.31 外部十進のデータチェック」、および「表 3.32 内部十進のデータ
チェック」を参照してください。
4.1.3.7
使用メモリ量について
PowerRDBconnector で使用するメモリ量の概算値を以下に示します。なお、計算式には、NetCOBOL やデータベース内部で獲得さ
れるメモリ容量は含まれません。
・ プロセス終了まで保持するメモリ容量
513×(セッション数、シングルセッションプログラミングの場合は 1)(単位:K バイト)
・ 使用スタック域の容量(各スレッド単位)
64 (単位:K バイト)
・ 1つのファイルをオープンする単位で CLOSE 文まで保持するメモリ容量
(データベースで定義している列名長の合計)+(レコード長×16)+(項目数×68)+(キー項目数×24)+
{項目数×(COBOL に記述している最大の列名長+ 10)+ 200}(単位:バイト)
※複合キーの場合、キー項目数とは構成している基本のキー項目の総和です。
・ 1つのファイルをオープンする単位で OPEN 文実行時に必要なメモリ容量
(レコード長×3)+(項目数×72)+ 64,000(単位:バイト)
項目数、列名長およびキー項目の数が多いほどメモリ使用量が増加するため、必要以上にキー項目の数を増やすなどを行わないよ
う注意してください。
4.1.3.8
マルチセッションプログラミングについて
マルチセッションプログラミングを使用する場合、セッションサブルーチンを組み込む必要があります。このためシングルセッションプロ
グラミングで記述された COBOL アプリケーションをそのままマルチセッションプログラミングでは使用できません。以下の注意点を考
慮し、必要な箇所を修正してください。
- 84 -
・ マルチセッションプログラミングでは、セッションサブルーチンを使用してください。セッションサブルーチンについては、「3.2 セッ
ションの制御方法」を参照してください。
・ トランザクションサブルーチンや認証情報登録サブルーチンの名称および記述方法を修正してください。トランザクションサブルー
チンについては、「3.4.3 トランザクションの使用方法(マルチセッション)」を、認証情報登録サブルーチンについては、「3.3.3 デー
タベース認証の使用方法(マルチセッション)」を参照してください。
・ トランザクションサブルーチンでエラーが発生した場合、シングルセッションプログラミングでは強制的にプログラムが終了します
が、マルチスレッドプログラミングでは、エラー通知されます。このためマルチスレッドプログラミングで、トランザクションサブルーチ
ンを使用するときには、エラー処理が必要です。トランザクションサブルーチンのエラーについては、「5.1.2 トランザクションアクセ
ス時のエラー情報」を参照してください。
4.1.4
性能向上のポイント
運用により性能向上させるためのポイントを説明します。
4.1.4.1
インデックスの定義
検索性能を向上させるためインデックスを作成し、索引ファイルによるファイルアクセスで最適な性能が得られます。
なお、データベースに対して統計情報の収集を行わないと、インデックスが定義されていても最適に動作しません。データベースの統
計情報の収集については、「4.1.4.4 データベースに対する統計情報の収集」を参照してください。
4.1.4.2
データ更新時のトランザクション適用
データ更新性能を向上させるには、トランザクションを適用して更新データをまとめて確定する考慮が必要です。
データベースでは、データ更新を行うと更新されたデータは、データファイルに加えて、トランザクションログファイルへも書込み処理が
行われます。
データ更新性能を向上させるには、書込み回数を減少させてください。トランザクションを適用すると、トランザクション中のデータ更新
の書込み回数が最小限に抑えられ、更新されたデータは確定することで、まとめて書き込まれます。
例えば、COBOL アプリケーションで、トランザクション開始後に、WRITE 文を 1 万回実行する毎に確定させるなどの方法があります。
テーブルロック機能を使用すると、強制的にトランザクションが適用されるため、データ更新はクローズ時に確定しますので、書込み回
数を減少させることができます。
なお、トランザクション操作を行う際の注意について、「4.2.2.3 レコードロックの排他制御について」を参照してください。
4.1.4.3
履歴ファイルのディスク配置
履歴ファイルは、データファイルと別の物理ディスクに配置してください。
Oracle では、データ更新を行うと更新されたデータは、データファイルに加えて、履歴ファイル(REDO ログ、UNDO 領域、アーカイブ
REDO ログ)へも書込み処理が行われます。
- 85 -
データファイルと別の物理ディスクに配置しないと書込みが1つの物理ディスクに集中するため、ディスクに対してボトルネックが発生し
ます。
また、別の物理ディスクに配置しないと、データファイルの物理ディスクにハード障害が発生した場合、履歴ファイルも破壊され、バック
アップした時点のデータでしか復旧できなくなりなります。
4.1.4.4
データベースに対する統計情報の収集
データベースが最適に動作するようにチューニングしてください。
データがセットアップされた状態で、統計情報収集を利用者が行い、最適化する必要があります。必ず統計情報収集を行ってくださ
い。また、統計情報収集は以下のような場合に必要です。
・ 新規にファイル追加した場合。
・ データの大幅な増減があった場合。
実施時期や運用方法などのデータベースに関することは、Oracle のマニュアルを参照してください。
統計情報収集を怠ると、以下のような異常現象が発生することがあります。
・ 必要のないソート処理が発生し、処理に長時間かかります。
・ 適切なインデックスが適用されなくなり、処理に長時間かかります。
・ TEMP 領域が多く消費されます。
なお、Oracle では統計情報収集に、ANALYZE 文よりも DBMS_STATS パッケージの使用を強く推奨しています。
SQL*Plus を使用して、DBMS_STATS パッケージの実行例を以下に示します。
使用例:表(所有者 scott、表 TPFILE)の統計情報収集
1. SQL*Plus でログイン
対象表を所有するユーザーでログインしてください。
sqlplus scott/tiger
2. DBMS_STATS パッケージの実行
execute dbms_stats.gather_table_stats(ownname=>'scott',
tabname=>'TPFILE',estimate_percent=>10,cascade=>FALSE)
* 上記の例は、テーブル TPFILE のデータ 10%を元に統計を収集しています。
3. 表の統計情報収集の日付を確認
select table_name, to_char(last_analyzed, 'RR-MON-DD HH24:MI:SS')
last_analyzed from user_tables where table_name = 'TPFILE';
* LAST_ANALYZED 列には収集した最新日付が入ります。値が NULL の場合は収集されていません。
4.1.4.5
NOLOGGING モードの使用選択
Oracle では、NOLOGGING モードで REDO ログ・ファイルへの記録モードを変更できます。
NOLOGGING モードについては、利用者が Oracle を理解して、適切な使用選択をしてください。
- 86 -
4.1.4.6
OUTPUT モードの OPEN 文での Truncate プロパティ
Truncate プロパティを適用すると、OUTPUT モードの OPEN 文で高速に全ての行データを削除できます。ただし、データベースおよび
PowerRDBconnector の仕様で以下の注意が必要です。
・ トランザクションが終了されます。
OUTPUT モードの OPEN 文でトランザクションが終了します。
・ テーブルに対して、実行権限の設定が必要です。
Oracle では、DROP ANY TABLE システム権限が必要になります。
・ 誤ったテーブル名を指定すると、その全行を削除してしまいます。
間違えずに指定してください。
・ 強制トランザクション中は、Truncate プロパティの指定は無効となります。
詳しくは、「4.2.2 排他制御に関する注意事項」を参照してください。
・ Truncate プロパティにビューは指定できません。導出元テーブル名を指定してください。
このような注意事項がありますので、入出力文 COBOL アプリケーションを実行する前に、Oracle のユーティリティ等で Truncate Table
文でデータを削除しておくことを推奨します。
[Truncate プロパティの使用方法]
COBOL 初期化ファイルの Truncate プロパティに対象のテーブルを指定してください。
例)ファイル EMPLOYEE に対する記述例
4.1.4.7
データベース・ユーティリティの活用
順アクセスの性能(特に WRITE)は、一般にファイルシステム系製品と比較して、処理時間がかかります。大量のデータコピーを行う場
合は、PowerRDBconnector を使用せずにデータベース製品で提供されているユーティリティを活用してください。
データコピーを前提に設計されたデータベース製品のユーティリティは、そのデータベース製品で最も高速にデータコピーできるよう
に設計されています。
Oracle では、以下のユーティリティでデータを高速にコピーできます。
・ SQL*Loader ユーティリティ
外部データファイルとデータベースの表で大量転送するときに活用します。
・ exp ユーティリティ
データベースオブジェクト(データスペース、表など)単位でエクスポートするときに活用します。
・ imp ユーティリティ
エクスポートしたデータベースオブジェクトをインポートするときに活用します。
4.1.4.8
I-O オープンでの READ 性能
I-O オープンの READ 文でレコードロック処理が動作するため、READ 性能がテーブルロックと比較して数倍から 20 倍程度(READ
文一回当たり数ミリ秒)の時間を要します。I-O オープンで READ 文を大量に実行するアプリケーションでは、テーブルロックをするか
INPUT オープンするか見直してください。詳しくは、「4.2.2 排他制御に関する注意事項」を参照してください。
- 87 -
注意事項
4.2
本節では、「4.1 開発のポイント」で説明した開発手法が適用できない場合の注意事項を説明します。
4.2.1
トランザクションに関する注意事項
ここでは、トランザクションに関する注意事項を説明します。
4.2.1.1
トランザクションの確定、取消しを実行せずに終了した場合
COBOL アプリケーションではトランザクションの確定または取消し、およびファイルのクローズを行ってください。
トランザクションサブルーチンを使用する COBOL アプリケーションにおいて、トランザクションの確定または取消し、およびファイルをク
ローズせずに COBOL アプリケーションが終了した場合、トランザクションは以下のようになります。
・ トランザクションの確定または取消しを行わずに全てのファイルをクローズした場合、トランザクションは取り消されます。
図 4.1 トランザクションの確定、取消しを実行しない場合のトランザクション処理
・ トランザクションを終了(確定または取消し)せず、またはファイルをクローズせずにアプリケーションが終了した場合、トランザクショ
ンは取り消されます。
図 4.2 トランザクションの確定、取消しおよび CLOSE を実行しない場合のトランザクション処理
・ タスクマネージャーなどで COBOL アプリケーションを強制終了した場合、データベースにより、トランザクションは取り消されます。
- 88 -
・ COBOL アプリケーションが、トランザクションを終了(確定または取消し)する前に、アプリケーションエラーで中断した場合、デー
タベースによりトランザクションは取り消されます。
・ COBOL アプリケーション動作中に、データベースサービスを中断またはネットワークを中断した場合、トランザクションは取り消さ
れます。
図 4.3 プログラム中断した場合のトランザクション処理
4.2.1.2
テーブルロック機能とトランザクションについて
テーブルロックを指定したファイルをオープンすると、強制的にトランザクションを開始するため、テーブルロックを指定したファイルの
オープン中は、トランザクションの操作(開始、確定、取消し)が無効となります。
4.2.2
排他制御に関する注意事項
ここでは、排他制御に関する注意事項を説明します。
4.2.2.1
COBOL アプリケーションを終了した場合
テーブルロックを獲得した状態で、クローズせずに COBOL アプリケーションが終了した場合、以下の注意事項があります。
・ テーブルロックで強制的に開始されたトランザクションは確定されます。
強制的に開始されたトランザクションを取消しする場合は、テーブルロック解除時のトランザクション取消し機能を実行してくださ
い。詳細は、「3.5.3.2 テーブルロック解除時のトランザクション取消し機能」を参照してください。
4.2.2.2
削除したレコードの待合せについて
UNIQUE 制約のインデックスを持つテーブルに対して、以下の条件を満たす場合には、WRITE 文でレコードロックの待ち合わせが発
生します。
・ レコードロックを獲得し、かつ、レコードを削除する場合。
- 89 -
・ レコードロックを解放していない状態にて、他のセッションやアプリケーションから削除したレコードと同一のキー値に対し、レコード
の書き込みを行う場合。
4.2.2.3
レコードロックの排他制御について
レコードロックを使用し、かつトランザクションサブルーチンを使用しない COBOL アプリケーションでは、I-O オープンの READ 文で強
制的にトランザクションを開始して、以下の入出力文でトランザクションを終了させることでレコードロックを実現します。
・ START 文、順 REWRITE 文、READ 文、順 DELETE 文、RANDOM モードの乱 REWRITE 文、RANDOM モードの乱 DELETE
文、CLOSE 文
レコードロックの排他制御で動作するトランザクションについて、以下の注意があります。
・ レコードロック対象となるファイルが複数ある場合、I-O オープンで READ した状態のファイルが1つでもあると、他のファイルに対
し入出力を行っても強制トランザクションは終了しません。強制トランザクションの終了は、その READ した状態が終了した時点で
行われます。
(「参考例 3」、「参考例 4」、「参考例 5」を参照してください。)
・ 複数ファイルで I-O オープンの READ があると、トランザクション区間が延長することがあるので、トランザクション区間内に READ
していた複数のレコードがレコードロックされ、「ASP Symfoware6000」、「NetCOBOL のファイルシステム」と排他制御が異なりま
す。
(「参考例 3」、「参考例 4」、「参考例 5」を参照してください。)
・ 強制トランザクション中は、Truncate プロパティの指定は無効となります。OUTPUT でオープンする場合は、入出力文 COBOL ア
プリケーションを実行する前に、Oracle のユーティリティ等で Truncate Table 文でデータを削除後に、書込み処理にトランザクショ
ンを適用させることを推奨します。
・ 強制トランザクション中のトランザクション操作(開始、終了、取消し)はエラーとなります。
上記以外に、Oracle 固有の読み取り一貫性による注意事項があります。詳細は、「4.2.3.6 読み取り一貫性に関する注意事項」を参照
してください。
参考として、1つのアプリケーションが1つまたは2つのファイルを使用した入出力文操作順序の組合せによるトランザクション区間の遷
移を示します。
トランザクション区間は以下の表記です。
図 4.4 参考例 1)1 ファイルの単純な入出力操作の場合
- 90 -
図 4.5 参考例 2)トランザクション区間がファイル A とファイル B の入出力操作で別々に分かれる場合
図 4.6 参考例 3)トランザクション区間がファイル B の入出力操作に依存する場合
ファイル A の READ 中にファイル B の READ が実行されるため、トランザクション区間が延長されます。
図 4.7 参考例 4)トランザクション区間がファイル A の入出力操作に依存する場合
ファイル A を READ 中のため、ファイル B の REWRITE 後もトランザクション区間は延長され、ファイル A の REWRITE でトラン
ザクションは終了します。
- 91 -
図 4.8 参考例 5)トランザクション区間が最大まで延長される場合
トランザクションを終了できる区間がないため、CLOSE まで延長されます。
4.2.2.4
テーブルロックの排他制御について
テーブルロックを使用するセッションは、ファイルの OPEN 文で強制的にトランザクションを開始して CLOSE 文でトランザクションを確
定することでテーブルロックを実現します。テーブルロックの排他制御で動作するトランザクションについて、以下の注意があります。
・ トランザクションは、テーブルロックが有効なファイルが全てクローズされるまで確定しません。(「参考例 2」を参照してください。)
・ 排他モードが変化しない場合があります。
例えば、1つのアプリケーションで、ファイル A をオープン中に、ファイル B を I-O オープン(Exclusive)した後、一旦クローズして
INPUT オ ー プ ン (Share) し て も 、 先 に 排 他 モ ー ド が 強 い Exclusive( 占 有 モ ー ド ) で ロ ッ ク さ れ て い る た め 、 フ ァ イ ル B は、
Exclusive(占有モード)のままとなります。(「参考例 3」を参照してください。)
・ テーブルロックを指定したファイルのオープン中に、テーブルロックを指定しないファイルを操作する場合、テーブルロックの強制
的なトランザクションに従って操作されます。
(「参考例 4」を参照してください。)
参考として、1つのアプリケーションが1つまたは2つのファイルを使用した入出力文操作順序の組合せによるトランザクション区間の遷
移を示します。
トランザクション区間は以下の表記です。
図 4.9 参考例 1)1 ファイルの単純な入出力操作の場合
- 92 -
図 4.10 参考例 2)トランザクション区間がファイル A の入出力操作に依存する場合
ファイル A のオープン中にファイル B がオープンされるため、テーブルロックはテーブルロック対象の全てのファイルがクローズす
るまで区間が延長されます。
図 4.11 参考例 3)排他モードが変化しない場合
1つのアプリケーションで、ファイル A をオープン中に、ファイル B を I-O オープン(Exclusive)した後、INPUT オープン(Share)して
も、先に排他モードが強い Exclusive(占有モード)でロックされているため、ファイル B は、Exclusive(占有モード)のままとなります。
- 93 -
図 4.12 参考例 4)テーブルロック対象のファイル A と、テーブルロック対象のファイル B が混在する場合
ファイル A のオープン中にファイル B がオープンされるため、テーブルロックはテーブルロック対象の全てのファイルがクローズす
るまでトランザクション区間が延長されます。
4.2.2.5
デッドロック状態について
テーブルロックまたはレコードロックを使用する場合、処理順序によっては、他のセッションや他のアプリケーションとたすき掛けとなり、
デッドロック状態となることがあります。
・ テーブルロックの例
以下の処理順序でデッドロックが発生します。
1. 先行アプリケーションが A テーブルをテーブルロックし、B テーブルをテーブルロックしません。
2. 後行アプリケーションが A テーブルをテーブルロックしないで、B テーブルをテーブルロックします。
・ レコードロックの例
複数プロセスで、同じテーブルのレコードを READ する場会、トランザクションが継続している間は、I-O オープンで READ した行
はロックされたままとなっているため、別のレコードを READ すると、デッドロックが発生することがあります。
・ マルチセッションプログラムの例
マルチセッションプログラムの場合、1つのプログラムでも異なるセッションアクセスするため、テーブルロックやレコードロックによる
デッドロックが発生します。
4.2.2.6
テーブルロックとレコードロックの混在について
同一のテーブルやレコードが競合した場合の、テーブルロックおよびレコードロックの排他関係を以下に示します。(表中の入出力文
は実行直後の状態を示します。)
- 94 -
表 4.3 テーブルロックとレコードロックの排他関係
後行セッション/後行アプリケーション
テーブルロック
IN
IO
EX
レコードロック
OT
IN
OPEN
先
行
セッ
ショ
ン/
先
行
ア
プリ
ケ
ー
ショ
ン
テ
ー
ブ
ル
ロッ
ク
READ
乱 REWRITE
乱 DELETE
○
×
×
×
○
○
△
△
×
×
×
×
○
△
△
△
×
×
×
×
○
△
△
△
OT
×
×
×
×
○
△
△
△
IN
○
○
○
○
○
○
○
○
○
×
×
×
○
×
△
△
IN
IO
EX
レ
コ
ード
ロッ
ク
IO
OPEN
READ
IO
オープンモードは以下の記号を使用しています。
・ IN:INPUT
・ IO:I-O
・ EX:EXTEND
・ OT:OUTPUT
○
後行のテーブルロックではオープンは成功します。
後行のレコードロックではオープンは成功し、入出力文も成功します。
×
後行のテーブルロックではオープンで失敗します。(待機せずに FILE-STATUS 92 を通知します。)
後行のレコードロックではオープンは成功し、入出力文で待機します。(待機時間を超えた場合は、FILE-STATUS 92 を通知しま
す。)
△
Oracle の仕様で先行のロックが解除されるまで待機します。
- 先行がテーブルロックでロックしている場合、後行の入出力文は解除されるまで待機します。
- 先行がレコードロックでロックしている場合、後行の入出力文はレコードロックが解除されるまで待機します。
4.2.3
COBOL アプリケーションに関する注意事項
ここでは、COBOL アプリケーションに関する注意事項を説明します。
- 95 -
4.2.3.1
キーに重複した値がある索引ファイルについて
索引ファイルのキーに重複した値がある場合は、以下の注意が必要です。
・ キーに重複した値があるレコードの並び順は格納順になりません。
データベースの制御上の順番となるためです。
・ キーを指定した更新や削除は行わないでください。
キーを指定して更新または削除を行うと、データベースから検索された同一キーのレコードのうち、最初のレコードが更新または削
除されます。この場合、対象のレコードは、データベースの並び順に依存し、利用者からは特定できないためです。
・ キーに重複した値があるレコードに対し、操作中に読取り方向を変更しないでください。
読取り方向を変更すると、データベースへ再度検索を行います。このとき、重複したキーのレコードがデータベースの並び順で検
索されます。このため、読取り方向変更前に読み取った順序の逆順に読み取れない場合があります。
4.2.3.2
ビューの使用について
ビューを使用する場合、以下の注意が必要です。
・ 1つのテーブルで構成された単一ビューのみ使用できます。
・ 結合ビューおよび UNION 結合ビューにはアクセスできません。
・ 関数、副問合せなどが定義されたビューには、アクセスできません。
・ ビューを構成するテーブルの列属性を変更した場合、ビューを 1 度削除して再作成してください。
4.2.3.3
レコードの格納位置について
WRITE 文でレコードを追加した場合、レコードはテーブルの最後に格納されるとは限りません。データベースの仕様に依存します。順
編成ファイルに対して、書込み順どおりに読み込まれない場合があります。
4.2.3.4
文字コード変換について
データベースに格納される文字コードは、データベースのテーブル定義または設定で異なります。特殊文字、ユーザー定義文字など
の文字セットに注意してください。
・ PowerRDBconnector は、Interstage Charset Manager の文字コード変換プログラムは使用しません。
・ unicode の空白文字に対して、PowerRDBconnector は、UCS2(UTF-16)と UTF-8 の間で文字コード変換を行うことがあります。
・ COBOL アプリケーションの文字コード系が、unicode 系(UTF8-UCS2、UCS2 または UTF16)の場合
日本語項目に対して UTF-8 コード系との間でコード変換を行います。
・ PowerRDBconnector は、NetCOBOL for .NET で、コード系に SJIS-UCS2(英数字項目がシフト JIS、日本語項目が unicode)を指
定した場合、コード系の変換を行います。
コード系に SJIS-UCS2 を指定した場合、Oracle のコード系は unicode でなければなりません。このとき、PowerRDBconnector は、
英数字項目のデータをシフト JIS と unicode(UTF-8)の間でコード変換します。このため英数字項目内に日本語が存在した場合、
コード変換エラーが生じることがあります。
コード系の指定方法については、「3.1.6 コンパイル方法」を参照してください。
4.2.3.5
OUTPUT モードのオープンの使用について
OUTPUT モードでテーブルまたはビューをオープンする場合、以下の注意事項があります。
- 96 -
・ Truncate プロパティを使用して、OUTPUT モードで OPEN 文を実行する COBOL アプリケーションを起動するユーザーについて
は、システム権限に“DROP ANY TABLE ”を設定してください。
・ OUTPUT モードでオープンしたファイルに対して、二重にオープンすることはできません。
・ テーブルロック対象のテーブルを OUTPUT モードでオープンした場合、処理結果の反映の有無について、以下に示します。
- ファイルをクローズせずに COBOL アプリケーションを終了すると、それまでの処理結果が反映されます。
- ファイルをクローズする前に、タスクマネージャーなどから COBOL アプリケーションを途中で中断した場合や、アプリケーショ
ンエラーで中断した場合およびデータベースのサービスが中断した場合、それまでの処理結果は取り消されます。
・ OUTPUT モードでオープンした場合でも、テーブルロックの指定がないかぎり、テーブルロックは獲得されません。
4.2.3.6
読み取り一貫性に関する注意事項
Oracle の読み取り一貫性による注意事項を説明します。
Oracle の読取り一貫性のため、以下のような動作になることがあります。
・ 読取り方向の行に対してキー更新(追加、更新、削除)されているとデータ更新前のデータが READ 文で読込まれる場合がありま
す。
このような場合、キーを位置付けし直し、再度 READ することにより、最新のデータが読み込まれます。
・ レコードロックを獲得中のレコードに対して、乱 REWRITE 処理を実行した場合、乱 REWRITE 処理で待合わされている間にレ
コードが削除されると、待合わせ中であった REWRITE 文はエラーとならないことがあります。
このような状態が発生しうるアプリケーションを作る場合には、乱 REWRITE 処理は使わずに、順処理の READ 文と REWRITE
文で処理を行ってください。
4.2.4
マルチスレッド使用時の注意事項
ここでは、マルチセッションプログラミングを使用したマルチスレッドプログラムの開発についての注意事項を説明します。
4.2.4.1
マルチスレッドプログラムについて
マルチスレッドプログラムについての主な注意点を以下に示します。
・ マルチスレッドプログラムは、多重動作時のプログラムのデバッグが、プロセスプログラムより難しくなります。
・ プロセスプログラムは、エラーが発生したプロセスだけが影響を受け、他のプロセスには影響がおよびません。しかしマルチスレッ
ドプログラムは、1つのスレッドでエラーが発生すると、同じプロセス内の他のスレッドにも影響がおよぶことがあります。
例えば、マルチスレッドプログラムが多重動作している場合、1つのスレッドで、プログラムを中断してしまうと、同じプロセスの他の
スレッドも中断されてしまいます。
このため、特にエラー処理を注意して開発してください。
・ マルチスレッドプログラムでは、共有資源(静的な変数、カレントパスなど)を各スレッドが操作する場合は、共有資源に矛盾が生じ
ないように、スレッドをロックする必要があります。
・ マルチスレッドプログラミングの場合、スレッドのスタック域がアプリケーションで規定された値を超えないように考慮する必要があり
ます。PowerRDBconnector は、スタック域として64KB を使用します。
4.2.4.2
スレッドとセッションの関係について
マルチセッションプログラミングを用いて、マルチスレッド環境で動作させた場合の、スレッドとセッションの関係について以下に示しま
す。なお、例では、次の記号を使用しています。
・ COB_PRDB_START SES1:COB_PRDB_START サブルーチンを使用し、SES1 というセッションを開設します。
・ COB_PRDB_END SES1:COB_PRDB_END サブルーチンを使用し、SES1 というセッションを閉設します。
- 97 -
図 4.13 例 1 1つのプログラムをシングルスレッドで動作させる場合
コンソールアプリケーションや、シングルセッションプログラムを単純にマルチセッションプログラムに変更した場合、上図のよう
になります。
図 4.14 例 2 同じプログラムを複数のスレッドで動作させる場合
例 1 のプログラムが複数のスレッドで動作した場合、上図のようになります。
マルチスレッドプログラミングで、スレッド間で同じ COBOL 言語のファイル結合子を共有する方法は、翻訳オプションに SHREXT を
指定した上で以下のいずれかの指定をしてください。
・ スレッド間共有外部ファイル(EXTERNAL 句)
・ 静的に定義したファイル(STATIC)
・ オブジェクト内に定義したファイル(OBJECT)
以下に、スレッド間共有外部ファイル(EXTERNAL 句)を使った例を示します。その他の場合は、「NetCOBOL のマニュアル」を参照し
てください。
例 3 スレッド間でファイルを共有する場合
OPEN 文、CLOSE 文およびアクセス文が異なるプログラムの場合。
- 98 -
図 4.15 アクセスするスレッドが1つの場合
図 4.16 アクセスするスレッドが複数の場合
※)この場合、スレッド 2 の READ 文とスレッド 3 の WRITE 文は同時に実行されず、先に実行した文の終了を待って次の文が実行さ
れます。
例 4 スレッド間でファイルを共有する場合(使用できない例)
1つのセッションを使用し、OPEN 文、CLOSE 文およびアクセス文が異なるプログラムの場合。
EXTERNAL 句の宣言がないため、同じファイルに対してスレッドをまたがってアクセスできません。
図 4.17 スレッド間でファイルを共有する場合(使用できない例)
4.2.4.3
セッションとトランザクションの関係について
マルチセッションプログラミングを用いて、マルチスレッド環境で動作した場合の、スレッドとセッションおよびトランザクションの関係に
ついて以下に示します。なお、例では、次の記号を使用しています。
・ COB_PRDB_START SES1:COB_PRDB_START サブルーチンを使用し、SES1 というセッションを開設します。
- 99 -
・ COB_PRDB_END SES1:COB_PRDB_END サブルーチンを使用し、SES1 というセッションを閉設します。
・ COB_PRDB_TRAN SES1:COB_PRDB_TRAN サブルーチンを使用し、SES1 というセッションを指定します。
例 1 トランザクション区間が1つのスレッドに閉じる場合
単純な COBOL プログラムの場合、データベースにアクセスする部分は1つのスレッドで行われます。この場合の例を示します。
図 4.18 トランザクション区間が1つのスレッドに閉じる場合
4.2.5
リモートのデータベースアクセスに関する注意事項
ここでは、リモートのデータベースに対して COBOL アプリケーションからアクセスする場合についての注意事項を説明します。
4.2.5.1
大量のレコードアクセスについて
リモートデータベースに COBOL アプリケーションから、アクセスする場合、レコード 1 件毎にネットワークを通じたアクセスが発生しま
す。このため大量のレコードアクセスを行うと、以下の影響が発生します。
・ ネットワーク負荷の増加
・ レコードアクセス性能の劣化
上記のため、大量のレコードアクセスを行うバッチ型のアプリケーションは、データベースを格納したコンピュータ上で実行してくださ
い。
4.2.5.2
セキュリティについて
リモートデータベースにアクセスする場合、データ内容がネットワーク上で通信されます。このため、ネットワーク上のセキュリティの確保
が必要です。
データベース認証を行う場合は、COBOL アプリケーション内で、ユーザー名、パスワードの管理についてのセキュリティを確保してく
ださい。
例)
・ 認証情報登録サブルーチンに使用する、ユーザー名、パスワードは、COBOL アプリケーション実行時に、ユーザーから入力して
もらう。
・ 認証情報登録サブルーチンの使用後は、ユーザー名、パスワードの領域を、空白データなどで初期化する。
ネットワーク上は、データベース、Windows やその他の製品が備えているセキュリティ機能を使用して、セキュリティの確保を行ってく
ださい。
- 100 -
- 101 -
第5章
エラー時の対処
本章では、PowerRDBconnector 使用時に発生したエラーの原因と対処、およびトレース機能について説明します。エラーが発生した
ときにお読みください。
5.1
エラー時の対処
本節では、エラー発生時の対処について説明します。
エラー発生時は、エラー情報をアプリケーションログに出力します。アプリケーションログは、Windows のイベントビューアで参照できま
す。
ファイルアクセスでエラーが発生した場合は、COBOL アプリケーションに FILE STATUS を通知します。なお、FILE STATUS の入出
力状態値がエラーでも PowerRDBconnector のエラー情報が出力されていない場合は、NetCOBOL でエラーを検出した可能性があ
ります。その場合は、NetCOBOL のマニュアルを参照してください。
以下の手順を参考に対処してください。
アプリケーションの状態を確認します。
COBOL アプリケーションのアクセスでエ
ラー発生
FILE STATUS の入出力状態値を確認します。
使用しているデータベース、テーブル、ビューを特定します。
↓
アプリケーションログを確認します。
アプリケーションログ
の確認
エラー情報(エラーコードとエラー詳細コード)から原因を調査し
ます。「5.1.1.3 ファイルアクセス時のエラーコード一覧」、「5.1.2.2
トランザクションアクセス時のエラーコード一覧」、「5.1.3.2 認証情
報登録サブルーチンのエラーコード一覧」、および「5.1.4.2 セッ
ションサブルーチンのエラーコード一覧」を参考に調査してくださ
い。
エラー情報にメッセージが含まれる場合は、データベースの実行
環境を調査してください。
↓
データベースの実行環境を確認します。
データベースの確認
アプリケーションログに出力されているメッセージを参考に、使用
しているファイル(テーブル、ビューおよびインデックス)が使用可
能な状態か、Oracle の保守機能(SQL Analyze や Lock Monitor
等)を使用して動作状況を調査します。Oracle のマニュアルを参
考に対処してください。
↓
エラーが再現する場合、エラーログおよびトレース情報を採取し
ます。
エラーログ、トレース情報の採取と調査
トレース情報を調査し、COBOL アプリケーションを調査してくだ
さい。トレース情報については、「5.2 トレース出力機能」を参照し
てください。
エラーログは、内部情報です。当社技術員からの依頼により採取
してください。
- 102 -
5.1.1
5.1.1.1
ファイルアクセス時のエラー情報
ファイルアクセス時のイベントログ情報
ファイルアクセス時にエラーが発生すると、以下の形式でエラー情報が出力されます。
表 5.1 ファイルアクセス時のイベントログ情報
出力先
アプリケーションログ
ソース
FSP_RDBCONNECTOR_FJSVDBIO
出力形
式
<process id>
プロセス ID。
<thread id>
スレッド ID。
<function name>
エラーが発生した関数名。
<error code>
エラーコード。
<error code1>
エラー詳細コード 1。
<error code2>
エラー詳細コード 2。
<error code3>
エラー詳細コード 3。
<error code4>
エラー詳細コード 4。
<table name>
エラーが発生したテーブル名、ビュー名またはシノニム名を出力
します。※
PowerRDBconnector 動作環境ファイルおよび COBOL 初期化
ファイルが正しく設定されていない場合には通知されません。
<column name>
エラーが発生した列名を出力します。※
<parameter name>
エラーが発生した PowerRDBconnector 動作環境ファイルのプロ
パティ名を出力します。※
<rowid>
レコードの ROWID が通知されます。※
<database message>
Oracle から通知されたメッセージを出力します。
Oracle でエラーが検出された場合に出力します。Oracle のマニュ
アルを参照して調査してください。
エラーが発生していない場合には、メッセージは出力されませ
ん。
※:エラー内容によっては、出力されないことがあります。
- 103 -
出力例
イベントログに出力されないエラー情報
5.1.1.2
以下の FILE STATUS が通知された場合は、アプリケーションログにエラー情報は出力されません。
表 5.2 アプリケーションログに出力されないエラー情報
意味
FILE STATUS
iserrno
10
110
EOF が検出されました。
22
100
キー値に重複データが検出されました。
23
111
目的のレコードが見つかりません。
ファイルアクセス時のエラーコード一覧
5.1.1.3
FILE STATUS 句を指定したアプリケーションについて、ファイルアクセス時のエラーコードを以下に示します。ただし、NetCOBOL で
エラーを検出するコードについては、iserrno、isstat は通知されません。
表 5.3 ファイルアクセスエラーコード一覧
FILE
STA iserrno
TUS 10 進数
error code
意味
isstat
1
2
3
4
・ EOF が検出されました。
10
110
‘1’
0x30
‘1’
0x30
されました。
100
‘2’
0x32
‘2’
0x32
111
‘2’
0x33
‘2’
0x33
・ 重複するキー値を扱う場合
はテーブルの UNIQUE 属
性を外してください。
・ WRITE 文または REWRITE
・ WRITE 文 、 REWRITE 文
文の実行時に、同じキー値が
テーブルに存在していまし
た。
で重複するキー値を指定し
ないでください。
・ 目的のレコードがありません。
23
・ 対処は特にありません。
※エラー情報はアプリケーション
ログに出力されません。
・ キー値に重複データが検出
22
対処
・ 指定されたキー値がテーブル
に存在していません。
- 104 -
※エラー情報はアプリケーション
ログに出力されません。
・ 入 出 力 文 COBOL ア プ リ
ケーションの START 文また
は キ ー 付 き READ 文 、
REWRITE 文、DELETE 文
に指定しているキー値が
FILE
STA iserrno
TUS 10 進数
error code
意味
isstat
1
2
3
対処
4
テーブルにあるか確認して
ください。
※エラー情報はアプリケーション
ログに出力されません。
・ メモリ領域獲得に失敗しまし
た。
30
―
―
―
―
しくは、仮想メモリ(スワップ)
を増やしてください。
―
・ ファイルが多すぎます。
・ ハンドルに誤りがあります。
・ OPEN 文で指定されたテー
ブルが存在しません。
・ COBOL 初期化ファイルの
35
2
‘0’
0x00
‘0’
0x00
SchemaName 、 TableName
プロパティに存在しないス
キーマ名、テーブル名が指定
されています。
・ 他のプロセスまたは他のセッ
ションで OUTPUT オープン
されています。
37
―
―
―
―
―
・ ファイル属性に一致しないア
クセスがありました。
―
―
―
―
―
0x00
‘0’
0x00
指定したスキーマ名、テー
ブル名を確認し、適切なス
キーマ名、テーブル名に修
正してください。
・ 対象テーブルが他のプロセ
スまたは他のセッションで
OUTPUT オープンされてい
ないか確認してください。
・ 当社技術員に連絡してくだ
さい。
指定したファイル属性と、
ファイル属性とが一致するよ
うにしてください。
ん。
・ 索引ファイルのキー項目に対
・ 索引ファイルのキーの属性
する属性(オフセット、大き
さ、
WITH DUPLICATES 等)が
一致しません。
が、ファイルと一致するよう
にしてください。
・ RANDOM アクセスモードで
・ COBOL 初期化ファイルと、
キー指定がありません。
‘0’
・ COBOL 初期化ファイルに
・ COBOL 初期化ファイルで
・ DYNAMIC アクセスモードで
5
ください。
め、ファイルのオープンがで
きません。
キー指定がありません。
90
・ アプリケーションを見直して
・ ファイル属性に一致しないた
・ ファイル編成が一致しませ
39
・ メモリを増設してください。も
COBOL ソース中のアクセス
モードの指定が同じである
か確認してください。
・ PowerRDBconnector 動作環
・ PowerRDBconnector 動 作
境ファイルの内容に誤りがあ
ります。
環境ファイルの内容を確認
してください。
・ ServerName の指定に誤りが
あります。
・ その他の内部エラーが発生
しました。
90
5
‘0’
0x00
‘1’
0x00
・ 未サポートのコード系が指定
されました。
- 105 -
・ 当社技術員に連絡してくだ
さい。
・ COBOL の翻訳オプションを
確認してください。
FILE
STA iserrno
TUS 10 進数
error code
意味
対処
・ 入出力エラーが発生しまし
・ 当社技術員に連絡してくだ
isstat
1
2
3
4
90
5
‘9’
0x02
‘9’
0x02
90
5
‘9’
0x03
‘9’
0x03
た。
さい。
・ 入出力エラーが発生しまし
た。
さい。
・ データベースのサービスが起
動されていません。
90
6
‘0’
0x00
‘0’
0x00
9
‘0’
0x00
‘0’
0x00
90
12
‘0’
0x00
‘0’
0x00
90
13
‘0’
0x00
‘0’
0x00
90
14
‘9’
0x00
‘9’
0x00
・ データベースにアクセスす
るための権限があるか確認
してください。
・ データベースにログイン情報
・ データベースに OS 認証の
・ サーバ環境または動作環境
境ファイルの ServerName プ
ロパティで指定されたサーバ
が見つかりません。
の設定を確認してください。
・ 可変長レコード形式が指定さ
・ 固定長レコード形式になっ
れました。
0x00
‘0’
0x00
22
‘9’
0x34
‘9’
0x34
・ OS、データベースのメモリ設
・ データベースまたはスキー
・ データベースまたはスキー
マ、テーブルに対するアクセ
ス権限がありません。
マ、テーブルの権限設定を
確認してください。
・ ファイルディスクリプタが正し
・ 当社技術員に連絡してくだ
くありません。
・ インストール時に選択した
データベースと異なるデータ
ベースに接続しようとしまし
た。
90
ているか確認してください。
定環境を見直し、適切に対
処してください。
ベースへ接続しようとしまし
た。)
‘0’
ログイン情報が登録されて
いるか確認してください。
・ PowerRDBconnector 動作環
・ サポートしていないデータ
22
起動されているか確認して
ください。
ための権限があるか確認して
ください。
・ メモリが不足しています。
90
・ データベースのサービスが
・ データベースにアクセスする
が登録されていません。
90
・ 当社技術員に連絡してくだ
さい。
・ 接続先データベースを確認
してください。
・ 接続先のデータベースとイ
ンストール時に選択したデー
タベースを確認してくださ
い。
・ COBOL のデータ型とテーブ
・ テーブル定義およびテーブ
ルのデータ型で一致していな
いものがあります。
ルに格納されているデータ
を確認し、「3.1.3.5 列定義の
対応」を参照して適切なテー
ブル定義に修正してくださ
い。
・ テーブルの列名に誤りがあり
ます。
・ 未サポートのデータ型の列が
存在します。
90
22
‘9’
0x35
‘9’
0x35
・ 符号なしのデータ型で定義さ
・ テーブルの列属性および
れる列に符号付きのデータを
書き込もうとしました。
テーブルに格納されている
データの確認をしてくださ
い。テーブルの列属性につ
・ 未サポートのデータ型のデー
タを検出しました。
- 106 -
FILE
STA iserrno
TUS 10 進数
error code
意味
isstat
1
2
3
対処
4
・ 文字コード変換に失敗しまし
た。
いては、「3.1.3.5 列定義の
対応」を参照してください。
・ データ長が COBOL または
テーブルの定義長を超えて
います。
・ 使用できないキー値が入力さ
れました。
22
‘9’
0x36
‘9’
0x36
・ JIS2004 固有文字を扱うに
JIS2004 固有文字が含まれて
います。
は、COBOL 定義とデータ
ベースの列定義の対応関係
が正しくありません。
正しい対応関係について
は、「JIS2004 の文字コード
について」を確認してくださ
い。
RecordLock プロパティが混
在で指定されています。
・ ロック指定がありません。
90
101
‘9’
0x00
‘9’
0x00
90
101
‘9’
0x00
‘9’
0x32
90
102
‘9’
0x00
‘1’
0x00
90
102
‘9’
0x00
‘2’
0x00
・ ファイルディスクリプタが正し
くありません。
・ ファイルディスクリプタが正し
くありません。
・ COBOL 初期化ファイルの読
込みに失敗しました。
102
‘9’
0x00
‘3’
ドロックの指定が正しくありま
せん。ロックの指定を見直し
てください。ロックの指定方
法については、「3.5 排他制
御」を参照してください。
・ 当社技術員に連絡してくだ
さい。
・ 当社技術員に連絡してくだ
さい。
・ 環境設定が正しいか確認し
てください。
・ COBOL 初期ファイルの指
定値の文字列長が規定の長
さを超えています。
定内容を見直して、適切に
対処してください。
・ COBOL 初期化ファイルのプ
COBOL 初期化ファイルについ
ては、「3.1.5 COBOL 初期化
ファイル」を参照してください。
・ COBOL 初期化ファイルの
0x00
・ テーブルロックおよびレコー
・ COBOL 初期化ファイルの設
ロパティ名に誤りがあります。
90
確認してください。
・ 読込み対象のデータに
・ TableLock プロパティと
90
・ キー値に指定するデータを
AccessMode
、
SchemaName、
TableName プロパティに値が
指定されていません。
・ COBOL 初期化ファイルのプ
ロパティに指定した値に誤り
があります。
90
102
‘9’
0x00
‘4’
0x00
・ AccessMode が指定されてい
ません。
・ スキーマ名またはテーブル名
が指定されていません。
90
103
‘9’
0x00
‘9’
0x00
・ 指定したキーの構成とアクセ
・ 指定するキー構成および
スするインデックスの構成が
一致しません。
テーブルのインデックス構成
- 107 -
FILE
STA iserrno
TUS 10 進数
error code
意味
isstat
1
2
3
対処
4
・ キーの構成にサポートしてい
ないデータ型が含まれていま
す。
を見直し、適切なキーを設
定してください。
・ Oracle でサポートされている
インデックスの構成列数の上
限値(32)を超えています。
90
104
‘9’
0x02
‘9’
0x02
90
116
‘9’
0x00
‘9’
0x00
・ 1 プロセス(シングルスレッド)
・ 最大オープン数が 128 を超
で可能な最大オープン数
128 を超えました。
えないように COBOL アプリ
ケーションの内容を確認して
ください。
・ メモリが不足しています。
定環境を見直し、適切に対
処してください。
・ 製品が正しくインストールされ
ていません。
・ その他のエラーが発生しまし
90
90
255
255
‘0’
‘0’
0x00
0x00
‘0’
‘1’
0x00
0x00
た。
‘0’
0x00
‘2’
0x00
90
255
‘0’
0x00
‘3’
0x00
されているか確認してくださ
い。
・ 当社技術員に連絡してくだ
・ トレース情報の書込みでエ
・ PowerRDBconnector 環 境
ラーが発生しました。
この場合、トレース情報は採
取されません。処理は続行さ
れます。
ファイル内の ErrorLog プロ
パティで指定したディレクトリ
の権限などを確認してくださ
い。
・ PowerRDBconnector 動作環
・ PowerRDBconnector 動 作
境ファイル名が誤っていま
す。
環境ファイルの設定を確認
してください。
・ PowerRDBconnector 動作環
PowerRDBconnector 動作環境
ファイルについては、「3.1.4
PowerRDBconnector 動作環境
ファイル」を参照してください。
・ PowerRDBconnector 動作環
255
・ 本製品が正しくインストール
さい。
境ファイルの読込みに失敗し
ました。
90
・ OS、データベースのメモリ設
境ファイルの設定値の文字列
長が規定の長さを超えていま
す。
・ PowerRDBconnector 動作環
境ファイルのキーワードに誤
りがあります。
・ PowerRDBconnector 動作環
境ファイルで指定された値に
誤りがあります。
・ インストール時のデータベー
90
255
‘0’
0x00
‘4’
ス種別に誤りがあります。
0x00
- 108 -
・ インストール時のデータベー
ス種別を、環境変数
"RDBCONNECTOR" で 確
認し、誤っていた場合には、
本製品をアンインストール
後、正しいデータベース種
別を指定してインストールし
てください。
FILE
STA iserrno
TUS 10 進数
90
255
error code
意味
対処
・ PowerRDBconnector 動作環
・ PowerRDBconnector 動 作
境ファイルが、シフト JIS また
は UTF-8 以外のコード系で
作成されています。
環境ファイルは、シフト JIS
または UTF-8 のコード系で
作成してください。
・ データベースでエラーが発生
・ Oracle が出力するエラーを
isstat
1
‘0’
2
0x00
3
‘5’
4
0x00
しました。
・ データベースの最大カーソル
オープン数の上限に達してい
ます。
アプリケーションログから調
査してください。
・ Oracle の動作環境を確認し
てください。
・ COBOL のデータ型とデータ
90
255
‘0’
0x00
‘6’
0x00
ベースの列定義が異なって
います。
・ 製品のライセンスがありませ
ん。
・ 環境変数(NLS_LANG など)
の設定値に誤りがあります。
・ Truncate で指定されたテー
ブルが見つかりません。
・ セッション開設は既に実行さ
れています。
90
255
‘0’
0x00
‘8’
0x00
・ シングルセッションプログラミ
・ COBOL 初期化ファイルの
設定内容を確 認してくださ
い。
・ セッション開設およびセッショ
ン閉設のシーケンスを確認
してください。
ングの処理が動作中に、セッ
ション開設が実行されました。
90
255
‘0’
0x00
‘9’
0x00
・ オープン中のファイルが残っ
・ ファイルを全てクローズ後に
ている状態で、セッション閉設
が実行されました。
セッション閉設を行ってくだ
さい。
・ トランザクション開始が既に実
・ トランザクションサブルーチ
行されています。
90
255
‘0’
0x00
‘2’
0x11
・ オープン後にトランザクション
サブルーチン以外の入出力
文が実行されています。
・ トランザクション開始が実行さ
90
255
‘0’
0x00
‘3’
0x11
90
255
‘0’
0x00
‘4’
0x0C
90
ESIA
255
‘0’
0x00
‘4’
0x06
90
255
‘0’
0x00
‘1’
0x01
れていません。
・ メモリが不足しています。
ンの呼出し前に OPEN 文以
外の入出力文が実行されて
いなか確認してください。
・ トランザクションサブルーチ
ンの呼出し順序が正しいか
見直してください。
・ OS、データベースのメモリ設
定が適切か見直してくださ
い。
・ データベースでエラーが発生
しました。
・ サブルーチン実行時のパラ
メーターに誤りがあります。
- 109 -
・ イベントログに出力されたメッ
セージから Oracle のマニュ
アルを参照して調査してくだ
さい。
・ パラメーターが正しいか確認
してください。
FILE
STA iserrno
TUS 10 進数
90
255
error code
意味
対処
・ パラメーターで指定した文字
・ パラメーターで指定した文字
isstat
1
2
3
4
‘0’
0x00
‘1’
0x02
列長が正しくありません。
・ OUTPUT モードでオープン
したファイルを、再度オープ
ンしました。
92
11
‘9’
0x02
‘9’
0x02
列長が 256 バイト以内であ
るか確認してください。
・ COBOL アプリケーションの
内容を確認してください。
・ オープンしたファイルを、
OUTPUT モードで再度オー
プンしました。
92
11
‘9’
0x03
‘9’
0x03
・ 他のプロセスまたは他のセッ
・ 他のプロセスまたは他のセッ
ションがテーブルロックでオー
プンしています。
ションがテーブルロックで
オープンしていないか確認
してください。
・ COBOL アプリケーションが
中断されました。
・ デッドロックが発生しました。
92
107
‘0’
0x00
‘0’
・ COBOL アプリケーションの
内容を確認してください。
0x00
・ Oracle の動作環境を確認し
てください。
・ 他のプロセスまたは他のセッ
ションがレコードを排他獲得
しています。
・ 削除が行われたレコードに対
して、レコードロックが行われ
ました。
92
107
‘9’
0x03
‘9’
0x03
・ COBOL アプリケーションが
中断されました。
・ タイムアウトが検出されまし
た。
・ レコードロックが失敗しまし
た。
―
―
―
―
―
内容を確認してください。
・ レコードロックの獲得状態を
確認してください。レコード
ロックについては、「3.5.2 レ
コードロック機能」を参照し
てください。
・ レコードロックで READ しよ
うとしたレコードが削除され
ていないか確認してくださ
い。
・ Oracle の動作環境を確認し
てください。
・ 既にオープンされているファ
92
・ COBOL アプリケーションの
イルに対してオープンが発行
されました。
・ オープン、クローズの順番を
調査してください。
・ ファイルがクローズされていま
せん。
93
94
―
―
―
―
―
―
―
―
―
―
・ ファイルが有効ではありませ
ん。
・ 当社技術員に連絡してくだ
さい。
・ ファイル属性に一致しないた
・ COBOL 初期化ファイルで
め、ファイルのオープンがで
きません。
指定したファイル属性と、
ファイル属性とが一致するよ
うにしてください。
・ ファイル編成が一致しませ
ん。
- 110 -
FILE
STA iserrno
TUS 10 進数
error code
意味
対処
・ 索引ファイルのキー項目に対
・ 索引ファイルのキーの属性
する属性(オフセット、大き
さ、
WITH DUPLICATES 等)が
一致しません。
が、ファイルと一致するよう
にしてください。
・ ファイルをオープンするため
・ メモリを増設してください。も
isstat
1
2
3
4
しくは、仮想メモリ(スワップ)
を増やしてください。
のメモリが不足しています。
・ 指定したファイル名に誤りが
・ ファイル名に無効な文字が
あります。
5.1.1.4
含まれていないか確認して
ください。
COBOL アプリケーション終了時のメッセージ一覧
FILE STATUS 句を指定しないアプリケーションで、ファイルアクセス時にエラーが発生した場合など、COBOL アプリケーションが中断
するレベルのエラーが発生した場合、COBOL ランタイムシステムがメッセージを出力します。以下に代表的なメッセージを示します。
なお、出力形式、対処など詳細については「NetCOBOL のマニュアル」の実行時エラーを参照してください。
表 5.4 COBOL の実行時エラーメッセージの例
メッセージ
JMP0310I-I/U
’$2’ファイルで’$1’エラーが発生しまし
た.’$3’
エラー内容
$3
ACCMETHOD
ファイルのアクセス方法が誤っています。
ERFLD=xxxx
入出力ファイルのアクセスエラーが発生しまし
た。
$1:OPEN または CLOSE
xxxx:16 進表記
$2:アクセス名またはファイル名
xxxx:ファイルアクセス時のエラーコード
PowerRDBconnector 使用時は、iserrno の値が
設定されます。
JMP0320I-I/U
REC-MODE
レコード形式に誤りがあります。
INV-KEYDUP
キーの重複可否(DUPLICATES)に誤りがありま
す。
INV-KEYLEN
割り当てられたファイルのキー長がプログラムで
の定義と矛盾します。
INV-LRECL
割り当てられたファイルのレコード長がプログラ
ムでの定義と矛盾します。
INV-KEYRCS
割り当てられたファイルのキーのコード系がプロ
グラムの動作コード系と矛盾します。
KEY-ATTR
割り当てられたファイルのキー属性がプログラム
での定義と矛盾します。
FDBK=xxxx
入出力ファイルのアクセスエラーが発生しまし
た。
’$2’ファイルに対する’$1’文の実行で,入
出力エラーが発生しました.
$1:COBOL 文
$2:ファイル名またはアクセス名
xxxx:16 進表記
INV-LEN
WRITE/REWRITE 文でレコード長が正しくあり
ません
- 111 -
メッセージ
エラー内容
$3
ファイルの終端(EOF)まで読み込みが終わりま
した。
JMP0321I-U
’$1’ファイルに対する READ 文の実行
で,ファイル終了条件が発生しました.
$1:ファイル名またはアクセス名
キーの値が重複しています。
JMP0323I-U
’$2’ファイルに対する’$1’文の実行で,重
複キーによる誤りが発生しました.$3
$1:COBOL 文
$2:ファイル名またはアクセス名
求めるレコードが見つかりません。
JMP0324I-U
’$2’ファイルに対する’$1’文の実行で,求
めるレコードが見つかりません.$3
$1:COBOL 文
$2:ファイル名またはアクセス名
キーが無効です。
JMP0327I-U
’$2’ファイルに対する’$1’文の実行で,無
効キー条件が発生しました.’$3’
$1:COBOL 文
$2:ファイル名またはアクセス名
JMP0330I-I/U
AT-END
’$2’ファイルの’$1’文で,実行順序の誤り
が発生しました.’$3’
ファイル終了条件発生後、さらに READ 文が実
行されました。
DUPL-OPEN
既に開かれたファイルに対して OPEN 文が実
行されました。
NO-READ
直前が成功した READ 文でありません。
NOT-OPENED
開かれていないファイルに対して入出力文が実
行されました。
OPEN-MODE
OPEN モードが正しくありません。
POS-ERROR
ファイル位置指示子が不定です。
$1:COBOL 文
$2:ファイル名またはアクセス名
5.1.1.5
データベースのエラー発生時のイベントログ情報
Oracle でエラーが発生した場合は、イベントログの最終行に"ORA-xxxxx"という見出しで始まる Oracle のエラー情報が出力されます。
Oracle のエラー情報については、Oracle のマニュアル等を参照してください。
以下に出力例を示します。
・ 接続エラーの場合
function = thr_isopen2 iserrno = 6
isstat1 = 0x0 isstat2 = 0x0 isstat3 = 0x0 isstat4 = 0x0
TableName = M_FILE02
ORA-12154: TNS: 指定された接続識別子を解決できませんでした
・ アクセス権限エラーの場合
- 112 -
function = iswrite iserrno = 13
isstat1 = 0x0 isstat2 = 0x0 isstat3 = 0x0 isstat4 = 0x0
TableName = M_FILE02
ORA-01031: 権限が不足しています。
5.1.2
5.1.2.1
トランザクションアクセス時のエラー情報
トランザクションアクセス時のイベントログ情報
シングルセッションプログラミングでトランザクションサブルーチンなどのサブルーチンでエラーが発生した場合は、FILE STATUS を通
知せず、COBOL アプリケーションが終了します。この場合には、トランザクションサブルーチンの呼び出し順番などに問題がないか見
直してください。
以下のエラー情報が出力されます。
トランザクションアクセス時のエラーは、以下の形式です。
表 5.5 トランザクションアクセス時のイベントログ情報
出力先
アプリケーションログ
ソース
FSP_RDBCONNECTOR_FJSVDBIO
出力形式
<process id>
プロセス ID。
<thread id>
スレッド ID。
<command name>
エラーが発生したトランザクション機能名。
以下に機能名とサブルーチンの対応を示します。
<error code>
終了情報。
<error code1>
詳細情報。
<database message>
Oracle から通知されたメッセージを出力します。
Oracle でエラーが検出された場合に出力します。Oracle のマニュア
- 113 -
ルを参照して調査してください。
Oracle でエラーが発生していない場合には、メッセージは出力されま
せん。
出力例
トランザクションアクセス時のエラーコード一覧
5.1.2.2
トランザクション時のエラーコードを以下に示します。
表 5.6 トランザクション終了コード
Command
Error Code
STR
END
CNL
終了情報
10 進数
詳細情報
10 進数
○
○
○
0
0
○
○
○
91
0
意味
正常終了
―
―
92
17430
・ COB_PRDB_TRAN サブルー
ルーチンに指定するトランザ
クション種別の指定に誤りが
あります。
チンの呼出し時のパラメーター
を確認してください。
・ トランザクション開始が既に実
・ トランザクションサブルーチン
・ オープン後にトランザクション
サブルーチン以外の入出力
文が実行されています。
・ トランザクション開始が実行さ
―
○
○
93
17430
○
○
○
94
12
れていません。
・ メモリが不足しています。
○
○
94
6
○
○
○
95
5
○
○
○
99
19222
の呼出し前に OPEN 文以外の
入出力文が実行されていない
か確認してください。
・ トランザクションサブルーチン
の呼出し順序が正しいか見直
してください。
・ OS、データベースのメモリ設定
が適切か見直してください。
・ データベースでエラーが発生
○
なし。
・ COB_PRDB_TRAN サ ブ
行されています。
○
対処
しました。
・ イベントログに出力されたメッ
セージから Oracle のマニュア
ルを参照して調査してくださ
い。
・ オープン前にトランザクション
・ トランザクションサブルーチンを
サブルーチンが呼び出されて
います。
OPEN 文後に呼び出すように
見直してください。
・ トランザクションサブルーチン
・ レコードロックの強制トランザク
が実行できない状態で呼び
出されました。
ション中にアプリケーションがト
ランザクション操作しました。ト
ランザクション操作位置を見直
してください。
Command 種別
STR:XMROTSTR サブルーチン/COB_PRDB_TRAN サブルーチン(トランザクション種別=1)
END:XMROTEND サブルーチン/COB_PRDB_TRAN サブルーチン(トランザクション種別=2)
CNL:XMROTCNL サブルーチン/COB_PRDB_TRAN サブルーチン(トランザクション種別=3)
- 114 -
エラー発生の有無
○:発生します。
-:発生しません。
認証情報登録サブルーチンのエラー情報
5.1.3
認証情報登録サブルーチンは、マルチスレッドプログラミングの場合のみイベントログにエラー情報が出力されます。
認証情報登録サブルーチンのイベントログ情報
5.1.3.1
認証情報登録サブルーチン実行時のエラーは、以下の形式です。
表 5.7 認証情報登録サブルーチンのイベントログ情報
出力先
アプリケーションログ
ソース
FSP_RDBCONNECTOR_FJSVDBIO
出力形式
<process id>
プロセス ID。
<thread id>
スレッド ID。
認証情報登録機能名”XMROAUTH”。
<command name>
マルチセッションプログラミング使用時でもシングルセッション
プログラミングと同じ名前で出力されます。
<error code>
終了情報。
<error code1>
詳細情報。
出力例
認証情報登録サブルーチンのエラーコード一覧
5.1.3.2
認証情報登録サブルーチンのエラーコードを以下に示します。
表 5.8 認証情報登録サブルーチン終了コード
Command
Error Code
XMROAUTH
COB_PRDB_AUT
終了情報
10 進数
詳細情報
10 進数
○
0
0
○
91
0
意味
正常終了
・ 認証種別に誤りがあり
ます。
- 115 -
対処
なし。
・ パラメーターの内容が正
しいか確認してください。
Command
Error Code
XMROAUTH
COB_PRDB_AUT
終了情報
10 進数
意味
詳細情報
10 進数
・ ユーザー名長、パス
ワード長に誤りがありま
す。
エラー発生の有無
○:発生します。
-:発生しません。
5.1.4
セッションサブルーチンのエラー情報
以下のエラー情報が出力されます。
5.1.4.1
セッションサブルーチンのイベントログ情報
セッションサブルーチン実行時のエラーは、以下の形式です。
表 5.9 セッションサブルーチンのイベントログ情報
出力先
アプリケーションログ
ソース
FSP_RDBCONNECTOR_FJSVDBIO
出力形式
<process id>
プロセス ID。
<thread id>
スレッド ID。
<function name>
機能名。
COB_PRDB_START サブルーチン: prdb_start
COB_PRDB_END サブルーチン : prdb_end
<error code>
エラーコード。
<error code1>
エラー詳細コード 1。
<error code2>
エラー詳細コード 2。
<error code3>
エラー詳細コード 3。
<error code4>
エラー詳細コード 4。
<error message>
詳細情報。
<process id>
プロセス ID。
<thread id>
スレッド ID。
出力例
- 116 -
対処
5.1.4.2
セッションサブルーチンのエラーコード一覧
セッションサブルーチン使用時のエラーコードを以下に示します。
表 5.10 セッションサブルーチン使用時の終了コード
Command
error code
STR END
○
iserrno
10 進数
○
255
意味
対処
・ セッション開設およびセッショ
・ セッション開設およ
ン閉設のシーケンスエラーで
す。
びセッション閉設の
シーケンスを確認し
てください。
isstat
1
‘0’
2
0x00
3
‘8’
4
0x0
0
・ セッション開設は既に実行さ
れています。
・ シングルセッションプログラミ
ングの処理が動作中に、セッ
ション開設が実行されました。
―
○
255
‘0’
0x00
‘9’
0x0
0
○
○
255
‘0’
0x00
‘99’
0x0
0
・ オープン中のファイルが残っ
・ ファイルを全てク
ている状態で、セッション閉
設が実行されました。
ローズ後にセッショ
ン閉設を行ってくだ
さい。
・ 内部矛盾が発生しました。
・ 当社技術員に連絡
してください。
Command 種別
STR:COB_PRDB_START サブルーチン
END:COB_PRDB_END サブルーチン
エラー発生の有無
○:発生します。
-:発生しません。
5.2
トレース出力機能
本節では、PowerRDBconnector のトレース機能について説明します。
COBOL アプリケーションのトラブル調査をする際に、PowerRDBconnector を用いたデータベースへのアクセス履歴をトレースファイル
(FJSVdbio_trc.log)に採取し、調査できます。
5.2.1
トレース機能の使用方法
PowerRDBconnector 動作環境ファイルの以下のプロパティを指定してください。
・ ErrorLog プロパティにトレース情報の出力先ディレクトリを指定してください。相対指定も可能です。
・ TraceMode プロパティに ON を指定してください。
・ 必要に応じて、TraceSize プロパティに、トレース情報の最大サイズを指定してください。
・ 必要に応じて、TraceLevel プロパティに、トレース情報のレベルを指定してください。
- 117 -
例)トレース機能を使用する際の記述例
PowerRDBconnector 動作環境ファイル(DBIO_ENV) の記述例
; PowerRDBconnector 動作環境ファイル
ServerName=snake
ProviderName=OCI
~
ErrorLog=D:¥log
TraceMode=ON
TraceSize=4096
TraceLevel=0
トレース機能の使用時の注意事項を以下に示します。
・ トレース機能を使用すると、性能が著しく低下する場合があります。通常の運用では設定しないでください。
・ COBOL アプリケーションが動作中に、PowerRDBconnector 動作環境ファイルのトレース関連のプロパティを変更しても、ただちに
有効とはなりません。有効となるのは、次に COBOL アプリケーションを実行したときからです。
PowerRDBconnector 動作環境ファイルの各プロパティの詳細については、「3.1.4 PowerRDBconnector 動作環境ファイル」を参照して
ください。
トレースの種類
5.2.2
PowerRDBconnector のトレース情報に出力する情報の種類を、PowerRDBconnector 動作環境ファイルに TraceLevel プロパティで指
定することができます。以下に指定する値と出力するトレース情報の種類を示します。
表 5.11 トレースの種類
出力情報
TraceLevel
プロパティ
指定値
アクセス
情報
列情報、
イベント
ログ内容
エラー時
のデータ
内容
キー値、入出
力データの内
容
0
○
×
×
×
アクセス履歴や、エラー前後の
アクセス状況を調査する場合。
1
○
○
×
×
オープン時に項目不一致などの
エラー原因を調査する場合。
2
○
○
○
×
エラー発生時のキー値の内容を
調査する場合。
3
○
○
○
○
アクセスしたデータ内容を詳細
に調査する場合。
用途例
○:出力します。
×:出力しません。
トレースの種類についての注意事項を以下に示します。
・ TraceLevel プロパティで指定する数値が大きくなればなるほど出力する情報量が多くなり、性能が遅くなります。このため用途に応
じて最小の値を指定してください。
5.2.3
トレース情報の内容
PowerRDBconnector で出力するトレースファイル(FJSVdbio_trc.log)の内容を以下に示します。
- 118 -
トレース情報の形式
5.2.3.1
トレースファイル(FJSVdbio_trc.log)の形式を以下に示します。
5 ~ 14 の項目は、個々をセミコロン(;)で区切られています。
表 5.12 トレース情報の説明
TraceLevel
出力項目
No
内容
0
1
2
3
1
○
○
○
○
採取日時
トレース採取の日時と、パフォーマンスカウンタを出力します。
2
○
○
○
○
VL
Windows のバージョンレベルを出力します。
PowerRDBconnector のモジュール情報を出力します。
3
○
○
○
○
モジュール情報
モジュール名
バージョン情報
モジュールの更新日時
4
○
○
○
○
トレース情報
トレース情報として、TraceLevel とトレース出力先のパス名を出力します。
5
○
○
○
○
日時
トレースの出力日時(YYYY/MM/DD-HH:MM:SS.SSS)
6
○
○
○
○
パフォーマンスカ
ウンタ
トレース出力時のパフォーマンスカウンタ
7
○
○
○
○
プロセス ID
対象のプロセス ID
8
○
○
○
○
スレッド ID
対象のスレッド ID
9
○
○
○
○
実行単位 ID
セッション単位の識別子
10
○
○
○
○
COBOL 命令
COBOL 命令を次の形式で出力します。
- 119 -
TraceLevel
出力項目
No
0
1
2
内容
3
NetCOBOL for .NET V3.0/V3.1、かつマルチセッションプログラミングの場
合
シングルセッションプログラミングの場合
11
○
○
○
○
PowerRDBconne
ctor 情報
12
○
○
○
○
内部関数名
PowerRDBconnector の製品保守用の情報を出力します。
COBOL 命令に対応した内部関数名が出力されます。詳細は「表 5.14 プロ
グラミングスタイルによる関数対応表」を参照してください。
ロックの状態を次の文字列で出力します。
13
○
○
○
○
ロック状態
詳細情報
詳細情報として次の内容を出力します。
PowerRDBconnector の内部関数開始時に”Start”を出力します。
○
○
○
○
開始終了情報
PowerRDBconnector の内部関数終了時に、正常の場合は”Normal End”
を、エラーの場合は”ABNormal End”を出力します。
"Start"と"Normal End"または"ABNormal End"が対で出力されます。
"Start"のみ出力されている場合は、処理中であることを意味します。
○
○
○
○
データベースの
VL
セッション開設時、データベースのバージョンレベルを出力します。
○
○
○
○
データベースの
セッション ID
Oracle のセッション ID を、“SID=n”の形式で出力します。
○
○
○
○
内部動作モード
PowerRDBconnector の製品保守用の情報を出力します。
○
○
○
○
テーブル名
OPEN 文と CLOSE 文の延長で出力します。
○
○
○
○
COBOL 初期化
ファイル情報
OPEN 文に対応する COBOL 初期化ファイルの情報を出力します。
-
○
○
○
列情報
14
注)Oracle9i の場合には出力しません。
データベースの列情報を取得時に、列情報を出力します。未サポートの
データ型の場合は”UNDEFINE(データ型番号)”と出力します。
- 120 -
TraceLevel
出力項目
No
0
1
2
内容
3
列情報の形式を、以下に示します。
列名、データ型名、データサイズ
(文字項目の場合は、データ長。数字項目の場合は、桁数-精度)
-
○
○
○
エラー情報
-
-
○
○
エラーダンプ
-
-
-
○
ダンプ
エラー発生時、エラーログおよびイベントログに出力する内容を出力しま
す。
エラー発生時、要因となるデータを 16 進ダンプの形式で出力します。
注
キー値と入出力データを 16 進ダンプ形式で出力します。
注
○:出力します。
×:出力しません。
注)
トレースデータの出力コード系について
トレース情報に出力するエラーダンプや、ダンプに含まれる文字データは、以下のコード系での 16 進ダンプの形式で出力されま
す。
表 5.13 トレースデータの出力コード系について
コンパイル時の実行時の
文字コード系の指定
NetCOBOL for
Windows
REWRITE/
SJIS
WRITE 時の書
UCS2(UTF-16)
き込みデータや、
キーアクセス時
-
のキー値の場合
READ 時の読
み込みデータの
場合
出力コード系
NetCOBOL for
.NET
SJIS
UTF8-UCS2
SJIS-UCS2
SJIS
SJIS
シフト JIS
UTF-8
UTF-8
シフト JIS
・ 英数字項目
UTF-8
UCS2(UTF-16)
UTF8-UCS2
・ 日本語項目
UCS2
・ 英数字項目
-
シフト JIS
SJIS-UCS2
・ 日本語項目
UCS2
5.2.3.2
備考
トレースの出力例
トレースファイル(FJSVdbio_trc.log)の出力例を以下に示します。
- 121 -
COBOL から通知された
データではなく、データ
ベースへ通知するために
変換したデータが出力さ
れます。
データベースから読み込
んだデータではなく、
COBOL へ通知するため
に変換したデータが出力
されます。
なお、以下では説明の都合で、トレース出力結果に適宜空白を埋め込んでいます。
表 5.14 プログラミングスタイルによる関数対応表
内部関数名
COBOL 命令
シングルセッション
OPEN
CLOSE
READ
WRITE
REWRITE
DELETE
START
備考
マルチセッション
thr_isbuild()
_isbuild()
thr_isbuild()
prdb_isbuild()
sub_thr_isbuild()
テーブル名が出力されます。
thr_isopen2()
_isopen()
thr_isopen2()
prdb_isopen()
sub_thr_isopen()
テーブル名が出力されます。
isindexinfo()
_isindexinfo()
isindexinfo()
prdb_isindexinfo()
sub_isindexinfo()
キー項目毎に呼び出されます。
isaddindex()
_isaddindex()
isaddindex()
prdb_isaddindex()
sub_isaddindex()
キー項目毎に呼び出されます。
OUTPUT モードの場合に出力され
ます。
isclose()
_isclose()
isclose()
prdb_isclose()
sub_isclose()
―
isread()
_isread()
isread()
prdb_isread()
sub_isread()
―
iswrite()
_iswrite()
iswrite()
prdb_iswrite()
sub_iswrite()
―
isrewcurr()
_isrewcurr()
isrewcurr()
prdb_isrewcurr()
sub_isrewcurr()
―
isdelete()
_isdelete()
isdelete()
prdb_isdelete()
sub_isdelete()
―
isstart()
_isstart()
isstart()
prdb_isstart()
sub_isstart()
―
OUTPUT モードの場合に出力され
ます。
OUTPUT モード以外の場合に出力
されます。
- 122 -
COBOL 命令に対応して複数行の情報が出力されます。以下に COBOL 命令毎のパターン例を示します。
マルチセッションプログラミング時のトレース出力パターン例
- 123 -
- 124 -
- 125 -
- 126 -
付録 A
他製品のファイル資源
本章では、他製品(ファイルシステム、データベース系)のファイル資源及び代替方法について説明します。
業務システムの機能・構成設計時に、移行前のデータベース資産としてよく使用される、論理ファイルの使用について、開発者が確認
する場合にお読みください。
A.1
論理ファイル
論理ファイルとは、物理ファイルを射影する仮想的なファイルで、以下の製品に存在します。
物理ファイルとは、物理データが格納されたデータファイルです。詳しくは、該当する製品のマニュアルを参照してください。
・ 「CSP/FX FX-RDB」
・ 「ASP RDB/6000、Symfoware6000」
論理ファイルで定義された単純論理ファイルは、ビューを定義することで同等の機能を実現することが可能です。
なお、複数のテーブルで構成された結合ビューに対する更新はできません。
単純論理ファイル
単一ビューで作成することで、同等の機能が実現できます。
SQL 定義文の例
CREATE VIEW CSVIEW
(得意先コード_DECIMAL, 商品名_CHAR, 数量_INTEGER)
AS SELECT 得意先コード, 商品名, 数量
FROM CSMASTER
CREATE UNIQUE INDEX CSVIEWIX ON CSMASTER (得意先コード)
- 127 -
付録 B
トラブルシューティング
本章では、PowerRDBconnector でトラブルが発生した場合の対処方法と、トラブル事例について説明します。
トラブルへの対処方法
B.1
本節では、PowerRDBconnector 使用時にトラブルが発生した場合の調査方法について示します。
・ COBOL のアクセス命令がエラーとなる場合
アプリケーションに通知されるエラーコードを元に原因を取り除いてください。
エラーコードに対する対処方法については、「5.1 エラー時の対処」を参照してください。
PowerRDBconnector のモジュールでアプリケーションエラーが発生した場合には、イベントログ、再現する場合は、トレースを採取
し、当社技術員に連絡してください。
・ COBOL のアクセス性能を調査する場合
PowerRDBconnector には性能値を算出する機能はありません。COBOL アプリケーションで、時刻を採取するなどの対処を行って
調査してください。
・ COBOL のアクセス文からの応答がない場合
イベントログを確認して、なんらかのエラーが発生していないか確認してください。
どのアクセス文から応答がないかは、COBOL アプリケーションのトレース機能などを用いて調査してください。
・ COBOL のアクセス文の処理結果が正しくない場合
COBOL アプリケーションのトレース機能や、PowerRDBconnector のトレース機能を用いて、正しいシーケンスで動作しているか、
アクセスしたデータ内容が正しいのかを調査してください。PowerRDBconnector のトレース機能については、「5.2 トレース出力機
能」を参照してください。
事例
B.2
本節では、よくある質問や、陥りやすいトラブルとその解決方法について示します。
B.2.1
製品仕様について
1. 1 つのプログラムで複数のデータベースをアクセスすることはできますか?
できません。1 つのプログラムでアクセスできるデータベースは 1 つだけです。プログラムごとにアクセスするデータベースを分け
ることはでき、PowerRDBconnector 動作環境ファイル(DBIO_ENV ファイル)で指定します。詳細は、「3.1.4 PowerRDBconnector
動作環境ファイル」を参照してください。
2. データベース・リンクされたテーブルにアクセスできますか?
データベース・リンクされたテーブルへはアクセスできません。
3. サポートされるファイル編成を教えてください。
SEQUENTIAL(順編成)と INDEX(索引編成)へのアクセスがサポートされています。
RELATIVE(相対編成)は、COBOL ファイルシステム等をご使用ください。
なお、順編成ファイルで格納(WRITE)した順番にレコードを読み込むことはできません。
4. テーブル全体を排他することができますか?
テーブルロック機能を使ってください。詳細は、「3.5.3 テーブルロック機能」を参照してください。
5. COBOL ソースのデータ項目名を、PowerRDBconnector で規定された項目名(例:item_char)に合わせる必要がありますか?
合わせる必要はありません。PowerRDBconnector では、対象データベースの列名により、対応する COBOL データ型にあわせ
た処理を行っています。COBOL ソース内のデータ定義の属性と順序が、データベースの列名と順序に一致していればよく、COBOL
ソース内に記述したデータ名と列名を一致させる必要はありません。
6. テーブルの列名のサフィックスに属性を付加せずに、PowerRDBconnector からアクセスすることはできますか?
- 128 -
できません。
ビューを定義し、ビュー側の列名のサフィックスに属性(例:item_char)を付加し、ビュー側をアクセスするようにすることで、読込
みが可能となります。
7. X 項目や N 項目における、PowerRDBconnector での後方空白の変換規則を教えてください。
後方空白補正の機能について参照してください。詳細は、「3.7.1 後方空白補正」を参照してください。
8. X 項目をシフト JIS、N 項目を unicode(UCS2)で扱うことはできますか?
NetCOBOL for Windows/NetCOBOL ではできません。
NetCOBOL for .NET では可能です。
COBOL 翻訳時の実行時コード系は、RCS(SJIS-UCS2)を指定してください。詳細は、「3.1.6 コンパイル方法」を参照してくださ
い。
9. 外字を使用する場合の注意事項を教えてください。
業務システム全体の文字コードと Oracle のコード変換の仕組みを考慮して、文字コードを選択していただく必要があります。
たとえば、Java(unicode)と Oracle(シフト JIS)の組合せでは、Oracle が unicode - シフト JIS 間の外字変換を行うため、外字を扱う
ことは可能です。
10. NULL 値を含む列を、PowerRDBconnector から読込むことはできますか?
NULL 値の読み書きはできません。
11. 可変長属性の列(VARCHAR2 など)があるテーブルを読込みや書込みができますか?
可変長属性の列への読込みや書込みはできません。
12. FLOAT 属性の列があるテーブルを、PowerRDBconnector から読込みや書込みができますか?
FLOAT 属性の列を持つテーブルへの読込みや書込みはできません。
13. DATE や TIMESTAMP 属性の列があるテーブルを、PowerRDBconnector から読込みや書込みができますか?
DATE や TIMESTAMP 属性の列を持つテーブルへの読込みや書込みはできません。
14. COBOL アプリケーションで REDEFINES 句が使用できますか?
X 項目を X 項目で再定義している場合のみ使用できます。使用する場合、最小単位の X 項目に対して、データベースの CHAR
型と対応させます。
15. COBOL アプリケーションで OCCURS 句が使用できますか?
使用できます。データベースのテーブルには、COBOL の繰り返し項目数分の列の定義が必要です。
16. 1つのアプリケーションから異なる複数のサーバ内のデータベースにアクセスできますか?
1つのアプリケーションからは、特定のサーバ内のデータベースにしかアクセスできません。
動作するプロセスまたはスレッドが異なる場合、PowerRDBconnector 動作環境ファイルを分けることで異なるサーバで同じ種類
のデータベースにアクセスできます。
17. クラスタ構成の Oracle にアクセスできますか?
使用できます。クラスタ構成にしても、それぞれのサーバで認証が行えれば PowerRDBconnector からのアクセスは可能です。
18. JIS2004 の文字コード系の文字が使えますか?
アクセスするデータには以下の環境で使用できます。
- Windows XP、Windows Server 2003、Windows Vista の場合
- Oracle10g、Oracle11g の場合
- COBOL の USAGE 句とデータベースのデータ型が以下の対応関係にある場合
- X(英数字)項目と CHAR 型
- N(日本語)項目と NCHAR 型
- NetCOBOL V10.0.0 を使用する場合
- 129 -
PowerRDBconnector 動作環境ファイルや、COBOL 初期化ファイルなどのパス名、スキーマ名、表名、列名には使用できませ
ん。詳細は、「4.1.2.7 文字コードについて」を参照してください。
B.2.2
トラブル事例
1. OPEN 命令や START 命令などがエラーになります。効率的なデバッグ方法を教えてください。
PowerRDBconnector が、COBOL アプリケーションにエラーを通知する場合、イベントログにエラー詳細(iserrno、isstat1 ~ 4、
TableName など)を記録します。
COBOL アプリケーションのデバック中にイベントビューアを起動しておき、エラー発生時にイベントビューアのアプリケーションロ
グを参照し、「5.1.1 ファイルアクセス時のエラー情報」のエラーコード一覧と突き合わせることで、デバッグ作業を効率化できま
す。
2. FILE STATUS 90 が通知されます。原因を教えてください。
以下の場合などに FILE STATUS 90 が通知されます。
なお、イベントログに詳細なエラー情報が出力されます。詳細情報については、「5.1.1 ファイルアクセス時のエラー情報」を参照
してください。
- COBOL 初期化ファイルの設定に誤りがあります。
- カレントパスに COBOL 初期化ファイルが存在しません。
- 動作環境ファイル(DBIO_ENV ファイル)の設定に誤りがあります。
- カレントパスに動作環境ファイル(DBIO_ENV ファイル)が存在しません。
- テーブル名に"-"(ハイフン)が含まれています。
- COBOL アプリケーションで指定されたキーに対して、索引(プライマリキー、インデックス)がテーブルに設定されていませ
ん。
- ディスクへの入出力エラーが発生しています。
- 排他エラーが発生しています。
- データベースのサービスが未起動です。
- データベースに対するアクセス権限がありません。
- 製品ライセンスがありません。
- 1 アプリケーションで 129 以上オープンしようとしています。
3. 外部十進項目に' '(空白)が格納できません。原因を教えてください。
Oracle の数値項目には、文字を書き込むことはできません。十進項目に数値以外の値を書き込まないように、アプリケーション
の修正を行ってください。またはデータ補正機能を使用してください。データ補正機能の詳細については、「3.7.2 項目属性に違
反するデータのチェックと補正」を参照してください。
4. データ溢れが発生します。原因を教えてください。
NetCOBOL の文字コードとデータベースの文字コードを一致させてください。特に、COBOL の X 項目と、データベースの
CHAR、NCHAR を対応させている場合、文字コード系を一致させていないと、データ溢れが発生します。
5. START 命令で HIGH-VALUE や LOW-VALUE への位置づけができません。対処方法を教えてください。
HIGH-VALUE や LOW-VALUE への位置づけはできません。START FIRST または START FIRST WITH REVERSED
ORDER に置き換えてください。
6. Windows のサービスでアプリケーションを起動しますが、PowerRDBconnector のアクセスでエラーが発生します。対処方法を
教えてください。
以下の原因が考えられます。
- データベース製品のサービス起動完了前にアプリケーションのサービスが起動されると、データベースに接続できません。
サービス起動順番の依存関係を見直してください。
- サービスとして起動されたアプリケーションは暗黙では"SYSTEM"ユーザーとなり、システムユーザでは OS 認証できませ
ん。データベース認証を使用してください。
- 130 -
7. 翻訳時に NetCOBOL のエントリー情報ファイル(ENTRY.ENT)にトランザクション処理用 DLL 名を記載する必要があります
が、DLL がどこに格納されているのか分かりません。
トランザクション処理用の DLL は、PowerRDBconnector のインストールディレクトリ配下に格納されます。PowerRDBconnector
のインストール時に、このディレクトリに対する PATH 変数が設定されるため、トランザクション処理用 DLL 名を、エントリー情報
ファイルにフルパスで定義する必要はありません。詳細は、「3.1.6 コンパイル方法」を参照してください。
8. 同一ファイルを親プログラムと子プログラムでそれぞれオープンし、親プログラムでレコードロックした後、子プログラムから同一レ
コードを読み込むことができてしまいます。理由を教えてください。
排他制御はプロセス単位に行われます。このため、同一プロセスの親プログラムと子プログラム間でのレコードロックの獲得待合
せは発生しません。詳細は、「3.5 排他制御」を参照してください。
9. START 命令や READ 命令で「FDBK=16 35」のエラーが発生します。原因を教えてください。
表の列名に設定したサフィックスと、START 命令や READ 命令に渡したデータの型が一致していない場合に発生します。例と
して、以下の場合に発生します。
- 表の列名のサフィックスに「_UNSIGN_NUMERIC」を指定しているにも関わらず、START 命令や READ 命令に符号付き
データを用いました。
- 表の列名のサフィックスに「_NUMERIC」を指定しているにも関わらず、START 命令や READ 命令に符号無しデータを用
いました。
10. 複数の実表を結合したビュー表に対して、アクセスできません。
結合表へのアクセス(読込み、更新)はできません。詳細は、「4.2.3.2 ビューの使用について」を参照してください。
11. NetCOBOL のアプリケーションから N 項目に対して START を発行するとエラーとなります。対処方法を教えてください。
NetCOBOL の文字コードとデータベースの文字コードを一致させてください。
12. OUTPUT オープンができません。対処方法を教えてください。
Truncate プロパティが指定されたテーブルに対する OUTPUT オープンを行う場合、DROP ANY TABLE 権限が付与されてい
ることを確認してください。
13. COBOL アプリケーションを実行すると、「ORA-01000 最大オープン・カーソル数を超えました。」が発生します。対処方法を教
えてください。
Oracle の初期化パラメーター“OPEN_CURSORS”の値を変更する必要があります。
詳細は「3.1.3.6 OPEN_CURSORS の設定」を参照してください。
14. データ例外のエラー発生時の調査方法を教えてください。
以下のいずれかの方法で調査してください。
- エラーが発生した際のレコード内容を、別ファイルに出力してデータ内容を調査してください。
- エラー発生時のデータ内容を出力するようトレース情報を採取して、データ内容を調査してください。
15. 排他エラーが発生したとき、獲得しているアプリケーション(プロセス)の調査方法を教えてください。
以下の SQL 文で排他されているテーブルや排他しているユーザー、プロセスを特定することができます。
a. 排他しているユーザー名とプロセスを取得
SELECT * FROM V$SESSION WHERE SID =
ANY(SELECT SID FROM V$LOCK WHERE TYPE IN ('TX','TM'));
b. 排他されているテーブル名と排他しているユーザー名を取得
SELECT B.OBJECT_NAME,A.ORACLE_USERNAME FROM
V$LOCKED_OBJECT A,DBA_OBJECTS B WHERE A.OBJECT_ID = B.OBJECT_ID;
セッション ID を特定する場合は、トレース出力機能を使用してください。
16. Windows Server 2003(x64)で COBOL アプリケーションを実行すると、「ハンドルされていない例外」のエラーが発生し、動作し
ません。
NetCOBOL のコンパイルオプション(/platform)を指定し作成されたアプリケーションしか、Windows Server 2003(x64)で動作し
ません。アプリケーション作成時のコンパイルオプションを確認してください。
- 131 -
17. OPEN 文を実行すると、FILE STATUS に 90 が発生していますが、イベントログにはエラー情報が出力されていません。
トレース情報を採取して、アクセス対象表の項目構成と、COBOL プログラムを突き合わせて、COBOL プログラムと、表または
ビュー表のレコード長が異なっているか確認してください。
18. Windows Server 2003(x64)で、Oracle10g(x64)/Oracle11g(x64)にアクセスする COBOL アプリケーションを実行すると、
「COB_PRDB_START サブルーチンから、-200 のエラーが発生する」、または、「コンポーネントが見つかりません。OCI.dll が
見つからなかったため、このアプリケーションを開始できませんでした。アプリケーションをインストールし直すとこの問題が解決
される場合があります。」のエラーが発生し、動作しません。
Oracle のクライアント(32 ビット)製品がインストールされているか、またはインストール後に Windows の再起動を行っているかを
確認してください。
19. ASP.NET で使用し、COB_PRDB_START サブルーチンを実行すると、復帰値が-1、iserrno=255、isstat1=’0’、isstat2=0x0、
isstat3=’1’、isstat4=0x0、“DBIO_ENV file open error”のエラーが発生します。
セッション開設時に、PowerRDBconnector 動作環境ファイルが見つからないため、エラーが発生しています。カレントパスの設
定を確認してください。
20. ファイルを共有する COBOL アプリケーションでレコードを読み込むと、「ORA-01406: フェッチされた列の値は切り捨てられまし
た」のエラーが発生します。
COBOL プログラム上、ファイルが EXTERNAL 指定で記述されている場合、共有指定を行ってコンパイルしたか確認してくださ
い。
21. Windows Server 2003(x64)で、ASP.NET を使用した COBOL アプリケーションを実行すると以下のエラーが発生して動作しま
せん。
JMP0097I-U ランタイムシステムが正しくインストールされていません.
'NOT-INSTALLED' Fujitsu.COBOL.Runtime.Subroutines.PRDBconnector
説明: 現在の Web 要求を実行中に、ハンドルされていない例外が発生しました。
IIS で動作させるアプリケーションが 32 ビット互換モードで動作していないために発生しています。以下の手順で、IIS で動作さ
せるアプリケーションを 32 ビット互換モードで動作させてください。
1. 次のコマンドを入力して 32 ビット互換モードを有効にします。
cscript %SYSTEMDRIVE%¥inetpub¥adminscripts¥adsutil.vbs
SET W3SVC/AppPools/Enable32bitAppOnWin64 1
2. 次のコマンドを入力して ASP.NET 2.0 (32 ビット版) をインストールし、スクリプト マップを IIS ルート下にインストールしま
す。
%SYSTEMROOT%¥Microsoft.NET¥Framework¥v2.0.xxxxx¥aspnet_regiis.exe -i
3. インターネット インフォメーション サービス マネージャの Web サービス拡張の一覧で、ASP.NET version 2.0.xxxxx (32
ビット版) の状態が [許可] に設定されていることを確認します。
ただし、この場合、IIS で動作させるアプリケーションは全て 32 ビット互換モードで動作します。
22. インストール時に指定したデータベース種別を調べる方法を教えてください。
[システムのプロパティ]の[詳細設定]の画面にある[環境変数]を表示し、システム環境変数“RDBCONNECTOR”の値により、
以下のようにインストールしたデータベース種別がわかります。
- SQLSV2K:SQL Server 2000
- SQLSV2005:SQL Server 2005
- ORA9i:Oracle 9i
- ORA10g:Oracle10g
- ORA11g:Oracle11g
23. COBOL 初期化ファイルには、テーブル名を正しく指定していますが、OPEN 文でエラーとなります。調査方法を教えてくださ
い。
COBOL 初期化ファイルが UTF-8 のコード系で作成されている場合、テーブル名にシフト JIS 範囲外の文字が指定されている
可能性があります。PowerRDBconnector のトレース機能を使用して、以下のように確認してください。
- 132 -
- シフト JIS 範囲内の文字でテーブル名が指定されている場合
トレースログの出力結果に、以下のような文字化けを起こさない情報が出力されています。
cw_FileOpenInfo() ; ------- : TableName=M_FILE02&SchemaName=RDBCTEST&AccessMode=DYNAMIC
- シフト JIS 範囲外の文字でテーブル名が指定されている場合
トレースログの出力結果に、以下のような文字化けを起こす情報が出力されています。
cw_FileOpenInfo() ; ------- : TableName=?????&SchemaName=RDBCTEST&AccessMode=DYNAMIC
PowerRDBconnector のトレース機能については、「5.2 トレース出力機能」を参照してください。
24. Windows ファイアウォールを有効にすると、エラーが発生します。
Windows ファイアウォールを有効にすると Oracle の既定ポートが許可されていません。そのため、クライアントサーバ形態でデー
タベースに接続を行うと、以下の接続エラーが発生します。
エラー時のイベントログ内容
iserrno = 6 isstat1 = '0' isstat2 = 0x0 isstat3 = '0' isstat4 = 0x0
ORA-12170: TNS: 接続タイムアウトが発生しました。
このような場合、Windows ファイアウォールのポート番号設定を確認し、データベースのポートを許可してください。
25. 日本語項目の文字判定が正しく行えません。
NetCOBOL for Windows の実行コード系が unicode の COBOL アプリケーションで、日本語項目の後方に半角空白が設定され
ている可能性があります。
PowerRDBconnector のトレース機能を使用して、日本語項目に設定されている空白の種類を確認してください。
後方空白の扱いの詳細は、「3.7.1 後方空白補正」を参照してください。
PowerRDBconnector のトレース機能については、「5.2 トレース出力機能」を参照してください。
また NetCOBOL for Windows で unicode を使用する場合の詳細は、NetCOBOL のマニュアルを参照してください。
B.2.3
性能
1. レコードの項目数と、OPEN 文の性能に依存関係はありますか?
項目数が多くなるに従い、OPEN 処理の性能が遅くなります。PowerRDBconnector では、OPEN 文の延長でデータベースから
カラム情報を取得しているためです。
2. OPEN 命令を発行した際に、他のアプリケーションの動作が遅くなる場合があります。原因を教えてください。
PowerRDBconnector は、OPEN 命令の延長で使用する SQL 文の準備を行います。SQL 文の準備に伴い、データベースがメ
モリを獲得し、メモリ負荷が発生する場合があります。特に、下記条件で、獲得されるメモリ量が大きくなります。
- 項目(列)数の多い表に対して OPEN 命令を発行した場合
- ALTERNATE RECORED KEY 句を指定した場合
3. OPEN、START、READ、REWRITE、WRITE 性能が極めて遅いのですが、性能のチューニング方法を教えてください。
PowerRDBconnector は、以下の設定を行うことで最適な性能が得られます。(この設定を行わないと、性能が大幅に劣化しま
す)。詳しくは、「4.1.4 性能向上のポイント」を参照してください。
- Oracle のデータ領域、REDO ログ領域、UNDO 領域、アーカイブ REDO ログ領域を別ディスクに分散して配置してくださ
い。
- データベースの統計情報収集を行ってください。
- 統計情報の収集を行った後、COBOL の RECORD KEY 句にあたる列にインデックスを設定してください。
4. OUTPUT OPEN の性能が遅いのですが、性能のチューニング方法を教えてください。
COBOL 初期化ファイル内で、Truncate プロパティを指定することで、OUTPUT OPEN の性能を改善することができます。(オー
プン時の全件削除処理を DELETE *でなく、TRUNCATE 文で実行します。)
- 133 -
ただし、PowerRDBconnector が提供するレコードロック機能またはテーブルロック機能を使用している場合、Truncate プロパティ
の指定は無効となります。詳しくは、「4.1.4 性能向上のポイント」を参照してください。
5. I-O モードで OPEN した場合の READ 性能が遅いのですが、性能のチューニング方法を教えてください。
PowerRDBconnector が提供するレコードロック機能(暗黙)でなく、テーブルロック機能を使用すると、READ 命令のレコードロッ
ク処理を迂回することができ、READ 命令の性能を数倍程度、高速化することができます。詳しくは、「4.1.4 性能向上のポイン
ト」を参照してください。
6. COBOL のキー項目に対し、プライマリキー制約を設定したにも関わらず、索引を使用したアクセスが行われません。対処方法
を教えてください。
プライマリキー制約ではなく、通常の索引に NOT NULL 及び UNIQUE 制約を設定することで、改善できる場合があります。
- 134 -
付録 C
開発用サンプル情報
本章では、PowerRDBconnector を使用する際に役立つサンプルを示します。
注)サンプル使用時の注意事項
各サンプルがページに複数ページにまたがることがありますので、カット&ペーストして使用する際には、ページ番号までコピーさ
れる点に注意してください。
C.1
NetCOBOL for .NET のプログラム原型
本節では、NetCOBOL for .NET で使用するサブルーチンのプログラム原型のサンプルを示します。使い方の詳細は、NetCOBOL の
マニュアルを参照してください。
C.1.1
XMROTSTR サブルーチン
000010 IDENTIFICATION DIVISION.
000020 PROGRAM-ID.
XMROTSTR AS "XMROTSTR"
000030
IS PROTOTYPE CUSTOM-ATTRIBUTE IS PTRN.
000040
000050 ENVIRONMENT
DIVISION.
000060 CONFIGURATION
SECTION.
000070 SPECIAL-NAMES.
000080 CONSOLE
IS
CONSL
000090 CUSTOM-ATTRIBUTE PTRN
000100
CLASS DLLIMPORT USING "F3BWS1CB.DLL"
000110
PROPERTY P-CALLINGCONVENTION IS STDCALL OF E-CALLINGCONVENTION
000120
PROPERTY CHARSET IS ANSI OF E-CHARSET.
000130 REPOSITORY.
000140 CLASS DLLIMPORT AS "System.Runtime.InteropServices.DllImportAttribute"
000150 ENUM E-CALLINGCONVENTION
000160
AS "System.Runtime.InteropServices.CallingConvention"
000170 PROPERTY P-CALLINGCONVENTION AS "CallingConvention"
000180 PROPERTY STDCALL AS "StdCall"
000190 PROPERTY CHARSET AS "CharSet"
000200 ENUM E-CHARSET AS "System.Runtime.InteropServices.CharSet"
000210 PROPERTY ANSI AS "Ansi"
000220 CLASS SYS-STRING AS "System.String".
000230 END PROGRAM XMROTSTR.
C.1.2
XMROTEND サブルーチン
000010 IDENTIFICATION DIVISION.
000020 PROGRAM-ID.
XMROTEND AS "XMROTEND"
000030
IS PROTOTYPE CUSTOM-ATTRIBUTE IS PTRN.
000040
000050 ENVIRONMENT
DIVISION.
000060 CONFIGURATION
SECTION.
000070 SPECIAL-NAMES.
000080 CONSOLE
IS
CONSL
000090 CUSTOM-ATTRIBUTE PTRN
000100
CLASS DLLIMPORT USING "F3BWS1CB.DLL"
000110
PROPERTY P-CALLINGCONVENTION IS STDCALL OF E-CALLINGCONVENTION
000120
PROPERTY CHARSET IS ANSI OF E-CHARSET.
000130 REPOSITORY.
000140 CLASS DLLIMPORT AS "System.Runtime.InteropServices.DllImportAttribute"
- 135 -
000150 ENUM E-CALLINGCONVENTION
000160
AS "System.Runtime.InteropServices.CallingConvention"
000170 PROPERTY P-CALLINGCONVENTION AS "CallingConvention"
000180 PROPERTY STDCALL AS "StdCall"
000190 PROPERTY CHARSET AS "CharSet"
000200 ENUM E-CHARSET AS "System.Runtime.InteropServices.CharSet"
000210 PROPERTY ANSI AS "Ansi"
000220 CLASS SYS-STRING AS "System.String".
000230 END PROGRAM XMROTEND.
C.1.3
XMROTCNL サブルーチン
000010 IDENTIFICATION DIVISION.
000020 PROGRAM-ID.
XMROTCNL AS "XMROTCNL"
000030
IS PROTOTYPE CUSTOM-ATTRIBUTE IS PTRN.
000040
000050 ENVIRONMENT
DIVISION.
000060 CONFIGURATION
SECTION.
000070 SPECIAL-NAMES.
000080 CONSOLE
IS
CONSL
000090 CUSTOM-ATTRIBUTE PTRN
000100
CLASS DLLIMPORT USING "F3BWS1CB.DLL"
000110
PROPERTY P-CALLINGCONVENTION IS STDCALL OF E-CALLINGCONVENTION
000120
PROPERTY CHARSET IS ANSI OF E-CHARSET.
000130 REPOSITORY.
000140 CLASS DLLIMPORT AS "System.Runtime.InteropServices.DllImportAttribute"
000150 ENUM E-CALLINGCONVENTION
000160
AS "System.Runtime.InteropServices.CallingConvention"
000170 PROPERTY P-CALLINGCONVENTION AS "CallingConvention"
000180 PROPERTY STDCALL AS "StdCall"
000190 PROPERTY CHARSET AS "CharSet"
000200 ENUM E-CHARSET AS "System.Runtime.InteropServices.CharSet"
000210 PROPERTY ANSI AS "Ansi"
000220 CLASS SYS-STRING AS "System.String".
000230 END PROGRAM XMROTCNL.
C.1.4
XMROTRBK サブルーチン
000010 IDENTIFICATION DIVISION.
000020 PROGRAM-ID.
XMROTRBK AS "XMROTRBK"
000030
IS PROTOTYPE CUSTOM-ATTRIBUTE IS PTRN.
000040
000050 ENVIRONMENT
DIVISION.
000060 CONFIGURATION
SECTION.
000070 SPECIAL-NAMES.
000080 CONSOLE
IS
CONSL
000090 CUSTOM-ATTRIBUTE PTRN
000100
CLASS DLLIMPORT USING "F3BWS1CB.DLL"
000110
PROPERTY P-CALLINGCONVENTION IS STDCALL OF E-CALLINGCONVENTION
000120
PROPERTY CHARSET IS ANSI OF E-CHARSET.
000130 REPOSITORY.
000140 CLASS DLLIMPORT AS "System.Runtime.InteropServices.DllImportAttribute"
000150 ENUM E-CALLINGCONVENTION
000160
AS "System.Runtime.InteropServices.CallingConvention"
000170 PROPERTY P-CALLINGCONVENTION AS "CallingConvention"
000180 PROPERTY STDCALL AS "StdCall"
- 136 -
000190 PROPERTY CHARSET AS "CharSet"
000200 ENUM E-CHARSET AS "System.Runtime.InteropServices.CharSet"
000210 PROPERTY ANSI AS "Ansi"
000220 CLASS SYS-STRING AS "System.String".
000230 END PROGRAM XMROTRBK.
C.1.5
XMROAUTH サブルーチン
000010 IDENTIFICATION DIVISION.
000020 PROGRAM-ID.
XMROAUTH AS "XMROAUTH"
000030
IS PROTOTYPE CUSTOM-ATTRIBUTE IS PTRN.
000040
000050 ENVIRONMENT
DIVISION.
000060 CONFIGURATION
SECTION.
000070 SPECIAL-NAMES.
000080 CONSOLE
IS
CONSL
000090 CUSTOM-ATTRIBUTE PTRN
000100
CLASS DLLIMPORT USING "f3bws1sb.dll"
000110
PROPERTY P-CALLINGCONVENTION IS STDCALL OF E-CALLINGCONVENTION
000120
PROPERTY CHARSET IS ANSI OF E-CHARSET.
000130 REPOSITORY.
000140 CLASS DLLIMPORT AS "System.Runtime.InteropServices.DllImportAttribute"
000150 ENUM E-CALLINGCONVENTION
000160
AS "System.Runtime.InteropServices.CallingConvention"
000170 PROPERTY P-CALLINGCONVENTION AS "CallingConvention"
000180 PROPERTY STDCALL AS "StdCall"
000190 PROPERTY CHARSET AS "CharSet"
000200 ENUM E-CHARSET AS "System.Runtime.InteropServices.CharSet"
000210 PROPERTY ANSI AS "Ansi"
000220 CLASS SYS-STRING AS "System.String".
000230 END PROGRAM XMROAUTH.
C.2
マニュアル内で使用した図表に対するテキスト形式の雛型
本節は、本マニュアル内の図表のうち、カット&ペーストで活用できるテキスト形式の雛型を載せています。
各雛型の記載形式の詳細は、本マニュアル内の説明箇所を参照してください。
C.2.1
PowerRDBconnector 動作環境ファイルのサンプル
以下のサンプルは、必要に応じて、< >内に値を設定したり、コメントを解除して使用してください。
詳細は、「3.1.4 PowerRDBconnector 動作環境ファイル」を参照してください。
; PowerRDBconnector の動作環境
ServerName=<データベース名>
ProviderName= OCI
; TableLock=ON
; RecordLock=<レコードロック>
; CheckLock=<チェックロック>
; Suppress=<後方空白補正>
; DataCheck=<データチェック>
; ErrorLog=<エラーログの出力先>
- 137 -
; TraceMode=<トレースモード>
; TraceSize=<トレースファイルのサイズ>
; TraceLevel=<トレースのレベル>
C.2.2
COBOL 初期化ファイルのサンプル
以下のサンプルは、必要に応じて名称などを追加、変更して使用してください。
詳細は、「3.1.5 COBOL 初期化ファイル」を参照してください。
EMPLOYEE=TableName=employee&SchemaName=SCOTT&AccessMode=RANDOM&Suppress=OFF,RDM
CUSTOMER=TableName=customer&SchemaName=SCOTT&AccessMode=RANDOM&Suppress=OFF,RDM
@CBR_ENTRYFILE=ENTRY.ENT
C.2.3
エントリ情報ファイルのサンプル
以下のサンプルは、必要に応じて名称などを追加、変更して使用してください。
詳細は、「3.1.5 COBOL 初期化ファイル」を参照してください。
[ENTRY]
;トランザクションサブルーチン
XMROTSTR=F3BWS1CB.DLL
XMROTEND=F3BWS1CB.DLL
XMROTCNL=F3BWS1CB.DLL
XMROTRBK=F3BWS1CB.DLL
; 認証情報登録サブルーチン
XMROAUTH=F3BWS1SB.DLL
C.2.4
セッションサブルーチンのサンプル
以下のサンプルは、必要に応じて名称などを追加、変更して使用してください。
詳細は、「3.2 セッションの制御方法」を参照してください。
DATA DIVISION.
WORKING-STORAGE SECTION.
01 SESSION-ID
PIC X(30) VALUE SPACE.
01 RET-VALUE
PIC S9(9) COMP-5.
01 RET
PIC S9(9) COMP-5 VALUE 0.
<略>
PROCEDURE DIVISION.
MOVE "SESSION01" TO SESSION-ID.
* セッションを開設する
CALL “COB_PRDB_START” USING BY REFERENCE SESSION-ID RETURNING RET-VALUE.
- 138 -
OPEN I-O INFILE.
<略>
CLOSE INFILE.
* セッションを閉設する。
CALL “COB_PRDB_END” USING BY REFERENCE SESSION-ID RETURNING RET-VALUE.
C.2.5
認証サブルーチンのサンプル
以下のサンプルは、必要に応じて名称などを追加、変更して使用してください。
シングルセッションの場合
詳細は、「3.3.2 データベース認証の使用方法(シングルセッション)」を参照してください。
DATA
DIVISION.
WORKING-STORAGE
01 USERINFO.
02 AUTH
02 USERNNO
02 USERN
02 PASSWNO
02 PASSW
01 ERRINFO.
02 ENDINFO
02 DITINFO
02 FILLER
01 RET
<略>
SECTION.
PIC
PIC
PIC
PIC
PIC
9(9) COMP-5 VALUE 0.
9(9) COMP-5 VALUE 0.
X(260) VALUE SPACE.
9(9) COMP-5 VALUE 0.
X(260) VALUE SPACE.
PIC
PIC
PIC
PIC
S9(9)
S9(9)
S9(9)
S9(9)
COMP-5 VALUE 0.
COMP-5 VALUE 0.
VALUE 0.
COMP-5 VALUE 0.
PROCEDURE DIVISION.
* データベース認証にする
MOVE 2 TO AUTH.
MOVE "SYSTEM100" TO USERN.
MOVE 9 TO USERNNO.
MOVE "SYSUSER" TO PASSW.
MOVE 7 TO PASSWNO.
CALL "XMROAUTH" USING USERINFO ERRINFO
MOVE SPACE TO USERN.
MOVE SPACE TO PASSW.
RETURNING RET.
<略>
マルチセッションの場合
詳細は、「3.3.3 データベース認証の使用方法(マルチセッション)」を参照してください。
WORKING-STORAGE SECTION.
01 SESSION-ID
PIC X(30).
01 RET-VALUE
PIC S9(9) COMP-5.
01 S-CODE
PIC X.
01 USERINFO
02 AUTH
PIC 9(9) COMP-5 VALUE 0.
02 USERNNO
PIC 9(9) COMP-5 VALUE 0.
02 USERN
PIC X(260) VALUE SPACE.
- 139 -
02 PASSWNO
02 PASSW
01 ERRINFO.
PIC 9(9) COMP-5 VALUE 0.
PIC X(260) VALUE SPACE.
02 ENDINFO
PIC S9(9) COMP-5 VALUE 0.
02 DITINFO
PIC S9(9) COMP-5 VALUE 0.
02 FILLER
PIC S9(9) VALUE 0.
~~
* セッションの開始
CALL “COB_PRDB_START” USING BY REFERENCE SESSION-ID RETURNING RET-VALUE.
* 認証情報の登録
CALL “COB_PRDB_ AUTH” USING BY REFERENCE SESSION-ID
BY REFERENCE USERINFO BY REFERENCE ERRINFO RETURNING RET-VALUE.
<略>
OPEN
<略>
CLOSE
* セッションの閉設
CALL “COB_PRDB_END” USING BY REFERENCE SESSION-ID RETURNING RET-VALUE.
C.2.6
トランザクションサブルーチンのサンプル
以下のサンプルは、必要に応じて名称などを追加、変更して使用してください。
マルチセッションの場合
詳細は、「3.4.3 トランザクションの使用方法(マルチセッション)」を参照してください。
WORKING-STORAGE SECTION.
01 SESSION-ID
PIC X(30).
01 RET-VALUE
PIC S9(9) COMP-5.
01 S-CODE
PIC 9(9) COMP-5.
~~
MOVE "SESSION01" TO SESSION-ID.
* セッションの開設
CALL “COB_PRDB_START” USING BY REFERENCE SESSION-ID
RETURNING RET-VALUE.
<略>
OPEN FILE1
MOVE 1 TO S-CODE.
* トランザクションの開始
CALL “COB_PRDB_ TRAN” USING BY REFERENCE SESSION-ID
BY VALUE S-CODE RETURNING RET-VALUE.
<略>
- 140 -
MOVE 2 TO S-CODE.
* トランザクションの確定
CALL “COB_PRDB_TRAN” USING BY REFERENCE SESSION-ID
BY VALUE S-CODE RETURNING RET-VALUE.
または
MOVE 3 TO S-CODE.
* トランザクションの取消し
CALL “COB_PRDB_ TRAN” USING BY REFERENCE SESSION-ID
BY VALUE S-CODE RETURNING RET-VALUE.
<略>
CLOSE
CALL “COB_PRDB_END” USING BY REFERENCE SESSION-ID RETURNING RET-VALUE.
- 141 -
付録 D
リリース情報
本章では、PowerRDBconnector のリリース情報を示します。
D.1
リリース情報
製品名
リリース情報
VL
PowerRDBconnector for
NetCOBOL
V1.0L10A
PowerRDBconnector for
NetCOBOL
V1.0L20
SQL Server 2000 に対応しました。
・ Oracle9i,Oracle10g に対応しました。
・ インストール先を可変にしました。
・ クライアント運用をサポートしました。
PowerRDBconnector クラ
イアントパッケージ for
NetCOBOL
・ データベース認証機能をサポートしました。
V1.0L20
・ Oracle のビュー表を、OUTPUT オープン可能としました。
・ ServerName プロパティの制限を 255 文字まで緩和しました。
・ Windows Server 2003 Release 2 をサポートしました。
・ Oracle10g Release2 をサポートしました。
・ SQL Server 2005 をサポートしました。
・ NetCOBOL for .NET V3.0 をサポートしました。
・ マルチスレッドプログラミング用の以下のサブルーチンを追加しまし
た。
- COB_PRDB_START サブルーチン
- COB_PRDB_END サブルーチン
- COB_PRDB_TRAN サブルーチン
- COB_PRDB_AUTH サブルーチン
・ データベース認証をサポートしました。
PowerRDBconnector サー
バパッケージ for
NetCOBOL
PowerRDBconnector クラ
イアントパッケージ for
NetCOBOL
・ SQL Server のビュー表に対し、OUTPUT モードでのオープンをサ
V2.0L10
ポートしました。
・ テーブルロック解除時に強制トランザクションを取り消す機能
(XMROTRBK サブルーチン)をサポートしました。
・ Oracle でバイナリ項目をサポートしました。
・ PowerRDBconnector 動作環境ファイルに以下のプロパティを追加し
ました。
- Suppress プロパティ:後方空白補正
- DataCheck プロパティ:データチェック
- TraceLevel プロパティ:トレースのレベル
- COBOL 初期化ファイルに以下のプロパティを追加しました。
- Suppress プロパティ:後方空白補正
・ TableName プロパティ、ServerName プロパティに記述できる記号を
増やしました。
・ ServerName プロパティに指定できる値を 255 文字にしました。
- 142 -
製品名
リリース情報
VL
・ SJIS-UCS2(英数字項目がシフト JIS、日本語項目が unicode)のコー
ド系をサポートしました。
・ ErrorLog プロパティの指定に誤りがあった場合のメッセージ通知機
能を追加しました。
・ 環境誤りのエラーコードを細分化し、isstat3 を変更しました。
・ エラー情報に、列名や PowerRDBconnector 動作環境ファイルのプ
ロパティ名を出力する機能を追加しました。
・ データ補正機能を追加しました。
・ トレース出力機能を追加しました。
・ インストール時に選択したデータベース以外にアクセスできないよう
変更しました。
・ Windows Vista をサポートしました。
・ NetCOBOL for .NET V3.1 をサポートしました。
PowerRDBconnector
クライアントパッケージ
V2.0L20
・ NetCOBOL V9.0 をサポートしました。
・ CLOSE 時のエラーは無視するように修正しました。
for NetCOBOL
・ ALTERNATE KEY に対応する項目を更新後、キー順読込みする
カーソル位置を COBOL 標準となるよう修正しました。
・ Visual C++ 6.0 のランタイムモジュールを使用しないように変更しま
した。
サーバパッケージのみのリリース情報を以下に示します。
・ Windows Vista をサポートしました。
・ NetCOBOL for .NET V3.1 をサポートしました。
・ NetCOBOL V9.0 をサポートしました。
・ CLOSE 時のエラーは無視するように修正しました。
・ ALTERNATE KEY に対応する項目を更新後、キー順読込みする
カーソル位置を COBOL 標準となるよう修正しました。
PowerRDBconnector
・ Visual C++ 6.0 のランタイムモジュールを使用しないように変更しま
サーバパッケージ
した。
for NetCOBOL
V3.0L10
PowerRDBconnector
サーバパッケージ、クライアントパッケージ共通のリリース情報を以下に示
します。
クライアントパッケージ
・ JIS2004 の文字コード系のデータをサポートしました。
for NetCOBOL
・ Windows Server 2008 をサポートしました。(注)
・ NetCOBOL V10.0.0 をサポートしました。
・ Oracle11g をサポートしました。
・ UTF-8 で 作 成 さ れ た PowerRDBconnector 動 作 環 境 フ ァ イ ル 、
COBOL 初期化ファイルをサポートしました。
(注) Windows Server 2008 のサポートについて
Windows Server 2008 上の PowerRDBconnector からアクセス可能な
データベースは、SQL Server 2005 のみです。
- 143 -
D.2
非互換について
製品名
直前の VL との非互換
VL
PowerRDBconnector for
NetCOBOL
V1.0L20
インストール先を可変にしたため、サブルーチン使用時のリンク先の指定
が変更になりました。
PowerRDBconnector クラ
イアントパッケージ for
NetCOBOL
V1.0L20
特にありません。
・ PowerRDBconnector 動作環境ファイルに、プロパティ名と=のみ記述
PowerRDBconnector サー
バパッケージ for
NetCOBOL
PowerRDBconnector クラ
イアントパッケージ for
NetCOBOL
した場合、初期値動作でなく、エラーとなります。
V2.0L10
・ PowerRDBconnector 動作環境ファイルの ErrorLog プロパティに、ドラ
イブ名のみを指定すると、オープン処理でエラーとなります。
・ インストール時に選択したデータベース以外にはアクセスできなくなり
ます。
・ CLOSE 時のエラーは通知されず、正常終了します。
PowerRDBconnector
クライアントパッケージ
V2.0L20
for NetCOBOL
・ ALTERNATE KEY に対応する項目を更新後、キー値の重複データ
を順に読込む位置が、次のように変更されます。
- 前 VL までは変更後のキー位置まで読み飛ばされる。
- COBOL 標準であるキー変更前の位置の次から読み飛ばしがな
く正しく読み込まれます。
サーバパッケージの前版(V2.0L10)からの非互換点を以下に示します。
・ インストール時に選択したデータベース以外にはアクセスできなくなり
ます。
PowerRDBconnector
・ CLOSE 時のエラーは通知されず、正常終了します。
サーバパッケージ
・ ALTERNATE KEY に対応する項目を更新後、キー値の重複データ
を順に読込む位置が、次のように変更されます。
for NetCOBOL
V3.0L10
PowerRDBconnector
クライアントパッケージ
for NetCOBOL
- 前 VL までは変更後のキー位置まで読み飛ばされる。
- COBOL 標準であるキー変更前の位置の次から読み飛ばしがな
く正しく読み込まれます。
クライアントパッケージの前版(V2.0L20)からの非互換点を以下に示しま
す。
・ Windows Vista で、SQL Server 2000 や Oracle9i のデータベースに対
応した PowerRDBconnector がインストールできなくなりました。
- 144 -
索 引
[記号]
@CBR_ENTRYFILE..........................................................39,41
ServerName.........................................................................31,33
SHREXT...................................................................................42
Suppress.....................................................................32,34,39,69
[A]
AccessMode..............................................................................38
ANALYZE 文..........................................................................86
ASCOMP5...........................................................................40,42
[T]
TableLock...................................................32,33,34,38,65,94,95
TableName................................................................................38
THREAD..................................................................................40
TraceLevel....................................................................32,36,117
TraceMode....................................................................32,35,117
TraceSize......................................................................32,36,117
Truncate..........................................................................38,87,90
[C]
CheckLock......................................................................32,34,67
COBOL85.CBR..............................................................39,50,56
COBOL アプリケーション...........................................................5
COBOL 初期化ファイル..............................................20,37,138
COB_PRDB_AUTH...........................................................43,52
COB_PRDB_END.........................................................43,44,46
COB_PRDB_START.....................................................43,44,45
COB_PRDB_TRAN.......................................................43,59,61
[U]
unicode............................................................................69,74,82
[X]
x64.......................................................................................21,42
XMROAUTH............................................................41,43,49,51
XMROAUTH サブルーチン.................................................137
XMROTCNL.............................................................41,43,56,58
XMROTCNL サブルーチン..................................................136
XMROTEND.............................................................41,43,56,58
XMROTEND サブルーチン..................................................135
XMROTRBK...................................................41,43,56,58,66,83
XMROTRBK サブルーチン..................................................136
XMROTSTR.............................................................41,43,56,57
XMROTSTR サブルーチン...................................................135
[D]
DataCheck.......................................................32,34,71,72,73,74
DBIO_ENV.........................................................................31,32
DB プロバイダー......................................................................20
DLOAD...............................................................................40,41
[E]
ErrorLog.......................................................................32,35,117
[F]
FJSVdbio_trc.log..........................................36,117,118,119,121
[あ]
アクセス権限.............................................................................23
アプリケーションログ...................................102,103,113,115,116
イベントログ....................................................35,47,51,58,61,121
インターネット.............................................................................2
インデックス....................................................................21,79,85
インポートライブラリ..................................................................41
エラーコード......................................................104,114,115,117
エラーログ.................................................................................32
エントリ情報..........................................................39,41,45,49,56
エントリ情報ファイル...............................................................138
オプティマイザ統計..................................................................86
[H]
HIGH-VALUE...............................................................73,75,84
[L]
LOW-VALUE................................................................73,75,84
[N]
NetCOBOL for .NET...............................................................42
NetCOBOL for Windows.........................................................40
NODLOAD..............................................................................41
NOLOGGING モード...............................................................86
[O]
OCCURS 句.............................................................................78
OPEN_CURSORS...............................................................10,31
OS 認証..........................................................................21,25,49
[か]
仮想マシン...............................................................................19
環境変数.............................................................................32,33
既存 COBOL 資産.....................................................................5
既存システム..............................................................................2
機能互換....................................................................................1
キャラクターセット...........................................................22,24,79
強制的なトランザクション.........................................................66
強制トランザクション................................................62,87,90,114
後方空白..................................................................................69
後方空白補正...........................................................32,34,39,69
混在項目..................................................................................77
コンパイル方法.........................................................................40
コード系..........................................................................40,42,79
[P]
platform....................................................................................42
PowerRDBconnector 動作環境ファイル......................20,31,137
ProviderName......................................................................32,33
[R]
RCS......................................................................................40,42
RecordLock..............................................................................94
REDEFINES 句...................................................................27,78
[S]
SchemaName............................................................................38
- 145 -
パスワード認証.........................................................................12
ビュー.........................................................................21,25,78,96
ファイル.....................................................................................25
ファイルアクセス機能.................................................................5
ファイル共用.............................................................................42
ファイル構成.............................................................................23
ファイル識別名.........................................................................38
ファイル識別名定数.................................................................39
プログラミングスタイル...........................................................3,10
プログラム原型..................................................................43,135
プロセス....................................................................................10
プロバイダー名.........................................................................32
翻訳オプション....................................................................40,42
[さ]
索引ファイル.............................................................................26
サブルーチン....................40,41,43,44,47,49,55,56,58,60,66,83
シノニム...............................................................................6,9,38
シフト JIS..............................................................................69,74
順ファイル.................................................................................25
照合順序..................................................................................77
使用メモリ量.............................................................................84
シングルスレッド.......................................................................10
シングルセッション...............3,10,11,39,41,42,43,44,49,55,66,84
スタック域..................................................................................97
スレッド......................................................................................10
性能.......................................................................................1,87
性能向上..................................................................................85
セキュリティ.............................................................................100
セッション..........................................................................7,44,47
セッションサブルーチン.............................................45,116,138
相対ファイル...............................................................................8
[ま]
待合わせ..................................................................................68
マルチスレッド.........................................................10,40,97,115
マルチセッション.........................3,8,10,11,39,43,52,58,60,84,94
文字コード系............................................................................24
文字コード変換........................................................................96
[た]
タイムアウト機能.......................................................................67
チェックロック.......................................................................32,67
デッドロック...............................................................................94
データ溢れ...............................................................................82
データチェック...........................................................32,34,71,73
データベース..................................................................21,24,25
データベースオブジェクト........................................................23
データベース認証.....................................................21,25,49,52
データベース名...................................................................31,33
データベース・リンク..............................................................9,38
データ補正..........................................................................71,74
データ補正機能.......................................................................68
テーブル..............................................................................21,25
テーブル名...............................................................................23
テーブルロック.............................32,33,38,58,65,66,83,87,92,94
統計情報.............................................................................31,86
動的プログラム構造.................................................................40
動的リンク構造.........................................................................41
トランザクション..........................................................12,55,85,88
トランザクション開始.................................................................57
トランザクション確定.................................................................57
トランザクションサブルーチン......................................57,60,140
トランザクション取消し.........................................................58,66
トレース...................................................................................117
トレースのレベル......................................................................32
トレースファイルのサイズ.........................................................32
トレースモード...........................................................................32
[や]
ユーリティティ...........................................................................82
読み取り一貫性........................................................................97
[ら]
リモート....................................................................................100
履歴ファイル.............................................................................85
リンク方法............................................................................40,42
レコード構成.............................................................................23
レコードロック............................................32,34,62,83,87,90,114
列定義......................................................................................26
[な]
認証..........................................................................................48
認証機能..................................................................................12
認証サブルーチン.................................................................139
認証情報登録サブルーチン.............................49,50,52,53,115
認証情報の登録......................................................................54
[は]
排他.....................................................................................62,94
排他制御........................................................................12,61,89
- 146 -
Fly UP