入出力項目の処理 
入出力項目には、ユーザがキーボードを使用するか値一覧から該当の値を選択することによって値を入力できる従来の項目と、マウス操作が必要なチェックボックスやラジオボタンがあります。入出力項目にはいずれも名称が割り当てられ、この名称によって入出力項目は Dynpro 項目にリンクされます。入力書式は Dynpro 項目のデータ型によって決まります。たとえば、数値項目には文字は入力できません。ユーザが無効な値を入力しようとすると、Dynpro はそれを認識します。ラジオボタンとチェックボックスには常にデータ型が CHAR で長さが 1 の値が入力されます。ユーザによって選択されたラジオボタンやチェックボックスには値 ‘X’ が入力され、選択されないラジオボタンやチェックボックスには値 SPACE ( スペース) が入力されます。
ABAP プログラムには Dynpro 項目に対応する同名のデータオブジェクトが含まれていなければなりません。含まれていないと、データが失われる場合があります (Dynpro 項目への ABAP 文字列のリンク も参照) 。ABAP ディクショナリ のセクションに、Dynpro のデータ型に対応する ABAP のデータ型を示す表を収録しています。チェックボックスとラジオボタンの ABAP 項目には、必ず型が C で長さが 1 の値が入ります。
PBO イベントの処理後には、ABAP 項目の値が Dynpro 項目に取り込まれます。PAI イベントの前、またはその最中には、Dynpro 項目の値が ABAP 項目に書き込まれます。ラジオボタンは 1 つのグループで 1 つのみ選択できます。複数の項目に値 ‘X’ が入力されると、プログラムは終了します。
Dynpro 項目と ABAP 項目を正確に一致させるには、以下の手順を使用します。
ローカルプログラム項目
入出力項目を 1
つのプログラムでのみ使用する場合は、それらの項目を ABAP
プログラムで作成し、プログラムを有効化し、その後、ABAP
プログラムから Dynpro
に項目を
コピーします。以後、ABAP
プログラムでのそれらの項目を変更は避ける必要があります。
ディクショナリ参照付の Dynpro 項目
入出力項目を複数のプログラムで必要としていて、項目ラベル、項目ヘルプ、項目ヘルプなどの ABAP
ディクショナリの情報を使用したい場合は、ABAP
ディクショナリの項目をコピーします。構造とデータベーステーブルのどちらも参照することができます。
その後、TABLES 命令を使って、ABAP プロラムで同名の項目をインタフェース作業領域として宣言する必要があります。ABAP ディクショナリ内のデータ型に対する TYPES 参照を使った同名項目の宣言では、Dynpro と ABAP プログラム間でのデータ転送には不十分です。
Dynpro 項目、プログラムの作業領域、およびデータベーステーブル間での名称の重複定義を避けるためには、多くの場合、プログラムの 1 つ以上の Dynpro またはパッケージに使用するすべての入出力項目が入った固有の Dynpro 用 ABAP ディクショナリ構造を定義すると、それだけの効果があります。その後、ABAP プログラムで TABLES を使って宣言した作業領域は、プログラムと Dynpro 間のインタフェースとしてのみ機能するようになります。必要に応じて、プログラム項目とインタフェース作業領域間で値を割り当てることができます。
ABAP ディクショナリのデータ型の参照する利点は、データ型の変更時に、Dynpro 項目と ABAP プログラムの項目の両方が自動で更新されることです。
ローカルプログラムの項目
PROGRAM demo_dynpro_input_output.
DATA:
input TYPE i,
output TYPE i,
radio1(1) TYPE c, radio2(1) TYPE c,
radio3(1) TYPE c,
box1(1) TYPE c, box2(1) TYPE c, box3(1)
TYPE c, exit(1) TYPE c.
CALL SCREEN 100.
MODULE init_screen_100
OUTPUT.
CLEAR input.
radio1 = 'X'.
CLEAR: radio2, radio3.
ENDMODULE.
MODULE
user_command_0100 INPUT.
output = input.
box1 = radio1.
box2 = radio2.
box3 = radio3.
IF exit NE space.
LEAVE PROGRAM.
ENDIF.
ENDMODULE.
Dynpro 100 の次画面番号 ( 静的定義) は 100 です。このレイアウトは次のようなものです。
エレメント一覧内の Dynpro 項目に関連する部分は、次のとおりです。
|
名称 |
型 |
定義長 |
書式 |
|
INPUT |
入出力 |
9 |
INT4 |
|
OUTPUT |
入出力 |
11 |
INT4 |
|
RADIO1 |
ラジオ |
1 |
CHAR |
|
BOX1 |
チェック |
1 |
CHAR |
|
RADIO2 |
ラジオ |
1 |
CHAR |
|
BOX2 |
チェック |
1 |
CHAR |
|
RADIO3 |
ラジオ |
1 |
CHAR |
|
BOX3 |
チェック |
1 |
CHAR |
|
EXIT |
チェック |
1 |
CHAR |
|
|
OK |
20 |
OK |
Dynpro 項目 OUTPUT 、BOX1 、BOX2 、および BOX3 はユーザの入力を受け入れません。
INPUT の長さは上記のように定義されているため、ユーザは 1000 の区切記号を含まない 9 桁の整数を入力することができます。しかし、OUTPUT 項目には、1000 の区切記号を 2 つまで含めた値が表示されます。そのため、かりに INPUT の長さを 11 桁として定義していた場合は、実行時エラーが発生します。
この Dynpro 制御ロジックは次のとおりです。
PROCESS BEFORE OUTPUT.
MODULE init_screen_100.
PROCESS AFTER INPUT.
MODULE user_command_0100.
PAI イベントで入力項目のエントリが ABAP プログラムに渡され、ダイアログモジュールUSER_COMMAND_100 の出力項目に割り当てられます。次回、この Dynpro が表示されるときには、Dnpro 項目に適切な値が入力されています。入力項目は PBO ダイアログモジュール INT_SCREEN_100 で設定されます。ユーザが Dynpro 項目 EXIT ( 値 ‘X’) を選択すると、プログラムは終了します。
ディクショナリ参照付の Dynpro 項目
PROGRAM demo_dynpro_dictionary.
TABLES demo_conn.
DATA wa_spfli TYPE spfli.
CALL SCREEN 100.
MODULE init_screen_100 OUTPUT.
CLEAR demo_conn-mark.
MOVE-CORRESPONDING wa_spfli TO demo_conn.
CLEAR wa_spfli.
ENDMODULE.
MODULE user_command_0100 INPUT.
IF demo_conn-mark = 'X'.
LEAVE PROGRAM.
ENDIF.
MOVE-CORRESPONDING demo_conn TO wa_spfli.
SELECT SINGLE
cityfrom airpfrom
cityto airpto fltime deptime arrtime
INTO CORRESPONDING FIELDS OF wa_spfli
FROM spfli
WHERE carrid = wa_spfli-carrid AND connid =
wa_spfli-connid.
Dynpro 100
の静的定義による次画面は 100
です。この Dynpro
では、ABAP
ディクショナリからコピーされた構造DEMO_CONN
のコンポーネントが使用され、次のような外観になります。
構造 DEMO_CONN は、フライトデータモデルを使用する Dynpro 専用の構造として、ABAP ディクショナリに存在します。この構造には、データベーステーブル SPFLI の各コンポーネントが組み込まれていますが、そのほかに MARK というコンポーネントも 1 つ含まれています。MARK ではドメイン S_FLAG が使用されます。このドメインは値 SPACE ( スペース) か X のみ受け入れることができます。上の Dynpro で、MARK の ABAP ディクショナリテキストは ‘ 取消’ というテキストに変更されています。残りの項目ではいずれも、ABAP ディクショナリのテキストがそのまま使用されています。一部の項目では、入力属性がスクリーンペインタでオフに設定されています。
ユーザは航空会社とフライト番号の値を入力することができます。ABAP ディクショナリのチェックテーブルに対する自動項目チェック、項目ヘルプ、および入力ヘルプが自動で使用できるようになります。項目チェックは ABAP プログラムのダイアログモジュールのいずれかが呼び出される前に自動で実行されます。ユーザは、チェックテーブル SCARR に存在しない航空会社値、SPFLI に存在しないフライト番号値、および SPACE ( スペース) と X 以外の MARK 値は、いずれも入力できません。これらのチェックはいずれも ABAP プログラムでコーディングする必要はありません。
この Dynpro 制御ロジックは次のとおりです。
PROCESS BEFORE OUTPUT.
MODULE init_screen_100.
PROCESS AFTER INPUT.
MODULE user_command_0100.
ABAP プログラム内のモジュール USER_COMMAND_100 は、Dynpro 上で指定された ( またはチェックマークを付けられた) キー項目が含まれるデータベーステーブルからデータを読み込み、PBO モジュール INIT_SCREEN_100 の Dynpro にそのデータを戻します。TABLES 命令を使って定義された作業領域DEMO_CONN は、プログラムと Dynpro との間のインタフェースとして機能します。一方、データベースからのデータは作業領域 WA_SPFLI で処理されます。ユーザが Dynpro 項目 ‘ 取消’ ( 値 ‘X’) を選択すると、プログラムは終了します。