diff --git a/sql/MyFirstUDRKit.sql b/sql/MyFirstUDRKit.sql deleted file mode 100644 index eead7fa..0000000 --- a/sql/MyFirstUDRKit.sql +++ /dev/null @@ -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 ;^ diff --git a/sql/MyFirstUDRKitPackage.sql b/sql/MyFirstUDRKitPackage.sql new file mode 100644 index 0000000..47f54fd --- /dev/null +++ b/sql/MyFirstUDRKitPackage.sql @@ -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 ;^