diff --git a/Modules/Modules.sql b/Modules/Modules.sql index 33e532b..a32c648 100644 --- a/Modules/Modules.sql +++ b/Modules/Modules.sql @@ -20,5 +20,6 @@ end; @@cout_err.pck @@cout_system_configuration.pck @@mip_contact_details.pck +@@get_quote_items.fnc exit \ No newline at end of file diff --git a/Modules/get_quote_items.fnc b/Modules/get_quote_items.fnc new file mode 100644 index 0000000..04f0fab --- /dev/null +++ b/Modules/get_quote_items.fnc @@ -0,0 +1,26 @@ +create or replace function get_quote_items(p_quote_id in number) return varchar2 is + ret_items varchar2(250); + first_item BOOLEAN := TRUE; +BEGIN + --blank string + ret_items := ''; + + FOR cur_item IN (SELECT * FROM quote_items quit + WHERE quit.qute_id = p_quote_id + AND quit.adit_code IS NOT NULL) LOOP + + IF first_item THEN + ret_items := cur_item.adit_code; + first_item := FALSE; + ELSE --add a seperator + ret_items := ret_items ||', '|| cur_item.adit_code; + END IF; + END LOOP; + + return(ret_items); +EXCEPTION + WHEN OTHERS THEN + --return an empty string just in case + RETURN(NULL); +end get_quote_items; +/