From 6e42c542ea16b720002907d85567295212e87ffd Mon Sep 17 00:00:00 2001 From: alexpeshkoff Date: Fri, 1 Jun 2007 13:16:43 +0000 Subject: [PATCH] Builtin functions - same changes in legacy file --- src/extlib/ib_udf.sql | 120 +++++++++++++++++++++--------------------- 1 file changed, 60 insertions(+), 60 deletions(-) diff --git a/src/extlib/ib_udf.sql b/src/extlib/ib_udf.sql index bc5d4ac77d..c95dc09ead 100644 --- a/src/extlib/ib_udf.sql +++ b/src/extlib/ib_udf.sql @@ -32,11 +32,11 @@ * Returns the absolute value of a * number. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION abs DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_abs' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_abs' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -50,11 +50,11 @@ DECLARE EXTERNAL FUNCTION abs * out of bounds it returns NaN, as handled * by the _matherr routine. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION acos DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_acos' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_acos' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -66,11 +66,11 @@ DECLARE EXTERNAL FUNCTION acos * Returns the ASCII character corresponding * with the value passed in. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION ascii_char INTEGER RETURNS CSTRING(1) FREE_IT - ENTRY_POINT 'IB_UDF_ascii_char' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_ascii_char' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -82,11 +82,11 @@ DECLARE EXTERNAL FUNCTION ascii_char * Returns the ascii value of the character * passed in. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION ascii_val CHAR(1) RETURNS INTEGER BY VALUE - ENTRY_POINT 'IB_UDF_ascii_val' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_ascii_val' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -99,11 +99,11 @@ DECLARE EXTERNAL FUNCTION ascii_val * -1 and 1, if the number is out of * range NaN is returned. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION asin DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_asin' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_asin' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -115,11 +115,11 @@ DECLARE EXTERNAL FUNCTION asin * Returns the arctangent of a number. * * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION atan DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_atan' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_atan' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -131,11 +131,11 @@ DECLARE EXTERNAL FUNCTION atan * Returns the arctangent of the * first param / the second param. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION atan2 DOUBLE PRECISION, DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_atan2' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_atan2' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -147,11 +147,11 @@ DECLARE EXTERNAL FUNCTION atan2 * Returns the result of a binary AND * operation performed on the two numbers. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION bin_and INTEGER, INTEGER RETURNS INTEGER BY VALUE - ENTRY_POINT 'IB_UDF_bin_and' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_bin_and' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -163,11 +163,11 @@ DECLARE EXTERNAL FUNCTION bin_and * Returns the result of a binary OR * operation performed on the two numbers. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION bin_or INTEGER, INTEGER RETURNS INTEGER BY VALUE - ENTRY_POINT 'IB_UDF_bin_or' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_bin_or' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -179,11 +179,11 @@ DECLARE EXTERNAL FUNCTION bin_or * Returns the result of a binary XOR * operation performed on the two numbers. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION bin_xor INTEGER, INTEGER RETURNS INTEGER BY VALUE - ENTRY_POINT 'IB_UDF_bin_xor' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_bin_xor' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -196,11 +196,11 @@ DECLARE EXTERNAL FUNCTION bin_xor * the smallest integer that is greater * than or equal to the input value. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION ceiling DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_ceiling' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_ceiling' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -218,11 +218,11 @@ DECLARE EXTERNAL FUNCTION ceiling * and returns an indefinite (same as a * quiet NaN). * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION cos DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_cos' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_cos' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -240,11 +240,11 @@ DECLARE EXTERNAL FUNCTION cos * and returns an indefinite (same as a * quiet NaN). * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION cosh DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_cosh' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_cosh' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -256,11 +256,11 @@ DECLARE EXTERNAL FUNCTION cosh * Returns 1 over the tangent of the * input parameter. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION cot DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_cot' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_cot' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -289,11 +289,11 @@ DECLARE EXTERNAL FUNCTION div * representing the largest integer that * is less than or equal to x * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION floor DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_floor' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_floor' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -304,11 +304,11 @@ DECLARE EXTERNAL FUNCTION floor * Functional description: * Returns the natural log of a number. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION ln DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_ln' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_ln' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -320,11 +320,11 @@ DECLARE EXTERNAL FUNCTION ln * log (x,y) returns the logarithm * base x of y. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION log DOUBLE PRECISION, DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_log' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_log' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -336,11 +336,11 @@ DECLARE EXTERNAL FUNCTION log * Returns the logarithm base 10 of the * input parameter. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION log10 DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_log10' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_log10' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -359,11 +359,11 @@ DECLARE EXTERNAL FUNCTION log10 * characters which is the limit on an * INTERBASE character string. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION lower CSTRING(255) RETURNS CSTRING(255) FREE_IT - ENTRY_POINT 'IB_UDF_lower' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_lower' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -381,11 +381,11 @@ DECLARE EXTERNAL FUNCTION lower * characters which is the limit on an * INTERBASE character string. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION lpad CSTRING(255), INTEGER, CSTRING(1) RETURNS CSTRING(255) FREE_IT - ENTRY_POINT 'IB_UDF_lpad' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_lpad' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -418,11 +418,11 @@ DECLARE EXTERNAL FUNCTION ltrim * Returns the remainder part of the * division of the two input parameters. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION mod INTEGER, INTEGER RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_mod' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_mod' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -433,10 +433,10 @@ DECLARE EXTERNAL FUNCTION mod * Functional description: * Returns the value of pi = 3.1459... * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION pi RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_pi' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_pi' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -450,10 +450,10 @@ DECLARE EXTERNAL FUNCTION pi * generator is seeded using the current * time. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION rand RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_rand' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_rand' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -471,11 +471,11 @@ DECLARE EXTERNAL FUNCTION rand * characters which is the limit on an * INTERBASE character string. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION rpad CSTRING(255), INTEGER, CSTRING(1) RETURNS CSTRING(255) FREE_IT - ENTRY_POINT 'IB_UDF_rpad' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_rpad' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -509,11 +509,11 @@ DECLARE EXTERNAL FUNCTION rtrim * the input value is positive, zero or * negative, respectively. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION sign DOUBLE PRECISION RETURNS INTEGER BY VALUE - ENTRY_POINT 'IB_UDF_sign' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_sign' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -529,11 +529,11 @@ DECLARE EXTERNAL FUNCTION sign * function generates a _TLOSS error and * returns an indefinite (same as a quiet NaN). * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION sin DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_sin' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_sin' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -549,11 +549,11 @@ DECLARE EXTERNAL FUNCTION sin * function generates a _TLOSS error and * returns an indefinite (same as a quiet NaN). * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION sinh DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_sinh' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_sinh' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -564,11 +564,11 @@ DECLARE EXTERNAL FUNCTION sinh * Functional description: * Returns the square root of a number. * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION sqrt DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_sqrt' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_sqrt' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -647,11 +647,11 @@ DECLARE EXTERNAL FUNCTION strlen * _TLOSS error and returns an indefinite * (same as a quiet NaN). * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION tan DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_tan' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_tan' MODULE_NAME 'ib_udf'; */ /***************************************** * @@ -668,9 +668,9 @@ DECLARE EXTERNAL FUNCTION tan * _TLOSS error and returns an indefinite * (same as a quiet NaN). * - *****************************************/ + ***************************************** DECLARE EXTERNAL FUNCTION tanh DOUBLE PRECISION RETURNS DOUBLE PRECISION BY VALUE - ENTRY_POINT 'IB_UDF_tanh' MODULE_NAME 'ib_udf'; + ENTRY_POINT 'IB_UDF_tanh' MODULE_NAME 'ib_udf'; */