リファレンスガイド> TDV SQLスクリプト> SQLスクリプトの例> 例8(パッケージ化されたクエリ)
 
例8(パッケージ化されたクエリ)
この例では、事前にパッケージ化されたクエリを呼び出し、データの最初の行を返します。これは、ユーザーがsharedフォルダーの下にpqAccess、という名前の事前にパッケージ化されたクエリを持っていることを前提としています。
PROCEDURE prepackaged_query_example ()
BEGIN
  -- Declare a cursor to retrieve from the prepackaged query
  DECLARE myRow ROW(a1 INT, a2 VARCHAR, a3 VARCHAR, a4 DECIMAL, a5 INT,                              a6 DECIMAL, a7 VARCHAR, a8 VARCHAR);
  DECLARE crs cursor(a1 int, a2 VARCHAR, a3 VARCHAR, a4 DECIMAL, a5 INT,                              a6 DECIMAL, a7 VARCHAR, a8 VARCHAR);
 
  CALL /shared/pqAccess(crs);
  -- Fetch the first row
  FETCH crs INTO myRow;
END