カーソルによって指定されたレコードにレコードマークを設定あるいは解除します。
| レコードマーク | [ <カーソル名> , ] [ 設定 | 解除 ] |
| 設定 | レコードマークを設定します。 |
| 解除 | レコードマークを解除します。 |
| <カーソル名> | 変化しません。 | |
| カレントカーソル | <カーソル名> と同じ内容になります。 | |
| $$OLDSTATE | レコードマークステートメント実行前の対象レコードのレコードマークの状態(設定/解除)がキーワード定数として設定されます。 | |
| $$CMDSTATE | = 0 | 正常終了 |
| = 201 | 正しくないカーソルまたは末尾レコードやグループ末を指しているカーソルが指定されました | |
| = 214 | 権限で許されていない更新を行なおうとしました(参照のみでオープンされている表に対する更新も含みます) |
| 構造 | コマンド | パラメータ |
|---|---|---|
| 検索 | @DENPYO, [商品番号]:=$SNO | |
| IF $$CMDSTATE = 0 THEN | ||
| レコードマーク | @DENPYO, 設定 | |
| 代入 | $OLDRM := $$OLDSTATE | |
| … | ||
| レコードマーク | @DENPYO, $$OLDRM | |
| ENDIF |