CALL ステートメント

手続き（PROCEDURE〜ENDPROCEDURE）を呼び出します。

形式

パラメータ

<手続き名>

<通常識別子> で指定します。<手続き名> として用いられる <通常識別子> 中の全角半角，大文字小文字などは区別されません。ここに書く <手続き名> は，同じDPLファイル中のPROCEDUREステートメントまたはREGISTERROUTINEステートメントによって宣言されていなければなりません。

<実引数>

式で指定します。実引数はコンマで区切って複数指定することができます。
<実引数> の個数は，宣言されている <仮引数> の個数と一致していなければなりません。一部の <実引数> を省略することは可能ですが，その場合，<仮引数> との対応を崩さないために次の <実引数> との間を区切るコンマは省略できません。また，<仮引数> に <カーソル変数> が指定してある場合は，<実引数> も <カーソル式> で指定しなければなりません。

結果

例

構造	コマンド	パラメータ
	CALL	Initialize('URIAGE.DPT')
	…
PROCEDURE Initialize($FRAME) DO
	ダイアログ	'元のデータファイルの名前を入力してください', タイトル='変換元ファイル名入力', 種別=FILE,ファイルマスク='*.WJ2'
	ファイル変換	$$FILENAME, 'WORK1.DPT', 種別='Lotus 1-2-3', 既存ファイル=上書き
	オープン	@FRAME, $FRAME
	読込み	@FRAME, 'WORK1.DPT', 項目対応=同名
	整列	@FRAME, 'コード順'
	RETURN
ENDPROCEDURE

解説

• CALLステートメントは，手続き名で指定された手続きを実行します。
• CALLステートメントが実行されると，手続きの実行前に各 <実引数> がそれぞれ一度だけ評価されて，その値が手続きの <仮引数> に代入されます。手続き中でそれらの <仮引数> を参照することによって，<実引数> の値が参照されることになります。
• <実引数> のデータ型に関しては，<仮引数> との対応時にエラーになることはありませんが，手続き中で <仮引数> が使われたときに，正しいデータ型でない場合はエラーになります。
• 手続きの実行がRETURNステートメントによって終了すると，CALLステートメントの次のステートメントに制御が戻ります。
  手続きは，RETURNステートメントのパラメータに書く <式> によって実行結果を呼び出し元に返すことができます。その結果は，システム変数 $$RETURN に設定されます。

注意

• 手続きの <仮引数> に渡されるときの <実引数> の評価順序は不定なので，次のような評価順序に依存するプログラムを書いてはなりません。

  CALL Function($A := $A*2, $A+1)

• <実引数> に書かれた <変数名> へ，手続き中から <仮引数> を通して値を戻すことはできません。

関連項目

RETURNステートメント

PROCEDUREステートメント

REGISTERROUTINEステートメント

機能ガイド：DPLの機能：実行制御

DPLの構文