ACCEPT FIELD

実行

PERFORM RMP--AF-PANELNAME

説明

この標準ランタイム関数は、ユーザーによる単一パネルのフィールド/コントロールの入力を実行します。これは、標準の COBOL ACCEPT 文と似ていますが、RM/Panels はすべてのパラメーターを設定し、多くのサポートアクティビティを自動的に実行できる点が異なります。フィールド/コントロールの多くの特性は、プログラムを変更したり再コンパイルしたりせずに、パネルエディターを使用して変更できます。

注: ACCEPT 文よりはるかに強力ですが、この標準のランタイム関数は、RM/Panels でのユーザー入力を許可するには望ましい方法ではありません。ユーザー入力を許可するには、主に EXECUTE EVENT 標準ランタイム関数を使用します。フィールド/コントロールが 1 つだけ必要な場合は、ACCEPT FIELD を使用します。

必須パラメーター

プログラムは、フィールド/コントロールの名前を RMP--FIELD-NAME で受け入れられるように設定する必要があります。フィールド/コントロールが複数回出現する場合は、出現数を RMP--FIELD-OCCUR に指定する必要があります。出現数は COBOL の添え字に相当し、1 から始まります。

戻り値

ユーザーが入力した値は、panelname.WS 内の適切なフィールド/コントロールに格納されます。終了キーを示すフィールド/コントロールの終了コードは、RMP--EXCEPTION-NUMBER に返されます。

その他の使用上の注意事項

この標準ランタイム関数を実行する前に、パネルを表示する必要があります。
ユーザー入力エラー。フィールド/コントロールの検証が指定されており、エラーが検出された場合、RM/Panels の動作はユーザー入力が終了した方法によって異なります。入力が自動終了プロパティによって終了した場合、または Enter キーを押して終了した場合、エラーメッセージが表示され、ユーザーはフィールド/コントロールを再入力する必要があります。入力が他の方法で終了した場合、コントロールはアプリケーションプログラムに戻され、RMP--INVALID-INPUT は TRUE になります。このような状況でエラーメッセージを表示するには、SHOW FIELD ERROR 標準ランタイム関数を実行する必要があります。このアプローチは、EXECUTE EVENT 関数の実行中に無効な入力を処理する場合とは多少異なります。ACCEPT FIELD 関数の実行中、RM/Panels は自動終了プロパティおよび Enter キーが入力の正常終了を示すと見なします。入力が無効な場合は、処理を続行しないでください。EXECUTE EVENT 関数の実行中、RM/Panels は他の多くのキーも入力の正常終了を示すと見なします。
注: すべてのフィールド/コントロールにアクセラレータ値を使用している場合は、例外値および RMP--VALID-INPUT の両方をチェックします。アクセラレータキーはコードロジックに影響を与える可能性があります。
無効なフィールド/コントロール。パネルエディターで、またはランタイム実行時に、フィールド/コントロールで入力を許可しないように指定できます。この特性は、ACCEPT FIELD 標準ランタイム関数には該当しません。これが該当するのは、複数のフィールド/コントロールの入力を許可する標準ランタイム関数のみです。RM/Panels は、フィールド/コントロールが ACCEPT FIELD 標準ランタイム関数に対して明確に識別された場合、許可入力特性に関係なく入力を許可する必要があると見なします。これは非常に便利です。たとえば、ACCEPT FIELD を使用してメンテナンスプログラムのキーフィールド/コントロールの入力を許可してから、EXECUTE EVENT を使用して非キーフィールド/コントロールの更新を許可できます。

RMP--STATUS の値

ステータス値	説明
0	関数は正常に実行されました。
1	フィールド/コントロール名が無効です。
2	出現数が無効です。
5	パネルがこのライブラリにありません。
6	ライブラリが存在しません。
10	パネルが表示されません。
14	この関数の実行中に、パネルライブラリで COBOL の入力/出力エラーが発生しました。入力/出力エラーの詳細を判別するには、C$RERR サブプログラムを使用します。