とあるSEの色々ブログ

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

AS400

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

投稿日:

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

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


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


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


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

-AS400

執筆者:


comment

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

関連記事

STRSDAの使い方

AS/400での画面設計に悩める人へ AS/400は非常に良いマシンです。コーディングもRPG4でフリーフォーマットで記述すると VBやJavaと差がないような構造的な書き方が出来ますし最近ではオープ …

Hello AS/400

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

ユーザー定義コマンド作成方法

コマンドの入力文字数を減らしたい visual studioや他の豪華なIDEとかでは、インテリセンスという入力補完の機能があったりしますが、AS400のコーディングや保守を行うエミュレーターにはそん …

no image

【RPG4】EVAL

RPG4から追加されたEVALという命令を紹介します。RPG3では代入処理は、文字型の場合はMOVE、数値型の場合はZ-ADDを使用していたと思いますがRPG4ではMOVEやZ-ADDは非推奨です。フ …

ライブラリ単位の一括文字列検索

AS400で文字列を検索する際に、ソース毎に行うのは大変ですよね。 色々な分析やソース解析、影響範囲を調べることが各種システム修正を行う際には発生します。 そのような調査を行うツールが導入されていれば …