This commit is contained in:
Paul Reeves 2023-01-23 13:42:02 +01:00
parent c6a8712150
commit 3e6facd820
2 changed files with 43 additions and 33 deletions

View File

@ -1,33 +0,0 @@
set term ^;
create or alter package my_first_udr_kit
as
begin
-- Add Procedure and Function Headers here
-- eg:
/*
procedure split_boolean (
in_txt blob sub_type text,
in_separator varchar(31))
returns (
out_boolean boolean);
*/
end ^
recreate package body my_first_udr_kit
as
begin
procedure split_boolean (
in_txt blob sub_type text,
in_separator varchar(31))
returns (
out_boolean boolean)
external name 'my_first_udr_kit!split' engine udr;
end ^
set term ;^

View File

@ -0,0 +1,43 @@
set term ^;
create or alter package my_first_udr_kit
-- optional - declare sql security as DEFINER to give access rights of owner to all users
-- sql security definer
as
begin
function div (
anumerator integer, adenominator integer
)
returns ( AResult double precision);
function flagged (
flags integer, flag integer
)
returns integer;
end ^
recreate package body my_first_udr_kit
as
begin
function div (
anumerator integer, adenominator integer
)
returns ( AResult double precision)
external name 'udf_compat!UC_div!Divide param1 by param2' engine udr;
function flagged (
flags integer, flag integer
)
returns integer
external name 'my_first_udr_kit!MFK_flagged!What is this function intended for?' engine udr;
end ^
set term ;^