-----------------------------------------------------------------------------
-- (c) Copyright IBM Corp. 2007 All rights reserved.
--
-- The following sample of source code ("Sample") is owned by International
-- Business Machines Corporation or one of its subsidiaries ("IBM") and is
-- copyrighted and licensed, not sold. You may use, copy, modify, and
-- distribute the Sample in any form without payment to IBM, for the purpose
-- of assisting you in the development of your applications.
--
-- The Sample code is provided to you on an "AS IS" basis, without warranty
-- of any kind. IBM HEREBY EXPRESSLY DISCLAIMS ALL WARRANTIES, EITHER EXPRESS
-- OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
-- MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. Some jurisdictions
-- do not allow for the exclusion or limitation of implied warranties, so the
-- above limitations or exclusions may not apply to you. IBM shall not be
-- liable for any damages you suffer as a result of using, copying, modifying
-- or distributing the Sample, even if IBM has been advised of the
-- possibility of such damages.
-----------------------------------------------------------------------------
--
-- SOURCE FILE NAME: SpCreate.db2
--
-- SAMPLE: Creates the external procedures implemented in SpServer.cs
--
-- To run this script by itself, from the CLP perform the following steps:
-- 1. Connect to the database
-- 2. Issue the command:
--
-- db2 -td@ -vf <script-name>
--
-- where <script-name> represents the name of this script, SpCreate.db2
------------------------------------------------------------------------------
CREATE PROCEDURE OUT_LANGUAGE (OUT LANGUAGE CHAR(8),
OUT returnCode INTEGER,
OUT errorMsg VARCHAR(32))
SPECIFIC OUT_LANGUAGE
DYNAMIC RESULT SETS 0
LANGUAGE CLR
PARAMETER STYLE GENERAL
NO DBINFO
FENCED
MODIFIES SQL DATA
PROGRAM TYPE SUB
EXTERNAL NAME 'SpServer.dll:SpServer!OutLanguage'@
CREATE PROCEDURE OUT_PARAM (OUT medianSalary DECIMAL(9,2),
OUT returnCode INTEGER,
OUT errorMsg VARCHAR(32))
SPECIFIC OUT_PARAM
DYNAMIC RESULT SETS 0
LANGUAGE CLR
PARAMETER STYLE GENERAL
NO DBINFO
FENCED
MODIFIES SQL DATA
PROGRAM TYPE SUB
EXTERNAL NAME 'SpServer.dll:SpServer!OutParameter'@
CREATE PROCEDURE IN_PARAMS (IN lowsal DECIMAL(9,2),
IN medsal DECIMAL(9,2),
IN highsal DECIMAL(9,2),
IN department CHAR(3),
OUT returnCode INTEGER,
OUT errorMsg VARCHAR(32))
SPECIFIC IN_PARAMS
DYNAMIC RESULT SETS 0
LANGUAGE CLR
PARAMETER STYLE GENERAL
NO DBINFO
FENCED
MODIFIES SQL DATA
PROGRAM TYPE SUB
EXTERNAL NAME 'SpServer.dll:SpServer!InParameters'@
CREATE PROCEDURE INOUT_PARAM (INOUT medianSalary DECIMAL(7,2),
OUT returnCode INTEGER,
OUT errorMsg VARCHAR(32))
SPECIFIC INOUT_PARAM
DYNAMIC RESULT SETS 0
LANGUAGE CLR
PARAMETER STYLE GENERAL
NO DBINFO
FENCED
MODIFIES SQL DATA
PROGRAM TYPE SUB
EXTERNAL NAME 'SpServer.dll:SpServer!InOutParameter'@
CREATE PROCEDURE ONE_RESULT_SET (IN salValue DECIMAL(7,2),
OUT returnCode INTEGER,
OUT errorMsg VARCHAR(32))
SPECIFIC ONE_RESULT_SET
DYNAMIC RESULT SETS 1
LANGUAGE CLR
PARAMETER STYLE GENERAL
NO DBINFO
FENCED
READS SQL DATA
PROGRAM TYPE SUB
EXTERNAL NAME 'SpServer.dll:SpServer!OneResultSetToClient'@
CREATE PROCEDURE CLOB_EXTRACT (IN number CHAR(6),
OUT buffer VARCHAR(1000),
OUT returnCode INTEGER,
OUT errorMsg VARCHAR(32))
SPECIFIC CLOB_EXTRACT
DYNAMIC RESULT SETS 0
LANGUAGE CLR
PARAMETER STYLE GENERAL
NO DBINFO
FENCED
READS SQL DATA
PROGRAM TYPE SUB
EXTERNAL NAME 'SpServer.dll:SpServer!ClobExtract'@
CREATE PROCEDURE ALL_DATA_TYPES (INOUT small SMALLINT,
INOUT intIn INTEGER,
INOUT bigIn BIGINT,
INOUT realIn REAL,
INOUT doubleIn DOUBLE,
OUT charOut CHAR(1),
OUT charsOut CHAR(15),
OUT varcharOut VARCHAR(12),
OUT dateOut DATE,
OUT timeOut TIME,
OUT returnCode INTEGER,
OUT errorMsg VARCHAR(32))
SPECIFIC ALL_DATA_TYPES
DYNAMIC RESULT SETS 0
LANGUAGE CLR
PARAMETER STYLE GENERAL
NO DBINFO
FENCED
READS SQL DATA
PROGRAM TYPE SUB
EXTERNAL NAME 'SpServer.dll:SpServer!AllDataTypes'@