とあるSEの色々ブログ

プログラミングで全ての人を幸せに。プログラミングとITと転職と雑記と備忘録

AS400

レコードロック、ファイルロック

投稿日:

ファイル仕様書の指定と、CHAIN命令によって
ファイルのロック状態やレコードロックの状態を一覧にまとめました。

ファイルタイプIの読み取り専用ではレコードロックはかかりません。
ですがオブジェクトロックは*SHRRDでかかります。
レコードロックは掛からないので、レコードの更新や削除は可能です


ファイルタイプUの更新に指定した場合は
CHAIN実行時に該当レコードに対してレコードロックがかかります。
レコードロックがかかっているので、DFUで該当レコードにアクセスして
(アクセスは可能)値を修正して実行キーを押下してもロックされている旨のメッセージが表示されて更新は出来ません。


ファイルタイプUの更新に指定していても
CHAIN実行時に「CHAIN (N)」をオプション指定すると、
レコードロックはかかりません。


マスタ保守とかで同一キーのデータが存在するかを
チェックするだけの処理であれば(N)指定するのが良いかもしれませんね。

-AS400

執筆者:


comment

メールアドレスが公開されることはありません。 が付いている欄は必須項目です

関連記事

Hello AS/400

転職をきっかけにAS/400と出会いましたIBMって? ASって? 汎用機って?そんな状態から始まりました。出会いは突然で、そしてだいぶ意味不明。Z-ADDとか、CHAINとか、聞いたこともない命令群 …

WINDOWの作り方

ユーザーエントリーのプログラムを作る際に入力画面を保持した上で、顧客マスタや製品マスタなどをポップアップウィンドウという形で表示して、選択された値を入力画面に戻すみたいな。ユーザーは入力する際にコード …

STRDBG

デバッグにはSTRISDBが便利なのですが、RPG4では残念ながら使えません。WATCHとか使いやすい機能があって気に入っていたのですが。そこで他に方法はないかと調べていたところSTRDBGを見つけま …

【RPG4】DSについて

RPG4になって、I仕様書とE仕様書は廃止されました。D仕様書を使って変数、配列、定数、DSなどを記述していきます。特にこのD仕様書は色々便利になっている反面、戸惑うところもありましたので備忘録も兼ね …

デバッグの勧め STRISDB

RPG3のデバッグが出来る「STRISDB」の操作方法を記載します。自分への備忘録&迷えるAS/400ビギナーの方の参考になれば幸いです。 対象:自分、AS/400ビギナーの方、もしくはSTRISDB …