第 5 章 エラー時の対処
C.2 マニュアル内で使用した図表に対するテキスト形式の雛型
本節は、本マニュアル内の図表のうち、カット&ペーストで活用できるテキスト形式の雛型を載せています。
各雛型の記載形式の詳細は、本マニュアル内の説明箇所を参照してください。
C.2.1 PowerRDBconnector 動作環境ファイルのサンプル
以下のサンプルは、必要に応じて、< >内に値を設定したり、コメントを解除して使用してください。
詳細は、「3.1.4 PowerRDBconnector 動作環境ファイル」を参照してください。
; PowerRDBconnectorの動作環境 ServerName=<データベースのサーバ名>
DataSourceName=<データベース名>
; TimeOut=<タイムアウト時間>
; Suppress=<後方空白補正>
; DataCheck=<データチェック>
; ErrorLog=<エラーログの出力先>
; TraceMode=<トレースモード>
; TraceSize=<トレースファイルのサイズ>
; TraceLevel=<トレースのレベル>
C.2.2 COBOL 初期化ファイルのサンプル
以下のサンプルは、必要に応じて名称などを追加、変更して使用してください。
詳細は、「3.1.5 COBOL初期化ファイル」を参照してください。
EMPLOYEE=TableName=employee&SchemaName=dbo&AccessMode=RANDOM&Suppress=OFF,RDM CUSTOMER=TableName=customer&SchemaName=dbo&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.
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.
* 認証情報の登録
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.
＜略＞
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.
付録 D リリース情報
本章では、PowerRDBconnectorのリリース情報を示します。