SAP HANA XS Advanced のデータ用のシンプルな VCL アプリケーションを構築

Dibyendu Datta
Lead Technology Evangelist

CData ODBC Driver for SAP HANA XS Advanced を使用して RAD Studio でSAP HANA XS Advanced のデータを表示するシンプルな VCL アプリケーションを構築する方法を説明します。

Embarcadero RAD Studio は、Delphi および C++Builder アプリケーション用の開発環境を提供します。CData ODBC Driver for SAP HANA XS Advanced を使用すると、RAD Studio 内からリアルタイムSAP HANA XS Advanced のデータにアクセスでき、データをテーブル、ビュー、ストアドプロシージャとして抽象化してSAP HANA XS Advanced のデータの取得が可能です。この記事では、SAP HANA XS Advanced に接続し、フォームデザイナを使用してシンプルな VCL アプリケーションを作成する方法を説明します。

SAP HANA XS Advanced のデータへの接続を作成

まだ設定していない場合は、ODBC DSN（データソース名）で接続プロパティを指定します。これはドライバーインストールの最後のステップです。Microsoft ODBC データソースアドミニストレーターを使用して、ODBC DSN を作成・設定できます。

SAP HANA XSA 接続プロパティの取得・設定方法

SAP HANA XSA はOAuth 認証標準を利用しています。接続する前に、SAP HANA XSA OData サービスを確立する必要があります。ヘルプドキュメントの「カスタムOAuth アプリの作成」セクションを参照してください。

OAuthPassword グラント種別を使用してSAP HANA XSA に接続するには、以下を設定します。

OAuthClientId：UAA サービスJSON ファイルで指定されたClient Id に設定。
OAuthClientSecret：UAA サービスJSON ファイルで指定されたClient Secret に設定。
Url：OData サービスエンドポイントに設定。
XSUAAURL：UAA サービスURL に設定。
User：アカウントのユーザー名に設定。
Password：アカウントのパスワードに設定。

OData サービスを設定したら、カスタムクレデンシャルを使用して接続を確立できます。

次に、以下の手順で Data Explorer を使用してSAP HANA XS Advanced のデータへの FireDAC 接続を作成します。

新しい VCL フォームアプリケーションで、Data Explorer の FireDAC ノードを展開します。
Data Explorer で ODBC Data Source ノードを右クリックします。
［新しい接続の追加］をクリックします。
接続の名前を入力します。
表示される FireDAC Connection Editor で、DataSource プロパティに SAP HANA XS Advanced 用 ODBC DSN の名前を設定します。

SAP HANA XS Advanced のデータに接続する VCL アプリケーションを作成

以下の手順に従って、クエリ結果をグリッドに表示するシンプルな VCL アプリケーションからSAP HANA XS Advanced のデータへのクエリ実行を開始します。

TFDConnection コンポーネントをフォームにドロップし、以下のプロパティを設定します。
- ConnectionDefName:SAP HANA XS Advanced のデータへの FireDAC 接続を選択します。
- Connected: メニューから True を選択し、表示されるダイアログで資格情報を入力します。
TFDQuery コンポーネントをフォームにドロップし、以下のプロパティを設定します。
- Connection: まだ指定されていない場合は、このプロパティを TFDConnection コンポーネントに設定します。
- SQL: SQL プロパティのボタンをクリックしてクエリを入力します。例:
```
SELECT ,  FROM  WHERE  = ''
```
- Active: このプロパティを true に設定します。
TDataSource コンポーネントをフォームにドロップし、以下のプロパティを設定します。
- DataSet: このプロパティのメニューで、TFDQuery コンポーネントの名前を選択します。
TDBGrid コントロールをフォームにドロップし、以下のプロパティを設定します。
- DataSource: TDataSource の名前を選択します。
TFDGUIxWaitCursor をフォームにドロップします。これはランタイムエラーを回避するために必要です。