コーディングでは，GUI画面の例題で作成した「受注データ入力プログラム」の入力論理マップと出力論理マップを使用します。

• 入力論理マップ
  入力論理マップを次に示します。
  

  01 JYU1GCI. 02 JYU1GCS PIC S9(4) COMP-5 VALUE +30. 02 JYU1GC0 PIC S9(4) COMP VALUE +0. 02 JYU1GCK. 03 JYU1GC-INCI PIC X(4). 03 JYU1GC-INCURS-LOCI PIC X(2). 03 JYU1GC-FIELD0001-H. 04 JYU1GC-FIELD0001-I PIC X(8). 03 JYU1GC-FIELD0003-H. 04 JYU1GC-FIELD0003-I PIC X(2). 03 JYU1GC-FIELD0007-H. 04 JYU1GC-FIELD0007-I PIC X(4). 03 JYU1GC-FIELD0002-H. 04 JYU1GC-FIELD0002-I PIC 9999. 03 JYU1GC-FIELD0008-H. 04 JYU1GC-FIELD0008-I PIC X(2).

  コーディングの説明を次に示します。説明の番号は，コーディング例中の丸付き数字の番号と対応しています。
  1：論理マップ長
  2：イベント通知コード
  3：カーソル位置
  4：得意先コード
  5：入金区分
  6：商品コード
  7：数量
  8：割引特典
  
• 出力論理マップ
  出力論理マップを次に示します。
  

  01 JYU1GCO. 02 JYU1GCL PIC S9(4) COMP-5 VALUE +194. 02 JYU1GCZ PIC S9(4) COMP VALUE +0. 02 JYU1GCG. 03 JYU1GC-CNTRLO PIC X(2). 03 JYU1GC-OUTCURS-LOCO PIC X(2). 03 JYU1GC-FIELD0001-O PIC X(8). 03 JYU1GC-RADIO0004-A PIC X(2). 03 JYU1GC-RADIO0005-A PIC X(2). 03 JYU1GC-RADIO0006-A PIC X(2). 03 JYU1GC-LIST0007-O OCCURS 6. 04 JYU1GC-LIST-CODE0007-O PIC X(4). 04 JYU1GC-LIST-LABEL0007-O PIC X(24). 03 JYU1GC-FIELD0002-O PIC 9999. * 01 JYU1GCT PIC S9(4) COMP-5 VALUE +194. 01 JYU1GCD. 02 JYU1GC-FIELD0001-T. 03 FILLER PIC X(2) VALUE X'000A'. 02 JYU1GC-FIELD0003-T. 03 FILLER PIC X(2) VALUE X'0012'. 02 JYU1GC-FIELD0007-T. 03 FILLER PIC X(2) VALUE X'0014'. 02 JYU1GC-FIELD0002-T. 03 FILLER PIC X(2) VALUE X'0018'. 02 JYU1GC-FIELD0008-T. 03 FILLER PIC X(2) VALUE X'001C'. 02 JYU1GC-INCT. 03 FILLER PIC X(2) VALUE X'0004'. 02 JYU1GC-PBOX0009-T. 03 FILLER PIC X(2) VALUE X'8006'.

  コーディングの説明を次に示します。説明の番号は，コーディング例中の丸付き数字の番号と対応しています。
  1：論理マップ長
  2：論理カーソル指定
  3：得意先コード
  4：ラジオボタン選択状態設定エリア
  5：商品コード
  6：商品名
  7：数量
  8：カーソル定数
  9：得意先コードへの位置づけ
  10：入金区分への位置づけ
  11：商品名への位置づけ
  12：数量への位置づけ
  13：割引特典への位置づけ
  14：プッシュボタンへの位置づけ
  

「受注データ入力プログラム」のコーディングから重要な部分を抜粋したものを図7-2から図7-3に示し，ポイントを説明します。

図7-2　ポイントとなる部分のコーディング（画面）（1/2）

図7-3　ポイントとなる部分のコーディング（画面）（2/2）

ポイント1　論理マップ中に出力したいデータを指定します

GUI画面のリストボックスのラベルを指定しておきます。ここで指定しないと，リストボックスの中が空白になります。

ポイント2　COPY文で論理マップを取り込みます

XMAP3では，COPY文を使用して，アプリケーションプログラムへ論理マップを取り込みます。論理マップには，入力論理マップと出力論理マップがあり，それぞれ名称が異なります。名称の最後に「I」が付く場合は入力論理マップ名，「O」が付く場合は出力論理マップ名になります。

ここでは，出力論理マップ名「JYU1GCO」と入力論理マップ名「JYU1GCI」を指定します。

ポイント3　通信記述項に画面の入出力に必要な情報を指定します

• TRANSCEIVE文で使用する通信記述名を格納する領域を指定します。ここでは，「DSP」と指定します。
• TRANSCEIVE文で入出力する物理マップ名を格納する領域を指定します。ここでは，「画面マップ名」と指定します。「画面マップ名」には，手続き部でMOVE文を使って，物理マップ名「JYU1GCND」を設定します（物理マップ名は「マップ名+ND」となります）。
• 仮想端末名を格納する領域を指定します。ここでは，「画面端末名」と指定します。
• 画面の入出力が正しく実行されたかどうかを判定する領域の名称を指定します。TRANSCEIVE文実行後，この領域にリターンコード「00000」が返されれば，画面の入出力が正しく行われたことになります。ここでは，「画面-RC」と指定します。

ポイント4　TRANSCEIVE文で画面の入出力を指定します

TRANSCEIVE文でディスプレイ端末への画面の入出力をまとめて指定します。画面表示をSEND文で，画面入力をRECEIVE文で指定することもできます。TRANSCEIVE文は，このSEND文とRECEIVE文の両方の機能を合わせ持っています。通常の画面の送受信にはTRANSCEIVE文を使うことをお勧めします。

TRANSCEIVE文では，通信記述項で指定した通信記述名，出力論理マップ名，および入力論理マップ名を指定します。ここでは，順に「DSP」，「JYU1GCO」，「JYU1GCI」と指定します。

アプリケーションプログラムの作成について詳しく知りたい方は，マニュアル「XMAP3 プログラミングガイド」を参照してください。