SEND − メッセージの送信（データ操作言語）

DATA DIVISION（通信記述項）の指定

CD  通信記述名
    FOR  {OUTPUT|I-O}
  〔STATUS  KEY  IS データ名1〕
  〔SYMBOLIC  TERMINAL  IS データ名2〕
  〔MAP  NAME  IS データ名5〕
  〔SYNCHRONOUS  MODE  IS ｛ASYNC|データ名6｝〕
  〔SWITCHING  MODE  IS {NORMAL|PRIOR|データ名7}〕
  〔NEXT  TRANSACTION  IS データ名8〕
  〔DETAIL  MODE  IS データ名10〕
  〔MAPPING  MODE  IS データ名13〕.

DATA DIVISION（データ記述項）の指定

01 一意名1.
    02 データ名A  PIC  9(4) COMP.
    02 データ名B  PIC  X(2).
    02 データ名C  PIC  X(n).

PROCEDURE DIVISION（通信文）の指定

SEND  通信記述名  FROM  一意名1
    〔WITH  {ESI|EMI|一意名2}〕.

DATA DIVISION（通信記述項）の指定

CD  通信記述名
    FOR  {OUTPUT|I-O}
  〔STATUS  KEY  IS  データ名1〕
  〔SYMBOLIC  TERMINAL  IS  データ名2〕
  〔SWITCHING  MODE  IS  {NORMAL|PRIOR|データ名7}〕.

PROCEDURE DIVISION（通信文）の指定

SEND  通信記述名  WITH  EMI.

●FOR句

次のどちらかの値を設定します。

OUTPUT

一方送信メッセージの送信

I-O

応答メッセージの送信

●SYMBOLIC TERMINAL句

論理端末名称を設定したデータ項目を設定します。データ名2に出力先の論理端末名称を設定します。論理端末名称は最大8バイトの長さです。8バイトに満たない場合，論理端末名称の後ろを空白で埋めてください。

●MAP NAME句

マップ名を設定したデータ項目を設定します。データ名5にマップ名を設定します。マップ名は最大6バイトの長さです。6バイトに満たない場合，マップ名の後ろを空白で埋めてください。

MAP NAME句を省略，または，データ名5に空白を設定した場合は，論理端末定義（mcftalcle -p）のdflmapオペランドで指定したデフォルトマップ名を使用します。

●SYNCHRONOUS MODE句

非同期型でのメッセージ送信を示す，次のどちらかの値を指定してください。

ASYNC

非同期型のメッセージの送信

データ名6

次の値を設定したデータ項目

'0'または'△'：非同期型のメッセージの送信

省略した場合は，ASYNC（非同期型のメッセージの送信）が設定されます。

●SWITCHING MODE句

一方送信メッセージの場合に，一般か優先かを設定します。

NORMAL

一般の一方送信メッセージ

PRIOR

優先の一方送信メッセージ

データ名7

次の値を設定したデータ項目

'0'または'△'：一般の一方送信メッセージ

'1'：優先の一方送信メッセージ

省略した場合，および非応答型のアプリケーションから応答メッセージを送信した場合は，NORMAL（一般の一方送信メッセージ）が設定されます。

●NEXT TRANSACTION句

＜継続問い合わせ応答形態の場合＞

次起動アプリケーションを設定したデータ項目を設定します。データ名8に次起動アプリケーションを設定します。次起動アプリケーションは最大8バイトの長さです。8バイトに満たない場合，次起動アプリケーションの後ろを空白で埋めてください。

NEXT TRANSACTION句を省略，または，データ名8に空白を設定した場合は，実行中のアプリケーションを次のメッセージ受信時に再び起動します。

応答メッセージの送信を行うSEND（メッセージの送信）文を呼び出すサービスでDISABLE（継続問い合わせ応答の終了）文を呼び出す場合はNEXT TRANSACTION句を省略，または，データ名8に空白を設定してください。

継続問い合わせ応答を引き継いだエラーイベントで応答メッセージの送信を行うSEND（メッセージの送信）文を呼び出す際に，NEXT TRANSACTION句を省略，または，データ名8に空白を設定した場合，継続問い合わせ応答を終了します。ただし，継続問い合わせ応答を引き継いだエラーイベントで，SEND（アプリケーションプログラムの起動）文を呼び出して継続問い合わせ応答型のアプリケーションを起動し，起動先のアプリケーションで応答メッセージの送信を行うSEND（メッセージの送信）文を呼び出す際に，NEXT TRANSACTION句を省略，または，データ名8に空白を設定した場合，継続問い合わせ応答を終了しないで，SEND（アプリケーションプログラムの起動）文を呼び出したときに設定した継続問い合わせ応答型のアプリケーションを次のメッセージ受信時に再び起動します。

＜継続問い合わせ応答形態以外の場合＞

NEXT TRANSACTION句を省略，または，データ名8に空白を設定します。

●DETAIL MODE句

出力通番を付けるかどうかを設定します。データ名10に次のどちらかを設定します。

'0'または'△'

出力通番を付けます。

'1'

出力通番を付けません。

省略した場合，および非応答型のアプリケーションから応答メッセージを送信した場合は，出力通番を付けません。

●MAPPING MODE句

マッピングモードを設定します。データ名13に次のどちらかを設定します。

'2'

論理マップだけでマッピングする場合に設定します。

'2'以外

論理マップと物理マップの情報でマッピングする場合に設定します。

省略した場合は，論理マップと物理マップの情報でマッピングします。

●データ名A

出力論理マップの長さ（論理マップ固定部の長さ＋論理マップ可変部・定数部の長さ）を設定します。

●データ名B

送信完了通知イベントおよび送信障害通知イベントを設定します。データ名Bとビットの設定値の関係を次に示します。

AIX，HP-UXの場合

送信完了通知イベントおよび送信障害通知イベントの要否は，データ名Bの領域の2⁴ビットに設定します。

• 領域の2⁴ビットに1を設定すると，送信完了通知イベントおよび送信障害通知イベントを通知させます。ただし，これらのイベントを処理するMHPをアプリケーション属性定義（mcfaalcap）で指定していない場合は無効です。

• 領域の2⁴ビットに0を設定すると，送信完了イベントおよび送信障害通知イベントを通知させません。

Linux，Windowsの場合

送信完了通知イベントおよび送信障害通知イベントの要否は，データ名Bの領域の2¹²ビットに設定します。

• 領域の2¹²ビットに1を設定すると，送信完了通知イベントおよび送信障害通知イベントを通知させます。ただし，これらのイベントを処理するMHPをアプリケーション属性定義（mcfaalcap）で指定していない場合は無効です。

  メッセージが複数のセグメントで構成される場合，先頭セグメント送信時の指定が有効になります。

• 領域の2¹²ビットに0を設定すると，送信完了イベントおよび送信障害通知イベントを通知させません。

●データ名C

送信するセグメントの内容（論理マップ可変部・定数部に出力する内容）を設定します。

●WITH句

送信するメッセージのセグメント種別を設定します。

ESI

先頭セグメントの場合に設定します。

EMI

単一セグメントまたは先頭セグメントの送信後にメッセージ送信の終了を連絡する場合に設定します。

一意名2

次の値を設定したデータ項目

'1'：ESI（先頭セグメント）

'2'：EMI（単一セグメント）

指定を省略した場合は，EMI（単一セグメント）を設定します。

●STATUS KEY句

ステータスコードを受け取りたい場合に設定します。省略した場合は，ステータスコードを受け取れません。データ名1にステータスコードが返されます。