delphi - FireDAC を使用してストアド プロシージャ DDL を抽出する方法

Question

FIBPlus から FireDAC に変更中です。必要なほとんどの機能は FireDAC にあります。ストアド プロシージャを DDL として抽出するための TpFIBDBSchemaExtract と TpFIBScripter に相当する FIBPlus を見つけるのに苦労しています。

FireDAC にはデータベースからストアド プロシージャ DDL を抽出する方法がありますか?

たとえば、次のようになります。

SET TERM ^ ;

CREATE PROCEDURE MY_PROC RETURNS (aParam INTEGER) AS
BEGIN
  aParam = 10;
END^