以下の表では、それぞれの命令コードごとに自由形式構文を示します。
コード | 自由形式構文 |
---|---|
ACQ1 | ACQ{(E)} 装置名 ワークステーション・ファイル |
BEGSR | BEGSR サブルーチン名 |
CALLP | {CALLP{(EMR)}} 名前( {パラメーター1{:パラメーター2...}} ) |
CHAIN | CHAIN{(ENHMR)} 検索引数 ファイルまたはレコード名 {データ構造} |
CLEAR | CLEAR {*NOKEY} {*ALL} 名前 |
CLOSE | CLOSE{(E)} ファイル名 |
COMMIT | COMMIT{(E)} {境界} |
DEALLOC 1 | DEALLOC{(EN)} ポインター名 |
DELETE | DELETE{(EHMR)} {検索引数} ファイルまたはレコード名 |
DOU | DOU{(MR)} 標識式 |
DOW | DOW{(MR)} 標識式 |
DSPLY | DSPLY{(E)} {メッセージ {出力待ち行列 {応答}}} |
DUMP1 | DUMP{(A)} {識別コード} |
ELSE | ELSE |
ELSEIF | ELSEIF{(MR)} 標識式 |
ENDDO | ENDDO |
ENDFOR | ENDFOR |
ENDIF | ENDIF |
ENDMON | ENDMON |
ENDSL | ENDSL |
ENDSR | ENDSR {戻り点} |
EVAL | {EVAL{(HMR)}} 結果 = 式 |
EVALR | EVALR{(MR)} 結果 = 式 |
EVAL-CORR | EVAL-CORR{(EH)} ターゲット・データ構造 = ソース・データ構造 |
EXCEPT | EXCEPT {例外名} |
EXFMT | EXFMT{(E)} 形式名 |
EXSR | EXSR サブルーチン名 |
FEOD | FEOD{(EN)} ファイル名 |
FOR | FOR{(MR)} 索引 {= 開始} {BY 増分} {TO|DOWNTO 限界} |
FORCE | FORCE ファイル名 |
IF | IF{(MR)} 標識式 |
IN 1 | IN{(E)} {*LOCK} データ域名 |
ITER | ITER |
LEAVE | LEAVE |
LEAVESR | LEAVESR |
MONITOR | MONITOR |
NEXT1 | NEXT{(E)} プログラム装置 ファイル名 |
ON-ERROR | ON-ERROR {例外識別コード1 {:例外識別コード2...}} |
OPEN | OPEN{(E)} ファイル名 |
OTHER | OTHER |
OUT1 | OUT{(E)} {*LOCK} データ域名 |
POST 1 | POST{(E)} {プログラム装置} ファイル名 |
READ | READ{(EN)} ファイルまたはレコード名 {データ構造} |
READC | READC{(E)} レコード名 {データ構造} |
READE | READE{(ENHMR)} 検索引数|*KEY ファイルまたはレコード名 {データ構造} |
READP | READP{(EN)} 名前 {データ構造} |
READPE | READPE{(ENHMR)} 検索引数|*KEY ファイルまたはレコード名 {データ構造} |
REL 1 | REL{(E)} プログラム装置 ファイル名 |
RESET 1 | RESET{(E)} {*NOKEY} {*ALL} 名前 |
RETURN | RETURN{(HMR)} 式 |
ROLBK | ROLBK{(E)} |
SELECT | SELECT |
SETGT | SETGT{(EHMR)} 検索引数 ファイルまたはレコード名 |
SETLL | SETLL{(EHMR)} 検索引数 ファイルまたはレコード名 |
SORTA | SORTA 配列名 |
TEST 1 | TEST{(EDTZ)} {dtz形式} フィールド名 |
UNLOCK 1 | UNLOCK{(E)} 名前 |
UPDATE | UPDATE{(E)} ファイルまたはレコード名 {データ構造 | %FIELDS(名前{:名前...})} |
WHEN | WHEN{(MR)} 標識式 |
WRITE | WRITE{(E)} ファイルまたはレコード名 {データ構造} |
XML-INTO | XML-INTO{(EH)} ターゲットまたはハンドラー XML 文書 |
XML-SAX | XML-SAX{(E)} ハンドラー XML 文書 |
次の表には、従来型の構文における各命令コードの仕様をまとめてあります。
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.