サブ・プロシージャーは引数として税抜き金額(excluding_tax)、戻り値として税込み価格を戻します。ステートメントを使用します。ステートメントは、プロシージャーの名前、キーワードの順に指定します。プロシージャー名の後は戻り値のデータ・タイプを指定します。桁のパック10進数(小数点以下の桁数はなし)として戻り値を定義しています。続いて受け取る引数を定義しています。変数名、データ・タイプ、キーワードと定義しています。この変数はローカル変数です。キーワードは引数を値で受け取ることを指定します。キーワードが必要です。ステートメントの後の式です。この式の結果が戻り値として呼び出し元に返されます。今回は直接計算式を記述していますが事前に計算を行った結果の値を保持している変数を指定しても構いません。