第5章 エラー時の対処
C.2 マニュアル内で使用した図表に対するテキスト形式の雛型
本節は、本マニュアル内の図表のうち、カット&ペーストで活用できるテキスト形式の雛型を載せています。
各雛型の記載形式の詳細は、本マニュアル内の説明箇所を参照してください。
C.2.1 PowerRDBconnector動作環境ファイルのサンプル
以下のサンプルは、必要に応じて、< >内に値を設定したり、コメントを解除したりして使用してください。
詳細は、「3.1.4 PowerRDBconnector 動作環境ファイル」を参照してください。
; PowerRDBconnectorの動作環境 ServerName=<データベース名>
ProviderName= OCI
; TableLock=ON
; RecordLock=<レコードロック>
; CheckLock=<チェックロック>
; Suppress=<後方空白補正>
; DataCheck=<データチェック>
; PrepareMode=<SQL文準備モード>
; ErrorLog=<エラーログの出力先>
; 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初期化ファイル」を参照してください。
・ 32ビット動作時
－ シングルセッション時 [ENTRY]
;トランザクションサブルーチン XMROTSTR=F3BWS1CB.DLL XMROTEND=F3BWS1CB.DLL XMROTCNL=F3BWS1CB.DLL XMROTRBK=F3BWS1CB.DLL
; 認証情報登録サブルーチン XMROAUTH=F3BWS1SB.DLL
－ マルチセッション時 [ENTRY]
;セッションサブルーチン COB_PRDB_START=F3BIEFNC.dll COB_PRDB_END=F3BIEFNC.dll COB_PRDB_CHG=F3BIEFNC.dll
;トランザクションサブルーチン COB_PRDB_TRAN=F3BIEFNC.dll
; 認証情報登録サブルーチン COB_PRDB_AUTH=F3BIEFNC.dll
・ 64ビット動作時
－ シングルセッション時 [ENTRY]
;トランザクションサブルーチン XMROTSTR=F4ARS1CB_64.DLL XMROTEND=F4ARS1CB_64.DLL XMROTCNL=F4ARS1CB_64.DLL XMROTRBK=F4ARS1CB_64.DLL
; 認証情報登録サブルーチン XMROAUTH=F4ARS1SB_64.DLL
; トレース文字出力サブルーチン XMROLOG=F4ARS1SB_64.DLL
－ マルチセッション時 [ENTRY]
;セッションサブルーチン COB_PRDB_START=F4AGEFNC.dll COB_PRDB_END=F4AGEFNC.dll COB_PRDB_CHG=F4AGEFNC.dll
;トランザクションサブルーチン COB_PRDB_TRAN=F4AGEFNC.dll
; 認証情報登録サブルーチン COB_PRDB_AUTH=F4AGEFNC.dll
; トレース文字出力サブルーチン COB_PRDB_LOG=F4AGEFNC.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.
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 SECTION.
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.
02 PASSWNO PIC 9(9) COMP-5 VALUE 0.
02 PASSW PIC X(260) VALUE SPACE.
01 ERRINFO.
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.
01 RET PIC S9(9) 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 RETURNING RET.
MOVE SPACE TO USERN.
MOVE SPACE TO PASSW.
＜略＞
マルチセッションの場合
詳細は、「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.
02 PASSWNO PIC 9(9) COMP-5 VALUE 0.
02 PASSW PIC X(260) VALUE SPACE.
01 ERRINFO.
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.
* 認証情報の登録 MOVE 2 TO AUTH.
MOVE "SYSTEM100" TO USERN.
MOVE 9 TO USERNNO.
MOVE "SYSUSER" TO PASSW.
MOVE 7 TO PASSWNO.
CALL "COB_PRDB_AUTH" USING BY REFERENCE SESSION-ID
BY REFERENCE USERINFO BY REFERENCE ERRINFO RETURNING RET-VALUE.
MOVE SPACE TO USERN.
MOVE SPACE TO PASSW.
＜略＞
OPEN I-O FILE1.
＜略＞
CLOSE FILE1.
* セッションの閉設
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 I-O FILE1.
MOVE 1 TO S-CODE.
* トランザクションの開始
CALL "COB_PRDB_TRAN" USING BY REFERENCE SESSION-ID BY VALUE S-CODE RETURNING RET-VALUE.
＜略＞
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 FILE1.
* セッションの閉設
CALL "COB_PRDB_END" USING BY REFERENCE SESSION-ID RETURNING RET-VALUE.
付録 D データベースの相違点
本章では、PowerRDBconnectorからSQL ServerとOracleにアクセスする場合の相違点について説明します。
データベースが持つ固有の機能やツールなどの相違点については、データベースそれぞれのマニュアルを参照してください。