SAP Ariba Procurement のデータ 用のシンプルな VCL アプリケーションを構築
Embarcadero RAD Studio は、Delphi および C++Builder アプリケーション用の開発環境を提供します。CData ODBC Driver for SAP Ariba Procurement を使用すると、RAD Studio 内からリアルタイムSAP Ariba Procurement のデータにアクセスでき、データをテーブル、ビュー、ストアドプロシージャとして抽象化してSAP Ariba Procurement のデータの取得が可能です。この記事では、SAP Ariba Procurement に接続し、フォームデザイナを使用してシンプルな VCL アプリケーションを作成する方法を説明します。
SAP Ariba Procurement のデータ への接続を作成
まだ設定していない場合は、ODBC DSN(データソース名)で接続プロパティを指定します。これはドライバーインストールの最後のステップです。Microsoft ODBC データソースアドミニストレーターを使用して、ODBC DSN を作成・設定できます。
それでは、SAP Ariba Procurement に接続していきましょう。接続するには、以下のプロパティを設定します。
- ANID:Ariba Network ID
- API:CData 製品にSAP Ariba データを取得させたいAPI を指定してください。ビジネスロールに基づき、Buyer またはSupplier API を選択します(可能な値は、PurchaseOrdersBuyerAPIV1、または PurchaseOrdersSupplierAPIV1 です)
- Environment:接続先がテスト環境か本番環境かを指定してください(可能な値は、TEST またはPRODUCTION です)
OAuth 認証
続いて、接続プロパティを設定した後、認証のためにOAuth 接続を設定する必要があります。
- AuthScheme をOAuthClient に設定します
- サービスにアプリケーションを登録し、APIKey、OAuthClientId、およびOAuthClientSecret を取得する必要があります
OAuth アプリケーションの作成について、詳しくはヘルプドキュメントをご確認ください。
OAuth の自動リフレッシュ
以下のプロパティを設定して、接続してみましょう。
- APIKey:アプリケーション設定のApplication key
- OAuthClientId:アプリケーション設定のOAuth Client Id
- OAuthClientSecret:アプリケーション設定のOAuth Secret
接続すると、CData 製品が自動でOAuth プロセスを完了します。
- CData 製品がSAP Ariba からアクセストークンを取得し、それを使ってデータをリクエストします
- CData 製品がアクセストークンの期限が切れると自動的にリフレッシュします
- OAuth 値はOAuthSettingsLocation で指定された場所に基づいてメモリに保存されます
次に、以下の手順で Data Explorer を使用してSAP Ariba Procurement のデータへの FireDAC 接続を作成します。
- 新しい VCL フォームアプリケーションで、Data Explorer の FireDAC ノードを展開します。
- Data Explorer で ODBC Data Source ノードを右クリックします。
- [新しい接続の追加] をクリックします。
- 接続の名前を入力します。
- 表示される FireDAC Connection Editor で、DataSource プロパティに SAP Ariba Procurement 用 ODBC DSN の名前を設定します。
SAP Ariba Procurement のデータ に接続する VCL アプリケーションを作成
以下の手順に従って、クエリ結果をグリッドに表示するシンプルな VCL アプリケーションからSAP Ariba Procurement のデータへのクエリ実行を開始します。
-
TFDConnection コンポーネントをフォームにドロップし、以下のプロパティを設定します。
- ConnectionDefName:SAP Ariba Procurement のデータへの FireDAC 接続を選択します。
- Connected: メニューから True を選択し、表示されるダイアログで資格情報を入力します。
-
TFDQuery コンポーネントをフォームにドロップし、以下のプロパティを設定します。
- Connection: まだ指定されていない場合は、このプロパティを TFDConnection コンポーネントに設定します。
SQL: SQL プロパティのボタンをクリックしてクエリを入力します。例:
SELECT DocumentNumber, Revision FROM Orders WHERE OrderStatus = 'CHANGED'
- Active: このプロパティを true に設定します。
TDataSource コンポーネントをフォームにドロップし、以下のプロパティを設定します。
- DataSet: このプロパティのメニューで、TFDQuery コンポーネントの名前を選択します。
-
TDBGrid コントロールをフォームにドロップし、以下のプロパティを設定します。
- DataSource: TDataSource の名前を選択します。
- TFDGUIxWaitCursor をフォームにドロップします。これはランタイムエラーを回避するために必要です。
これで、TFDQuery オブジェクトに設定された SQL クエリの結果を表示する実行可能なアプリケーションが完成しました。
関連記事
RAD Studio、Delphi、C++ Builder で CData ODBC ドライバを使用するその他の記事は以下をご覧ください。